Function

IsRemDlgAllowed

Module

rTemplates

Last Modified

7/15/2014 3:26:44 PM

Comments

-1 = inactive or deleted, 0 = not in Param, 1 = allowed

Scope

Interfaced

Declaration

function IsRemDlgAllowed(RemDlgIEN: string): integer;

Called-By Hierarchy


                                 IsRemDlgAllowed
               TTemplate.ExecuteReminderDialog┘ 
                ExecuteTemplateOrBoilerPlate┤   
                      TfrmDrawers.InsertText┘   
           TfrmDrawers.tvTemplatesDblClick┤     
            TfrmDrawers.tvTemplatesKeyDown┤     
                TfrmDrawers.NewRECDragDrop┤     
          TfrmDrawers.SetRichEditControl┘ │     
                 TfrmDCSumm.FormCreate┤   │     
               TfrmConsults.FormCreate┤   │     
                TfrmSurgery.FormCreate┤   │     
                  TfrmNotes.FormCreate┘   │     
        TfrmDrawers.mnuInsertTemplateClick┘     
  TfrmDCSumm.popSummMemoInsTemplateClick┤       
TfrmConsults.popNoteMemoInsTemplateClick┤       
 TfrmSurgery.popNoteMemoInsTemplateClick┤       
   TfrmNotes.popNoteMemoInsTemplateClick┘       

Called-By

Name Declaration Comments
TTemplate.ExecuteReminderDialog procedure ExecuteReminderDialog(OwningForm: TForm); -


Source

272   function IsRemDlgAllowed(RemDlgIEN: string): integer;
273   // -1 = inactive or deleted, 0 = not in Param, 1 = allowed
274   begin
275     Result := StrToIntDef(sCallV('TIU REM DLG OK AS TEMPLATE', [RemDlgIEN]),-1);
276   end;