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 |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AG3

Package: IHS Patient Registration

Routine: AG3


Information

AG3 ; IHS/ASDS/EFG - ENTRY UTILITY FOR NON-MANDATORY DATA ;

Source Information

Source file <AG3.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
IHS Patient Registration 5 (CITY,COB,HPH,OPH,SOB,SSN,ST,STATE,ZIP)^AG3A  ^AG4  (MSGPH,WEB)^AGED1  ALIAS^AGOPT2  UPDTHADD^AGUTILS  
VA Fileman 2 ^DIE  ^DIR  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
IHS Patient Registration 4 AG2  AG4  AGBIC2  AGBIC2P  

Entry Points

Name Comments DBIA/ICR reference
ASKWEB ;
L12OPT
L10
L11
L11A
L6 ;D S1,ST^AG3A G L5:$D(DUOUT),L10:X=""
L7
L4 ;D S1,COB^AG3A G L1:$D(DUOUT)
L5
DUOUT ;EP
L1
ASKMSTAT ;
S1
L8
L9

External References

Name Field # of Occurrence
CITY^AG3A L7
COB^AG3A L4+1
HPH^AG3A L10
OPH^AG3A L11
SOB^AG3A L5
SSN^AG3A L1, L1+1
ST^AG3A L6+1
STATE^AG3A L8
ZIP^AG3A L9
^AG4 L12OPT+2
MSGPH^AGED1 L11A
WEB^AGED1 ASKWEB+1
ALIAS^AGOPT2 L12OPT
UPDTHADD^AGUTILS L10+15
^DIE ASKMSTAT+5
^DIR L10+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,">>This option asks all questions one after the other with no escaping<<",!!
  • Line Location: AG3+3
Function Call: WRITE
  • Prompt: !,"Without a Social Security Number a BIC cannot be issued - try again!"
  • Line Location: L1+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: L10+2
Function Call: WRITE
  • Prompt: !,$G(NEWST)
  • Line Location: L10+3
Function Call: WRITE
  • Prompt: !,$G(NEWCITY),",",$G(NEWSTATE)," ",$G(NEWZIP)
  • Line Location: L10+4
Function Call: WRITE
  • Prompt: !,$G(NEWHPH)
  • Line Location: L10+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: L10+6
Function Call: WRITE
  • Prompt: !!,"Adding to PREVIOUS MAIL ADDRESSES FIELD...."
  • Line Location: L10+14
Routine Call
  • DIE
  • Line Location:
    • ASKMSTAT+5
Routine Call
  • DIR
  • Line Location:
    • L10+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Label References

Name Line Occurrences
ASKMSTAT L4+1
ASKWEB L6+1
L1 ASKMSTAT+6
L10 L6+1, L11
L11 L11A, L12OPT, L12OPT+1
L12OPT DUOUT+1
L4 L1+1, L5
L6 L7, L10+13
L7 L8
L8 L9
L9 L10
S1 L1, L1+1, L4+1, L5, L6+1, L7, L8, L9, L10, L11
, L11A, L12OPT

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AGOPT(14 L1+1
>> AGOPT(3 L12OPT
>> AGPATDFN ASKMSTAT+4
DA ASKMSTAT+1!, ASKMSTAT+4*
>> DFN L10+15
DFOUT L10+7~, S1!
DIC ASKMSTAT+1!
DIE ASKMSTAT+1!, ASKMSTAT+2*
DIR ASKMSTAT+1!, L10+8!
DIR("A" L10+10*
DIR("B" L10+11*
DIR(0 L10+9*
>> DIROUT ASKMSTAT+6
>> DIRUT L10+13
DLOUT S1!
DQOUT S1!
DR ASKMSTAT+1!, ASKMSTAT+3*
DTOUT ASKMSTAT+6, L10+7~, L10+13, S1!
DUOUT L1, L1+1, ASKMSTAT+6, L4+1, L5, L6+1, L7, L8, L9, L10
, L10+7~, L10+13, L11, L11A, L12OPT, L12OPT+1, S1!
>> NEWCITY L10+4
>> NEWHPH L10+5
>> NEWST L10+3
>> NEWSTATE L10+4
>> NEWZIP L10+4
>> X L1+1, L6+1
>> Y L10+13
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All