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

Package: Registration

Routine: DGREGRED


Information

DGREGRED ;ALB/JAM,ARF,JAM - Residential Address Edit API ;1/6/21 10:30

Source Information

Source file <DGREGRED.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Registration 7 ($$CNTRYI,$$FOREIGN,$$FORIEN)^DGADDUTL  $$EN^DGADDVAL  $$UPD^DGENDBS  $$CNTY^DGREGAZL  $$POBOXRES^DGREGCP2  EN^DGREGTZL  ($$EN,$$ISRTAUON)^DGRTAUPD  
VA FileMan 4 FILE^DIE  ($$GET1,GETS)^DIQ  ^DIR  ^DIWP  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGRPCADD  

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,FLG) ;Entry point
RETRY
CHK ; DG*5.3*1014; Prompt user and allow them to correct the address or continue to Validation service
PHONE ; Process the phone number changes IF FLG(1) = 1
CLEAN ; DG*5.3*1143 - Clear out edit data when the user saves or discards the changes
SAVERTA ; DG*5.3*1143 - Save the address edits with RTA updates active
; Validate the address fields and set BAD=1 if not valid
SAVETOLOCAL ; DG*5.3*1143 Save user input to local array
; Hold the data in the DGADDGRP1 array and save to the DB later
SENDRTAU() ; DG*5.3*1143 - send edited address data to ES via webservice
SAVEFROMLOCAL ; DG*5.3*1143 Save data to the DB from the local DGADDGRP1 array
INPUT(DGINPUT,DFN,FSTR,CNTRY) ;Let user input address changes
; Output: DGINPUT(field#)=external^internal(if any)
GETOLD(DGCMP,DFN) ;populate array with existing address info
COMPARE(DGINPUT,DGCMP) ;Display before & after address fields.
COMPAREP(DGINPUT,DGCMP) ;Display before & after phone fields.
DISPUS(DGCMP,DGM) ;tag to display US data
DISPFGN(DGCMP,DGM) ;tag to display Foreign data
CONFIRM(TYPE) ;Confirm if user wants to save the changes
; TYPE - used for the query message displayed to the user: "address" or "phone number"
SAVE(DGINPUT,DFN,FSTR,FORGN) ;Save changes
SAVEPH(DGINPUT,DFN) ;Save phone changes
READ(DFN,DGN,Y) ;Read input, return success
INPT1(FORGN,PSTR) ; first address input prompts
ZIPINP(DGINPUT,DFN) ; get ZIP+4 input
; This subroutine calls existing code to prompt for zip code and return corresponding city, state and county
; DFN must be the patient internal ID.
; DGINPUT - passed by reference - the array containing the resulting county, city, and state for the zip code.
SKIP(DGN,DGINPUT,FLG) ; determine whether or not to skip this step
EOP ;End of page prompt
UPCT ;Indicate "^" or "^^" are unacceptable inputs.

External References

Name Field # of Occurrence
$$CNTRYI^DGADDUTL GETOLD+13, DISPUS+10, DISPFGN+8
$$FOREIGN^DGADDUTL RETRY+10
$$FORIEN^DGADDUTL GETOLD+6, COMPARE+5
$$EN^DGADDVAL CHK+17
$$UPD^DGENDBS SAVE+23
$$CNTY^DGREGAZL GETOLD+18
$$POBOXRES^DGREGCP2 CHK+49, SAVERTA+7
EN^DGREGTZL ZIPINP+10
$$EN^DGRTAUPD SENDRTAU+2
$$ISRTAUON^DGRTAUPD EN+12
FILE^DIE SAVEFROMLOCAL+9, SAVE+14, SAVEPH+8
$$GET1^DIQ GETOLD+5
GETS^DIQ GETOLD+11
^DIR CHK+6, CONFIRM+6, READ+8, EOP+4
^DIWP SENDRTAU+9, SENDRTAU+17

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?3,*7,"RESIDENTIAL ADDRESS [LINE 1], CITY, STATE and ZIP CODE fields are required."
  • Line Location: RETRY+21
Function Call: WRITE
  • Prompt: !!?3,*7,"RESIDENTIAL ADDRESS [LINE 1] and CITY fields are required."
  • Line Location: RETRY+22
Function Call: WRITE
  • Prompt: !
  • Line Location: RETRY+26
Function Call: WRITE
  • Prompt: !,"Changes not saved."
  • Line Location: CHK+10
Function Call: WRITE
  • Prompt: !,"Address changes not saved."
  • Line Location: CHK+12
Function Call: WRITE
  • Prompt: !!,"No Results - UAM Address Validation Service is unable to validate the address.",!,"Please verify the address entered. "
  • Line Location: CHK+24
Function Call: WRITE
  • Prompt: !,"Changes not saved."
  • Line Location: CHK+38
Function Call: WRITE
  • Prompt: !,"Address changes not saved."
  • Line Location: CHK+42
Function Call: WRITE
  • Prompt: !!?3,*7,"RESIDENTIAL ADDRESS [LINE 1], ZIP CODE and CITY fields are required."
  • Line Location: CHK+45
Function Call: WRITE
  • Prompt: !!?3,*7,"RESIDENTIAL ADDRESS [LINE 1] and CITY fields are required."
  • Line Location: CHK+46
Function Call: WRITE
  • Prompt: !!?3,*7,"You cannot enter 'P. O. Box' or 'General Delivery' for a Residential Address."
  • Line Location: CHK+50
Function Call: WRITE
  • Prompt: !,"Phone changes not saved."
  • Line Location: PHONE+7
Function Call: WRITE
  • Prompt: !!?3,*7,"RESIDENTIAL ADDRESS [LINE 1], ZIP CODE and CITY fields are required."
  • Line Location: SAVERTA+3
Function Call: WRITE
  • Prompt: !!?3,*7,"RESIDENTIAL ADDRESS [LINE 1] and CITY fields are required."
  • Line Location: SAVERTA+4
Function Call: WRITE
  • Prompt: !!?3,*7,"You cannot enter 'P. O. Box' or 'General Delivery' for a Residential Address."
  • Line Location: SAVERTA+8
Function Call: WRITE
  • Prompt: !,"Change saved."
  • Line Location: SAVERTA+22
Function Call: WRITE
  • Prompt: !!,"** Webservice call failed:"
  • Line Location: SENDRTAU+11
Function Call: WRITE
  • Prompt: DGLINE(DGL,0),!
  • Line Location: SENDRTAU+11
Function Call: WRITE
  • Prompt: !,"("_DGI_") "
  • Line Location: SENDRTAU+14
Function Call: WRITE
  • Prompt: DGLINE(DGL,0),!
  • Line Location: SENDRTAU+19
Function Call: WRITE
  • Prompt: !
  • Line Location: COMPARE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: COMPAREP+3
Function Call: WRITE
  • Prompt: !,?2,"[",DGM," PHONE NUMBERS]"
  • Line Location: COMPAREP+5
Function Call: WRITE
  • Prompt: !,?6," Phone: ",?16,$P($G(DGCMP(DGM,.131)),U)
  • Line Location: COMPAREP+6
Function Call: WRITE
  • Prompt: !,?6," Office: ",?16,$P($G(DGCMP(DGM,.132)),U)
  • Line Location: COMPAREP+7
Function Call: WRITE
  • Prompt: !
  • Line Location: COMPAREP+8
Function Call: WRITE
  • Prompt: !,?2,"[",DGM," RESIDENTIAL ADDRESS]"
  • Line Location: DISPUS+2
Function Call: WRITE
  • Prompt: !?16,$P($G(DGCMP(DGM,.1151)),U)
  • Line Location: DISPUS+3
Function Call: WRITE
  • Prompt: !,?16,$P($G(DGCMP(DGM,.1152)),U)
  • Line Location: DISPUS+4
Function Call: WRITE
  • Prompt: !,?16,$P($G(DGCMP(DGM,.1153)),U)
  • Line Location: DISPUS+5
Function Call: WRITE
  • Prompt: !,?16,$P($G(DGCMP(DGM,.1154)),U)
  • Line Location: DISPUS+6
Function Call: WRITE
  • Prompt: $P($G(DGCMP(DGM,.1155)),U)
  • Line Location: DISPUS+8
Function Call: WRITE
  • Prompt: " ",$G(DGCMP(DGM,.1156))
  • Line Location: DISPUS+9
Function Call: WRITE
  • Prompt: !?16,DGCNTRY
  • Line Location: DISPUS+11
Function Call: WRITE
  • Prompt: !,?6," County: ",$P($G(DGCMP(DGM,.1157)),U)
  • Line Location: DISPUS+12
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPUS+13
Function Call: WRITE
  • Prompt: !,?2,"[",DGM," RESIDENTIAL ADDRESS]"
  • Line Location: DISPFGN+2
Function Call: WRITE
  • Prompt: !?16,$P($G(DGCMP(DGM,.1151)),U)
  • Line Location: DISPFGN+3
Function Call: WRITE
  • Prompt: !,?16,$P($G(DGCMP(DGM,.1152)),U)
  • Line Location: DISPFGN+4
Function Call: WRITE
  • Prompt: !,?16,$P($G(DGCMP(DGM,.1153)),U)
  • Line Location: DISPFGN+5
Function Call: WRITE
  • Prompt: !,?16,$P($G(DGCMP(DGM,.1154)),U)_" "_$P($G(DGCMP(DGM,.11571)),U)_" "_$P($G(DGCMP(DGM,.11572)),U)
  • Line Location: DISPFGN+7
Function Call: WRITE
  • Prompt: !?16,DGCNTRY
  • Line Location: DISPFGN+10
Function Call: WRITE
  • Prompt: !
  • Line Location: DISPFGN+11
Function Call: WRITE
  • Prompt: !,"Please review the saved changes!!",!
  • Line Location: SAVE+17
Function Call: WRITE
  • Prompt: $G(MSG("DIERR",1,"TEXT",DGM))
  • Line Location: SAVE+19
Function Call: WRITE
  • Prompt: !,"Change saved."
  • Line Location: SAVE+20
Function Call: WRITE
  • Prompt: !,"Please review the saved changes!!",!
  • Line Location: SAVEPH+11
Function Call: WRITE
  • Prompt: $G(MSG("DIERR",1,"TEXT",DGM))
  • Line Location: SAVEPH+13
Function Call: WRITE
  • Prompt: !,"Change saved."
  • Line Location: SAVEPH+14
Function Call: WRITE
  • Prompt: !,*7,"Answer must be 10 numbers in length with an optional 'X' and 1-6 digit",!,"extension number allowed.",!!
  • Line Location: READ+13
Function Call: WRITE
  • Prompt: !,"EXIT NOT ALLOWED"
  • Line Location: UPCT+1
Routine Call
  • DIE
  • Line Location:
    • SAVEFROMLOCAL+9
    • SAVE+14
    • SAVEPH+8
Routine Call
  • DIR
  • Line Location:
    • CHK+6
    • CONFIRM+6
    • READ+8
    • EOP+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] RETRY+4
