Function

CanChangeCosigner

Module

rTIU

Last Modified

7/15/2014 3:26:44 PM

Scope

Interfaced

Declaration

function CanChangeCosigner(IEN: integer): boolean;

Called-By Hierarchy


                            CanChangeCosigner
  TfrmDCSumm.mnuActIdentifyAddlSignersClick┤ 
      TfrmDCSumm.popSummMemoAddlSignClick┘ │ 
TfrmConsults.mnuActIdentifyAddlSignersClick┤ 
    TfrmConsults.popNoteMemoAddlSignClick┘ │ 
 TfrmSurgery.mnuActIdentifyAddlSignersClick┤ 
     TfrmSurgery.popNoteMemoAddlSignClick┘ │ 
   TfrmNotes.mnuActIdentifyAddlSignersClick┘ 
       TfrmNotes.popNoteMemoAddlSignClick┘   

Called-By

Name Declaration Comments
TfrmDCSumm.mnuActIdentifyAddlSignersClick procedure mnuActIdentifyAddlSignersClick(Sender: TObject); -
TfrmConsults.mnuActIdentifyAddlSignersClick procedure mnuActIdentifyAddlSignersClick(Sender: TObject); -
TfrmSurgery.mnuActIdentifyAddlSignersClick procedure mnuActIdentifyAddlSignersClick(Sender: TObject); -
TfrmNotes.mnuActIdentifyAddlSignersClick procedure mnuActIdentifyAddlSignersClick(Sender: TObject); -


Source

947   function CanChangeCosigner(IEN: integer): boolean;
948   begin
949     Result := Piece(sCallV('TIU CAN CHANGE COSIGNER?', [IEN]), U, 1) = '1';
950   end;