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: AG3A

Package: IHS Patient Registration

Routine: AG3A


Information

AG3A ; IHS/ASDS/EFG - ENTER & EDIT NON-MANDATORY DATA ;

Source Information

Source file <AG3A.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
IHS Patient Registration 4 EDCOM^AG2B  (ADDR2,ADDR3)^AGED1  $$ISREQ^AGFLDREQ  UPDTHADD^AGUTILS  
VA Fileman 3 ^DIE  $$GET1^DIQ  ^DIR  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
IHS Patient Registration 3 AG1  AG3  AGED1  
Emergency Room 1 AMERVSIT  

Entry Points

Name Comments DBIA/ICR reference
S2 ;
S1 ;
COB ;EP - City of Birth.
END2 ;
ALLADDR4
ALLADDR5
ALLADDR6
SOB ;EP - State Of Birth.
ALLADDR1
ALLADDR2
ALLADDR3
ALLADDR ;EP - EDIT ALL ADDRESSES - CONFIRM TO ADD TO PRVIOUS ADDRESS MULTIPLE
ALLADDR7
ASKADD ;EP - ADD ADDRESS AS HISTORICAL
END ;
ZIP ;EP - Mailing Zip.
ALIAS ;ENTER OTHER NAMES
STATE ;EP - Mailing State.
HPH ;EP - Home Phone #.
CITY ;EP - Mailing City.
ST ;EP - Mailing Street Address.
SSN ;EP - Social Security Number.
NOSSN ;EP
OPH ;EP - Office Phone #.
PRES ;EP - Patient Residence

External References

Name Field # of Occurrence
EDCOM^AG2B CITY+12
ADDR2^AGED1 ALLADDR2
ADDR3^AGED1 ALLADDR3
$$ISREQ^AGFLDREQ SSN+11, ST+3, CITY+3, STATE+4, ZIP+5, HPH+3
UPDTHADD^AGUTILS ASKADD+10
^DIE SSN+26, SSN+34, NOSSN+14, END+1
$$GET1^DIQ ALLADDR+3, ALLADDR+4, ALLADDR+5, ALLADDR+6, ALLADDR+7, ALLADDR+8, ALLADDR+9, ALLADDR7+1, ALLADDR7+2, ALLADDR7+3
, ALLADDR7+4, ALLADDR7+5, ALLADDR7+6, ALLADDR7+7, ST+1, ST+6, CITY+1, CITY+6, STATE+1, STATE+7
, ZIP+1, ZIP+8, HPH+1, HPH+6
^DIR SSN+18, NOSSN+7, ASKADD+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!!!?5,"*************************** SSN MISSING ***************************"
  • Line Location: NOSSN+1
Function Call: WRITE
  • Prompt: !?5,"The SSN is Required, Please indicate the Reason for Non-collection."
  • Line Location: NOSSN+2
Function Call: WRITE
  • Prompt: !?16,"(If the SSN is known, press RETURN to enter it)"
  • Line Location: NOSSN+3
Function Call: WRITE
  • Prompt: !!,"Adding to PREVIOUS MAIL ADDRESSES FIELD...."
  • Line Location: ASKADD+9
Function Call: WRITE
  • Prompt: *7,!!,"*** If you changed the city, you may need to change the"
  • Line Location: CITY+9
Function Call: WRITE
  • Prompt: !,"*** Community of Residence fields shown below."
  • Line Location: CITY+10
Function Call: WRITE
  • Prompt: !,"*** If not, just press RETURN to continue.",!
  • Line Location: CITY+11
Function Call: WRITE
  • Prompt: !
  • Line Location: S1+4
Function Call: WRITE
  • Prompt: !
  • Line Location: S2+4
Routine Call
  • DIE
  • Line Location:
    • SSN+26
    • SSN+34
    • NOSSN+14
    • END+1
Routine Call
  • DIR
  • Line Location:
    • SSN+18
    • NOSSN+7
    • ASKADD+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls,  GET1^DIQ
