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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: DGREGCP1

Package: Registration

Routine: DGREGCP1


Information

DGREGCP1 ;ALB/CLT,ARF - ADDRESS COPY UTILITIES ; 18 May 2017 2:54 PM

Source Information

Source file <DGREGCP1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Registration 4 ($$CNTRYI,$$FORIEN)^DGADDUTL  $$CNTY^DGREGAZL  (P2R,R2P)^DGREGCOP  $$POBOXPM^DGREGCP2  
VA FileMan 1 ^DIR  

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 DGRPE  

Entry Points

Name Comments DBIA/ICR reference
RESDISP(DFN) ;DISPLAY THE RESIDENTIAL ADDRESS
PERMDISP(DFN) ;DISPLAY MAILING ADDRESS
RESMVQ(DFN) ;DISPLAY RESIDENTIAL ADDRESS AND QUESTION IF COPY TO PERM IS DESIRED
PERMMVQ(DFN) ;DISPLAY MAILING ADDRESS AND QUESTION IF COPY TO RESIDENTIAL IS DESIRED
; First check for a valid Mailing Address that can be copied to residential address
ASK ;
EOP ;End of page prompt

External References

Name Field # of Occurrence
$$CNTRYI^DGADDUTL RESDISP+11, PERMDISP+11
$$FORIEN^DGADDUTL RESDISP+11, PERMDISP+11, PERMMVQ+10
$$CNTY^DGREGAZL RESDISP+21, PERMDISP+21
P2R^DGREGCOP ASK+25
R2P^DGREGCOP RESMVQ+20
$$POBOXPM^DGREGCP2 PERMMVQ+16
^DIR RESMVQ+6, RESMVQ+14, ASK+5, ASK+19, EOP+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Residential Address to copy to the Mailing Address:",!
  • Line Location: RESDISP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: RESDISP+15
Function Call: WRITE
  • Prompt: ?43,"County: "
  • Line Location: RESDISP+17
Function Call: WRITE
  • Prompt: "UNKNOWN"
  • Line Location: RESDISP+18
Function Call: WRITE
  • Prompt: $P(DGCNTY,"^",1),"(",$P(DGCNTY,"^",3),")"
  • Line Location: RESDISP+21
Function Call: WRITE
  • Prompt: ?43,"Province: "
  • Line Location: RESDISP+23
Function Call: WRITE
  • Prompt: !?3,DGA9_" "_DGA4
  • Line Location: RESDISP+25
Function Call: WRITE
  • Prompt: !?3,DGA4_" "_DGA9
  • Line Location: RESDISP+26
Function Call: WRITE
  • Prompt: !?3,DGA4
  • Line Location: RESDISP+27
Function Call: WRITE
  • Prompt: ",",$P(^DIC(5,+$P(^DPT(DFN,.115),"^",5),0),"^",2)
  • Line Location: RESDISP+28
Function Call: WRITE
  • Prompt: " ",DGZIP
  • Line Location: RESDISP+30
Function Call: WRITE
  • Prompt: !?3,DGCNTRY,!
  • Line Location: RESDISP+31
Function Call: WRITE
  • Prompt: !,"Mailing Address to copy to Residential Address:",!
  • Line Location: PERMDISP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PERMDISP+15
Function Call: WRITE
  • Prompt: ?43,"County: "
  • Line Location: PERMDISP+17
Function Call: WRITE
  • Prompt: "UNKNOWN"
  • Line Location: PERMDISP+18
Function Call: WRITE
  • Prompt: $P(DGCNTY,"^",1),"(",$P(DGCNTY,"^",3),")"
  • Line Location: PERMDISP+21
Function Call: WRITE
  • Prompt: ?43,"Province: "
  • Line Location: PERMDISP+23
Function Call: WRITE
  • Prompt: !?3,DGA9_" "_DGA4
  • Line Location: PERMDISP+25
Function Call: WRITE
  • Prompt: !?3,DGA4_" "_DGA9
  • Line Location: PERMDISP+26
Function Call: WRITE
  • Prompt: !?3,DGA4
  • Line Location: PERMDISP+27
Function Call: WRITE
  • Prompt: ",",$P(^DIC(5,+$P(^DPT(DFN,.11),"^",5),0),"^",2)
  • Line Location: PERMDISP+28
Function Call: WRITE
  • Prompt: " ",DGZIP
  • Line Location: PERMDISP+30
Function Call: WRITE
  • Prompt: !?3,DGCNTRY,!
  • Line Location: PERMDISP+31
Function Call: WRITE
  • Prompt: !
  • Line Location: RESMVQ+10
Function Call: WRITE
  • Prompt: !,"Copy completed."
  • Line Location: RESMVQ+21
Function Call: WRITE
  • Prompt: !!?3,*7,"P.O. Box and GENERAL DELIVERY cannot be used in residential address."
  • Line Location: PERMMVQ+17
Function Call: WRITE
  • Prompt: !
  • Line Location: PERMMVQ+17
Function Call: WRITE
  • Prompt: !,"Because the Mailing Address line 1 contains P.O. Box"
  • Line Location: PERMMVQ+19
Function Call: WRITE
  • Prompt: " or General",!,"Delivery the Mailing Address cannot be copied to"
  • Line Location: PERMMVQ+20
Function Call: WRITE
  • Prompt: !,"the Residential Address."
  • Line Location: PERMMVQ+21
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+14
Function Call: WRITE
  • Prompt: !!
  • Line Location: ASK+15
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+15
Function Call: WRITE
  • Prompt: !,"Copy completed."
  • Line Location: ASK+26
