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

Package: Registration

Routine: DG1010P4


Information

DG1010P4 ;ALB/REW - PRINT 1010 CONT'D PART V ; 15 MAR 92

Source Information

Source file <DG1010P4.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Registration 2 ($$DISP,$$POINT,$$UNK)^DG1010P0  PARTV^DG1010P5  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DG1010P3  

Entry Points

Name Comments DBIA/ICR reference
RENAME ;DG1010P4 WAS RENAMED TO DG1010S1
DATE(Y,BL) ;
; Returns the external date value
QDT ;
PARTIV
PT5SET

External References

Name Field # of Occurrence
$$DISP^DG1010P0 PARTIV+5, PARTIV+10, PARTIV+15
$$POINT^DG1010P0 PARTIV+4, PARTIV+5
$$UNK^DG1010P0 PARTIV+9, PARTIV+10, PARTIV+14, PARTIV+15
PARTV^DG1010P5 PT5SET+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?50,"PART IV - MILITARY SERVICE DATA",!,$C(13),DGLUND
  • Line Location: PARTIV+2
Function Call: WRITE
  • Prompt: !,"1A. LAST BRANCH OF SERVICE",?28,"| ","1B. LAST SERVICE NUMBER",?55,"| ","1C. LAST DATE OF ENTRY",?81,"| ","1D. LAST DISCHARGE DATE",?108,"| ","1E. DISCHARGE TYPE"
  • Line Location: PARTIV+3
Function Call: WRITE
  • Prompt: !?4,$$POINT^DG1010P0(DGP(.32),5,23),?28,"| "
  • Line Location: PARTIV+4
Function Call: WRITE
  • Prompt: ?34,$$DISP^DG1010P0(DGP(.32),8),?55,"| ",?61,$$DATE($P(DGP(.32),U,6)),?81,"| ",?87,$$DATE($P(DGP(.32),U,7)),?108,"| ",?114,$E($$POINT^DG1010P0(DGP(.32),4,25),1,17),?131,$C(13),DGLUND
  • Line Location: PARTIV+5
Function Call: WRITE
  • Prompt: !,"2A. PRIOR BRANCH OF SERVICE",?28,"| ","2B. PRIOR SERVICE NUMBER",?55,"| ","2C. PRIOR DATE OF ENTRY",?81,"| ","2D. PRIOR DISCHARGE DATE",?108,"| ","2E. DISCHARGE TYPE",!?4
  • Line Location: PARTIV+7
Function Call: WRITE
  • Prompt: ?131,$C(13),DGLUND
  • Line Location: PARTIV+11
Function Call: WRITE
  • Prompt: !,"3A. PRIOR BRANCH OF SERVICE",?28,"| ","3B. PRIOR SERVICE NUMBER",?55,"| ","3C. PRIOR DATE OF ENTRY",?81,"| ","3D. PRIOR DISCHARGE DATE",?108,"| ","3E. DISCHARGE TYPE"
  • Line Location: PARTIV+13
Function Call: WRITE
  • Prompt: ?131,$C(13),DGLUND,!
  • Line Location: PARTIV+18

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" DATE+7
^DIC(23 - [#23] PARTIV+9, PARTIV+14
^DIC(25 - [#25] PARTIV+10, PARTIV+15
^DPT - [#2] PT5SET, PT5SET+1

Label References

Name Line Occurrences
$$DATE PARTIV+5, PARTIV+10, PARTIV+15
QDT DATE+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BL DATE~
>> DFN PT5SET, PT5SET+1
>> DFN1 PT5SET+1
>> DGBLANK DATE+6
DGBLANK1 PARTIV!
DGBLANK2 PARTIV!
>> DGLUND PARTIV+2, PARTIV+5, PARTIV+11, PARTIV+18
>> DGNA PARTIV+6*, PARTIV+8, PARTIV+9, PARTIV+10, PARTIV+12*, PARTIV+14, PARTIV+15, PARTIV+16
>> DGP( PARTIV+4, PARTIV+5, PARTIV+6, PARTIV+9, PARTIV+10, PARTIV+12, PARTIV+14, PARTIV+15, PT5SET*
>> DGP("DIS" PT5SET+1*
DGPCDIFF PARTIV!
DGSPC PARTIV!
>> I PT5SET*, PT5SET+1*
U PARTIV+5, PARTIV+6, PARTIV+9, PARTIV+10, PARTIV+12, PARTIV+14, PARTIV+15
Y DATE~, DATE+6*, QDT+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All