^AUPNPAT - [#9000001] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPAT - [#9000001] SSN+3, SSN+4, SSN+5, SSN+30
^AUTTSSN - [#9999999.78] SSN+4, SSN+5
^DPT - [#2] SSN+2, SSN+22, SSN+29

Label References

Name Line Occurrences
CITY ALLADDR4
END SSN+21, COB+3, SOB+3, PRES+3, ST+5, CITY+5, STATE+6, ZIP+7, HPH+5, OPH+3
, ALIAS+5
HPH ALLADDR7
NOSSN SSN+29
S1 PRES+1
S2 SSN+10, COB+1, SOB+1, ST+2, CITY+2, STATE+2, ZIP+2, HPH+2, OPH+1, ALIAS+1
SSN NOSSN+10
ST ALLADDR1
STATE ALLADDR5
ZIP ALLADDR6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AGOLD("SSN" SSN+2*, SSN+22, SSN+27!
AGVERFY SSN+1~*, SSN+6*, SSN+14
>> DA SSN+24*, SSN+32*, NOSSN+12*, S1+3*, S2+3*
>> DFN SSN+2, SSN+3, SSN+4, SSN+5, SSN+22, SSN+24, SSN+29, SSN+30, SSN+32, NOSSN+12
, ALLADDR+3, ALLADDR+4, ALLADDR+5, ALLADDR+6, ALLADDR+7, ALLADDR+8, ALLADDR+9, ALLADDR7+1, ALLADDR7+2, ALLADDR7+3
, ALLADDR7+4, ALLADDR7+5, ALLADDR7+6, ALLADDR7+7, ASKADD+10, ST+1, ST+6, CITY+1, CITY+6, STATE+1
, STATE+7, ZIP+1, ZIP+8, HPH+1, HPH+6, S1+3, S2+3
DFOUT ASKADD+2~
>> DIE SSN+23*, SSN+31*, NOSSN+11*, S1+2*, S2+2*
>> DIE("NO^" SSN+11*, ST+3*, CITY+3*, STATE+4*, ZIP+5*, HPH+3*
DIR SSN+16!, NOSSN+4!, NOSSN+8!, ASKADD+3!
DIR("A" NOSSN+6*, ASKADD+5*
DIR("B" ASKADD+6*
DIR(0 SSN+17*, NOSSN+5*, ASKADD+4*
>> DIROUT NOSSN+10
>> DIRUT NOSSN+10
>> DPTFLAG ZIP+3
DR SSN+11*, SSN+12*, SSN+25*, SSN+33*, NOSSN+13*, COB+2*, SOB+2*, PRES+2*, ST+3*, ST+4*
, CITY+3*, CITY+4*, STATE+3*, STATE+4*, STATE+5*, ZIP+3*, ZIP+5*, ZIP+6*, HPH+3*, HPH+4*
, OPH+2*, ALIAS+2!, ALIAS+3*
DR(2 ALIAS+4*
DTOUT ASKADD+2~, ASKADD+8, CITY+8
DUOUT SSN+28, ASKADD+2~, ASKADD+8, S1+1!, S2+1!, END+2*
NEWADDR2 ALLADDR+2~, ALLADDR7+2*, ASKADD+1
NEWADDR3 ALLADDR+2~, ALLADDR7+3*, ASKADD+1
NEWCITY ALLADDR+2~, ALLADDR7+4*, ASKADD+1, CITY+6*
NEWHPH ALLADDR+2~, ALLADDR7+7*, ASKADD+1, HPH+6*
NEWST ALLADDR+2~, ALLADDR7+1*, ASKADD+1, ST+6*
NEWSTATE ALLADDR+2~, ALLADDR7+5*, ASKADD+1, STATE+7*
NEWZIP ALLADDR+2~, ALLADDR7+6*, ASKADD+1, ZIP+8*
OLDADDR2 ALLADDR+1~, ALLADDR+4*, ASKADD+1
OLDADDR3 ALLADDR+1~, ALLADDR+5*, ASKADD+1
OLDCITY ALLADDR+1~, ALLADDR+6*, ASKADD+1, CITY+1*
OLDHPH ALLADDR+1~, ALLADDR+9*, ASKADD+1, HPH+1*
OLDST ALLADDR+1~, ALLADDR+3*, ASKADD+1, ST+1*
OLDSTATE ALLADDR+1~, ALLADDR+7*, ASKADD+1, STATE+1*
OLDZIP ALLADDR+1~, ALLADDR+8*, ASKADD+1, ZIP+1*
U SSN+2, SSN+3, SSN+4, SSN+5, SSN+29, SSN+30
>> Y NOSSN+9, NOSSN+13, ASKADD+8, END+2
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