^HL(779.004 - [#779.004] INPUT+10
^UTILITY($J SENDRTAU+8!, SENDRTAU+10, SENDRTAU+16!, SENDRTAU+18

Label References

Name Line Occurrences
$$CONFIRM CHK+35, PHONE+5
$$INPT1 RETRY+11, GETOLD+8
$$READ INPUT+8
$$SENDRTAU SAVERTA+20
$$SKIP INPUT+4
CHK CHK+14
CLEAN CHK+38, SAVEFROMLOCAL+11
COMPARE CHK+33
COMPAREP PHONE+3
DISPFGN RETRY+27, COMPARE+5
DISPUS RETRY+28, COMPARE+10
EOP CHK+10, CHK+12, CHK+24, CHK+38, PHONE+7, SAVERTA+23, SENDRTAU+20, SAVE+25, SAVEPH+16
GETOLD RETRY+1
INPUT RETRY+12
PHONE CHK+12, CHK+42, CHK+44, CHK+49
RETRY RETRY+20, CHK+13, CHK+30, CHK+39, PHONE+10
SAVE CHK+53
SAVEFROMLOCAL SAVERTA+21
SAVEPH PHONE+8
SAVERTA CHK+30, CHK+39
SAVETOLOCAL SAVERTA+11
UPCT READ+10
ZIPINP INPUT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BAD EN+6~, RETRY+14*, CHK+30, CHK+39, CHK+44*, CHK+49*, PHONE+10, SAVERTA+2*, SAVERTA+7*, SAVERTA+25*
CCIEN GETOLD+2~, GETOLD+5*, GETOLD+6, GETOLD+13, GETOLD+14
CFORGN GETOLD+2~, GETOLD+3*, GETOLD+6*, GETOLD+8, GETOLD+10, GETOLD+15
CFSTR GETOLD+2~, GETOLD+8*, GETOLD+10*, GETOLD+11, GETOLD+12
CNTRY EN+6~, RETRY+4*, RETRY+10, RETRY+12, INPUT~, INPUT+10
COUNTRY GETOLD+2~, GETOLD+13*, GETOLD+14
DA INPUT+2~, READ+1~, READ+7*
DATA SAVE+1~, SAVE+23, SAVEPH+1~
DATA( SAVE+22*
DFN EN~, EN+9, RETRY+1, RETRY+4, RETRY+10, RETRY+12, CHK+53, PHONE+8, SENDRTAU+2, SAVEFROMLOCAL+5
, SAVEFROMLOCAL+7, SAVEFROMLOCAL+8, INPUT~, INPUT+6, INPUT+8, GETOLD~, GETOLD+5, GETOLD+11, GETOLD+12, GETOLD+16
, GETOLD+17, SAVE~, SAVE+13, SAVE+23, SAVEPH~, SAVEPH+7, READ~, READ+7, ZIPINP~, ZIPINP+10
DGADDEDIT EN+12~
DGADDEDIT(1 CLEAN+1!, SAVERTA+13*
DGADDGRP1 EN+12~, RETRY+3, RETRY+6, CLEAN+1!, SAVETOLOCAL+2!, SENDRTAU+2
DGADDGRP1( RETRY+6, SAVETOLOCAL+9*, SAVETOLOCAL+11*, SAVETOLOCAL+12*, SAVEFROMLOCAL+3, SAVEFROMLOCAL+4, SAVEFROMLOCAL+7, SAVEFROMLOCAL+8, READ+6, ZIPINP+10
DGADVRET CHK+16~, CHK+17*, CHK+22, CHK+24
DGCIEN GETOLD+2~, GETOLD+16*, GETOLD+18
DGCMP EN+6~, RETRY+1, RETRY+3*, CHK+33, PHONE+3, GETOLD~, GETOLD+1!, COMPARE~, COMPARE+5, COMPARE+10
, COMPAREP~, DISPUS~, DISPFGN~
DGCMP( COMPARE+5, COMPAREP+6, COMPAREP+7, DISPUS+3, DISPUS+4, DISPUS+5, DISPUS+6, DISPUS+7, DISPUS+8, DISPUS+9
, DISPUS+10, DISPUS+12, DISPFGN+3, DISPFGN+4, DISPFGN+5, DISPFGN+7, DISPFGN+8
DGCMP("NEW" COMPARE+2*, COMPARE+7, COMPARE+8*, COMPARE+9*, COMPAREP+2*
DGCMP("OLD" RETRY+10, GETOLD+12*, GETOLD+14*, GETOLD+20*
DGCNTRY DISPUS+1~, DISPUS+10*, DISPUS+11, DISPFGN+1~, DISPFGN+8*, DISPFGN+9*, DISPFGN+10
DGCNTY GETOLD+2~, GETOLD+18*, GETOLD+19*, GETOLD+20, COMPARE+1~, COMPARE+7*, COMPARE+8
DGCODE SAVETOLOCAL+6~, SAVETOLOCAL+7*, SAVETOLOCAL+9, SAVE+10~, SAVE+11*, SAVE+13, SAVE+14, SAVEPH+4~, SAVEPH+5*, SAVEPH+7
, SAVEPH+8
DGCONFIRM CHK+35~*, CHK+38, CHK+42, PHONE+5~*, PHONE+7
DGCURR GETOLD+2~
DGCURR(2 GETOLD+12, GETOLD+16, GETOLD+17
DGER SAVE+1~, SAVE+2*, SAVE+16*, SAVE+20, SAVEPH+1~, SAVEPH+2*, SAVEPH+10*, SAVEPH+14
DGERRS SENDRTAU+1~, SENDRTAU+2
DGERRS( SENDRTAU+13, SENDRTAU+15
DGI SENDRTAU+4~, SENDRTAU+13*, SENDRTAU+14, SENDRTAU+15
DGINPUT EN+6~, RETRY+12!*, RETRY+25, CHK+17, CHK+33, CHK+53, PHONE+3, PHONE+8, INPUT~, INPUT+3
, INPUT+4, INPUT+6, INPUT+8*, INPUT+10, COMPARE~, COMPARE+2, COMPAREP~, COMPAREP+2, SAVE~, SAVEPH~
, ZIPINP~, ZIPINP+11*, SKIP~
DGINPUT( RETRY+20, CHK+44, CHK+49, SAVERTA+2, SAVERTA+7, SAVETOLOCAL+7, SAVETOLOCAL+8, INPUT+3*, INPUT+9*, INPUT+10*
, SAVE+6*, SAVE+11, SAVE+12, SAVEPH+5, SAVEPH+6, SKIP+3, SKIP+4
DGINPUT("overrideKey" CHK+20
DGL SENDRTAU+4~, SENDRTAU+11*, SENDRTAU+19*
DGLINE SENDRTAU+4~, SENDRTAU+10*, SENDRTAU+11, SENDRTAU+18*, SENDRTAU+19
DGLINE( SENDRTAU+11, SENDRTAU+19
DGM COMPARE+1~, COMPARE+4*, COMPARE+5, COMPARE+6, COMPARE+10, COMPAREP+1~, COMPAREP+4*, COMPAREP+5, COMPAREP+6, COMPAREP+7
, DISPUS~, DISPUS+2, DISPUS+3, DISPUS+4, DISPUS+5, DISPUS+6, DISPUS+7, DISPUS+8, DISPUS+9, DISPUS+10
, DISPUS+12, DISPFGN~, DISPFGN+2, DISPFGN+3, DISPFGN+4, DISPFGN+5, DISPFGN+7, DISPFGN+8, SAVE+1~, SAVE+16*
, SAVE+18*, SAVE+19, SAVEPH+1~, SAVEPH+10*, SAVEPH+12*, SAVEPH+13
DGN SAVETOLOCAL+5*, SAVETOLOCAL+7, SAVETOLOCAL+8, SAVETOLOCAL+9, SAVEFROMLOCAL+1~, SAVEFROMLOCAL+2*, SAVEFROMLOCAL+3*, SAVEFROMLOCAL+4, SAVEFROMLOCAL+5, SAVEFROMLOCAL+7
, SAVEFROMLOCAL+8, INPUT+2~, INPUT+3*, INPUT+4, INPUT+6, INPUT+8, INPUT+9, SAVE+1~, SAVE+7*, SAVE+9
, SAVE+11, SAVE+12, SAVE+13, SAVEPH+1~, SAVEPH+3*, SAVEPH+5, SAVEPH+6, SAVEPH+7, READ~, READ+4
, READ+6, READ+13, SKIP~, SKIP+3, SKIP+4, SKIP+5
DGNAME SAVETOLOCAL+6~, SAVETOLOCAL+8*, SAVETOLOCAL+9, SAVE+10~, SAVE+12*, SAVE+13, SAVEPH+4~, SAVEPH+6*, SAVEPH+7
DGNEWADD RETRY+24~, RETRY+27, RETRY+28, RETRY+29!
DGNEWADD("NEW" RETRY+25*
DGOVERKEY CHK+16~, CHK+20*, SAVETOLOCAL+11, SAVE+6
DGR INPUT+2~, ZIPINP+4~, ZIPINP+10, ZIPINP+11
>> DGRTAHOLD CHK+30, SAVERTA+15
DGRTAON EN+12~*, CHK+10, CHK+30, CHK+38, CHK+39
DGRTARET SENDRTAU+1~, SENDRTAU+2*, SENDRTAU+3, SENDRTAU+7, SENDRTAU+21
DGST GETOLD+2~, GETOLD+17*, GETOLD+18
>> DGTMOT RETRY+10*, CHK+8*, CHK+12, CHK+22*, CHK+24, CHK+35*, CHK+53, PHONE+5*, PHONE+7, PHONE+8
, INPUT+6*, INPUT+8*, SAVE+25, SAVEPH+16, EOP+6*
DGVAL READ+1~, READ+12*, READ+13, READ+14*!
DGVALUE SAVEFROMLOCAL+1~, SAVEFROMLOCAL+4*, SAVEFROMLOCAL+5
DIR CHK+1~, CHK+6!, INPUT+2~, CONFIRM+2~, READ+1~, EOP+1~
DIR("?" CHK+5*, CONFIRM+5*
DIR("A" CHK+2*, CHK+3*, CONFIRM+4*, EOP+3*
DIR("B" READ+6*
DIR(0 CHK+4*, CONFIRM+3*, READ+4*, EOP+2*
DIROUT INPUT+2~, CONFIRM+2~, CONFIRM+10, READ+1~, READ+10, EOP+1~
DIWF SENDRTAU+4~, SENDRTAU+5*
DIWL SENDRTAU+4~, SENDRTAU+5*
DIWR SENDRTAU+4~, SENDRTAU+5*
DTOUT CHK+8, INPUT+2~, CONFIRM+2~, CONFIRM+8, READ+1~, READ+9, EOP+1~, EOP+6
DUOUT CHK+10, CHK+12, INPUT+2~, CONFIRM+2~, CONFIRM+10, READ+1~, READ+10, EOP+1~
FCITY ZIPINP+4~, ZIPINP+8*, ZIPINP+10
FCOUNTY ZIPINP+4~, ZIPINP+8*
FDA SAVEFROMLOCAL+1~, SAVE+10~, SAVEPH+4~
FDA(2 SAVEFROMLOCAL+5*, SAVEFROMLOCAL+7*, SAVEFROMLOCAL+8*, SAVE+13*, SAVEPH+7*
FLG EN~, INPUT+4, SKIP~
FLG(1 EN+14*, PHONE+1, SKIP+5
FLG(2 EN+14*, CHK+33, PHONE+3
FORGN EN+6~, RETRY+10*, RETRY+11, RETRY+20, RETRY+21, RETRY+22, RETRY+27, RETRY+28, CHK+44, CHK+45
, CHK+46, CHK+53, SAVERTA+2, SAVERTA+3, SAVERTA+4, SAVETOLOCAL+4, SAVE~, SAVE+5, INPT1~, INPT1+6
FSTATE ZIPINP+4~, ZIPINP+8*
FSTR EN+6~, RETRY+11!*, RETRY+12, CHK+53, SAVETOLOCAL+4*, SAVETOLOCAL+5, INPUT~, INPUT+3, SAVE~, SAVE+5*
, SAVE+6*, SAVE+7, INPT1+1~, INPT1+5*, INPT1+6*, INPT1+7
FZIP ZIPINP+4~, ZIPINP+8*, ZIPINP+10
I EN+7~
ICNTRY EN+6~, RETRY+4*, RETRY+6*, RETRY+8*, RETRY+10
L SAVETOLOCAL+5*, INPUT+2~, INPUT+3*, GETOLD+2~, GETOLD+12*, SAVE+1~, SAVE+7*, READ+1~, READ+3*
MSG SAVE+10~, SAVE+15, SAVEPH+4~, SAVEPH+9
MSG("DIERR" SAVE+18, SAVE+19, SAVEPH+12, SAVEPH+13
OLDC EN+6~, RETRY+10*
POP READ+1~, READ+2*, READ+3, READ+9*, READ+15*
PSTR EN+6~, RETRY+11!, INPT1~, INPT1+4*
SKIP SKIP+1~, SKIP+2*, SKIP+3*, SKIP+4*, SKIP+5*, SKIP+6
SUCCESS READ+1~, READ+2*, READ+9*, READ+16
T GETOLD+2~, GETOLD+12*
TYPE CONFIRM~, CONFIRM+4, ZIPINP+4~, ZIPINP+8*
U SAVETOLOCAL+7, SAVETOLOCAL+8, GETOLD+20, COMPARE+5, COMPARE+7, COMPAREP+6, COMPAREP+7, DISPUS+3, DISPUS+4, DISPUS+5
, DISPUS+6, DISPUS+7, DISPUS+8, DISPUS+10, DISPUS+12, DISPFGN+3, DISPFGN+4, DISPFGN+5, DISPFGN+7, DISPFGN+8
, SAVE+11, SAVE+12, SAVEPH+5, SAVEPH+6
X EN+7~, CHK+13, CHK+14, SENDRTAU+4~, SENDRTAU+7*, SENDRTAU+15*, INPUT+2~, CONFIRM+2~, EOP+1~
Y EN+7~, INPUT+2~, INPUT+8, INPUT+9, CONFIRM+2~, CONFIRM+9, READ~, READ+12, EOP+1~
Z SENDRTAU+4~
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