Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AG7

Package: IHS Patient Registration

Routine: AG7


Information

AG7 ; IHS/ASDS/EFG - ENTER PRIVATE INSURANCE DATA ;

Source Information

Source file <AG7.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
IHS Patient Registration 7 (READ,YN)^AG  DUOUT^AG6  ^AG8  ^AGED4A  EN^AGEDPRV  EN^AGEDPRVB  INS^AGEL  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS Patient Registration 3 AG6  AG8  AGED7  

Entry Points

Name Comments DBIA/ICR reference
END1
AGAIN ;EP
END
ADDINS(ID0) ;EP - ADD PRVT INS. USING NEW EDIT SCREENS
L16 ;
ADDCOV ;EP - Add New Insurance.
L2
L1
DUOUT ;EP

External References

Name Field # of Occurrence
READ^AG L1+6
YN^AG L1+19
DUOUT^AG6 L1+18, DUOUT+1
^AG8 L1+1, L1+15, END+3
^AGED4A END+1
EN^AGEDPRV AGAIN+10
EN^AGEDPRVB AGAIN+14
INS^AGEL L2+3
^DIC AGAIN+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: L1+3
Function Call: WRITE
  • Prompt: "Does this patient have PRIVATE INSURANCE COVERAGE? (Y/N) "
  • Line Location: L1+4
Function Call: WRITE
  • Prompt: AG("DFLT"),"// "
  • Line Location: L1+5
Function Call: WRITE
  • Prompt: !!,"Must enter an existing private insurer"
  • Line Location: AGAIN+8
Routine Call
  • DIC
  • Line Location:
    • AGAIN+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUTNINS - [#9999999.18] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPRVT - [#9000006] L1+2, END1, AGAIN+13

Label References

Name Line Occurrences
ADDINS L1+15
AGAIN AGAIN+8
END END1
END1 L1+19
L1 L1+19, DUOUT+1
L2 L1+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADDCHK AGAIN+1!
AG END+1!, END+2!
AG("DFLT" L1+2*, L1+5, L1+19
AG("EDIT" END
AG("LT" L1+7*, L1+15
AGADD L1!
>> AGADDINS END+1
>> AGCHRT L2+2
>> AGELP("HRN" L2+2*
>> AGELP("PDFN" L2*
>> AGELP("TYPE" L2+1*
>> AGKIDS AGAIN+14
AGNEWINS AGAIN+1!
>> AGOPT("ESCAPE" AGAIN+12
>> AGOPT(5 L1+1, DUOUT+1
AGSELECT AGAIN+11!
>> COVPTR AGAIN+10, AGAIN+14
DA AGAIN+1!, AGAIN+7!
>> DFN L1+2, L1+15, L2, END1
>> DFOUT L1+17
DIC AGAIN+1!, AGAIN+2*, AGAIN+7!
DIC("S" AGAIN+5*
DIC(0 AGAIN+3*
DIE AGAIN+1!, AGAIN+7!
DIR AGAIN+1!, AGAIN+7!
>> DLOUT L1+19
DR AGAIN+1!, AGAIN+7!
>> DTOUT L1+17
>> DUOUT L1+18
ID0 ADDINS~, AGAIN+10, AGAIN+13, AGAIN+14
>> ID1 AGAIN+10, AGAIN+14
>> INSPTR AGAIN+9*, AGAIN+10, AGAIN+14
NEWENTRY AGAIN+11!
>> POLHPTR AGAIN+10, AGAIN+14
>> Y L1+7, L1+19, AGAIN+8, AGAIN+9, AGAIN+12
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All