Routine Call
  • DIR
  • Line Location:
    • RESMVQ+6
    • RESMVQ+14
    • ASK+5
    • ASK+19
    • EOP+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] RESDISP+19, RESDISP+28, PERMDISP+19, PERMDISP+28
^DPT - [#2] RESDISP+5, RESDISP+8, RESDISP+28, RESDISP+29, PERMDISP+5, PERMDISP+8, PERMDISP+28, PERMDISP+29, RESMVQ+1, PERMMVQ+3

Label References

Name Line Occurrences
ASK ASK+12
EOP RESMVQ+22, PERMMVQ+22, ASK+27
PERMDISP ASK+15
RESDISP RESMVQ+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN RESDISP~, RESDISP+5, RESDISP+8, RESDISP+28, RESDISP+29, PERMDISP~, PERMDISP+5, PERMDISP+8, PERMDISP+28, PERMDISP+29
, RESMVQ~, RESMVQ+1, RESMVQ+11, RESMVQ+20, PERMMVQ~, PERMMVQ+3, PERMMVQ+16, ASK+15, ASK+25
DFORGN PERMMVQ+2~
DGA1 RESDISP+1~, RESDISP+8*, RESDISP+13, RESDISP+15, PERMDISP+1~, PERMDISP+8*, PERMDISP+13, PERMDISP+15
DGA10 RESDISP+1~, RESDISP+10*, RESDISP+11, PERMDISP+1~, PERMDISP+10*, PERMDISP+11, PERMMVQ+2~, PERMMVQ+9*, PERMMVQ+10
DGA1315 RESDISP+1~, PERMDISP+1~
DGA2 RESDISP+1~, RESDISP+8*, RESDISP+13, PERMDISP+1~, PERMDISP+8*, PERMDISP+13
DGA3 RESDISP+1~, RESDISP+8*, RESDISP+13, PERMDISP+1~, PERMDISP+8*, PERMDISP+13
DGA4 RESDISP+1~, RESDISP+8*, RESDISP+26, RESDISP+27, PERMDISP+1~, PERMDISP+8*, PERMDISP+26, PERMDISP+27
DGA9 RESDISP+1~, RESDISP+9*, RESDISP+26, PERMDISP+1~, PERMDISP+9*, PERMDISP+26
DGADD PERMMVQ+14~
DGCIEN RESDISP+2~, RESDISP+20*, RESDISP+21, PERMDISP+2~, PERMDISP+20*, PERMDISP+21
DGCNTRY RESDISP+2~, RESDISP+11*, RESDISP+12*, RESDISP+31, PERMDISP+2~, PERMDISP+11*, PERMDISP+12*, PERMDISP+31
DGCNTY RESDISP+2~, RESDISP+21*, PERMDISP+2~, PERMDISP+21*
DGE RESDISP+2~, PERMDISP+2~
DGFORGN RESDISP+2~, RESDISP+11*, RESDISP+16, RESDISP+26, RESDISP+27, PERMDISP+2~, PERMDISP+11*, PERMDISP+16, PERMDISP+26, PERMDISP+27
, PERMMVQ+10*, PERMMVQ+11
DGRESADD PERMMVQ+14~
DGRESX PERMMVQ+14~
DGST RESDISP+2~, RESDISP+20*, RESDISP+21, PERMDISP+2~, PERMDISP+20*, PERMDISP+21
>> DGTMOT RESMVQ+8*, RESMVQ+16*, PERMMVQ+24, ASK+8*, ASK+21*, ASK+29, EOP+6*
DGXX RESDISP+2~, RESDISP+8*, RESDISP+9, RESDISP+10, RESDISP+18, RESDISP+19, RESDISP+20, RESDISP+24, PERMDISP+2~, PERMDISP+8*
, PERMDISP+9, PERMDISP+10, PERMDISP+18, PERMDISP+19, PERMDISP+20, PERMDISP+24, PERMMVQ+2~, PERMMVQ+3*, PERMMVQ+5, PERMMVQ+7
, PERMMVQ+9, PERMMVQ+11
DGZIP RESDISP+1~, RESDISP+29*, RESDISP+30, PERMDISP+1~, PERMDISP+29*, PERMDISP+30
DIR RESMVQ+2~, PERMMVQ+14~, EOP+1~
DIR("?" RESMVQ+5*, RESMVQ+13*, ASK+4*, ASK+18*
DIR("A" RESMVQ+4*, RESMVQ+12*, ASK+3*, ASK+16*, EOP+3*
DIR("B" RESMVQ+4*, RESMVQ+12*, ASK+16*
DIR(0 RESMVQ+4*, RESMVQ+12*, ASK+3*, ASK+16*, EOP+2*
DIROUT RESMVQ+19, ASK+11, ASK+24, EOP+1~
DIRUT PERMMVQ+15!, ASK+12
DTOUT RESMVQ+2~, RESMVQ+8, RESMVQ+16, ASK+8, ASK+21, EOP+1~, EOP+6
DUOUT RESMVQ+2~, RESMVQ+19, ASK+11, ASK+24, EOP+1~
U RESDISP+18, RESDISP+19, RESDISP+20, RESDISP+24, PERMDISP+18, PERMDISP+19, PERMDISP+20, PERMDISP+24
X RESDISP+2~, PERMDISP+2~, RESMVQ+2~, PERMMVQ+14~, ASK+6, EOP+1~
Y RESDISP+2~, PERMDISP+2~, RESMVQ+2~, RESMVQ+9, RESMVQ+18, PERMMVQ+14~, ASK+6*, ASK+10, ASK+13, ASK+23
EOP+1~
Y(0 ASK+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All