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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DGPTRI2

Package: Registration

Routine: DGPTRI2


Information

DGPTRI2 ;ALB/JDS/MJK/MTC/ADL/TJ/BOK,ISF/GJW,HIOFO/FT - PTF TRANSMISSION ;4/20/15 9:18am

Source Information

Source file <DGPTRI2.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Registration 7 $$TSDATA^DGACT  PTFICD^DGPTFUT  EFFDATE^DGPTIC10  START^DGPTRI1  535^DGPTRI3  701^DGPTRI4  $$FMTICD^DGPTRNU  
DRG Grouper 1 $$ICDDATA^ICDXCODE  
Kernel 1 ($$LJ,$$REPEAT)^XLFSTR  
VA FileMan 1 $$GET1^DIQ  

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

Package Total Caller Graph
Registration 3 DGPTRI0  DGPTRI3  DGPTRI4  

Entry Points

Name Comments DBIA/ICR reference
501 ; -- setup 501 transactions
; DG*636
MOV ; build movement record
535 ; -- do 535's
PROC ; -- setup 601 transactions
601
701 ; -- setup 701 transaction
ENTER
ENTER0
SAVE ;save segment to MailMan message and ^TMP("AEDIT",$J), if data is valid
Q
FILL ;fill out segment with spaces
CDR

External References

Name Field # of Occurrence
$$TSDATA^DGACT MOV+9, MOV+44, 601+6
PTFICD^DGPTFUT MOV+23, 601+17
EFFDATE^DGPTIC10 MOV+21, 601+14
START^DGPTRI1 SAVE+3
535^DGPTRI3 535+1
701^DGPTRI4 701+1
$$FMTICD^DGPTRNU MOV+29
$$GET1^DIQ MOV+36
$$ICDDATA^ICDXCODE MOV+26, 601+21
$$LJ^XLFSTR MOV+30
$$REPEAT^XLFSTR MOV+34, 601+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"More than one procedure record on same date/time"
  • Line Location: 601+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGPT - [#45] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPT - [#45] 501+3, 501+11, MOV+38, MOV+39, 601, 601+1
^TMP("AEDIT" SAVE+4*
^UTILITY($J PROC+1!, 601+1*, 601+2
^XMB(3.9 - [#3.9] SAVE+17*, SAVE+18*

Label References

Name Line Occurrences
535 501+11
601 601, 601+1, 601+28
701 601
CDR MOV+6, MOV+41
ENTER MOV+18, 601+11
ENTER0 MOV+12, MOV+16, MOV+47, 601+9, 601+13
FILL SAVE+8
MOV 501+15
SAVE MOV+54, 601+28

Naked Globals

Name Field # of Occurrence
^( 501+3, MOV+38, MOV+39, 601, 601+1
^(0 501+3, MOV+38, MOV+39

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DG501CODES MOV+22~, MOV+23
DG501CODES( MOV+25, MOV+26, MOV+28, MOV+31
DG501DX MOV+22~, MOV+28*, MOV+29*, MOV+30*, MOV+33
DG501POA MOV+22~, MOV+31*, MOV+32*, MOV+33
>> DG502 MOV+18*
>> DG57 MOV+18
DG601CODES 601+16~, 601+17
DG601CODES( 601+19, 601+20, 601+21
>> DG70 MOV+49, MOV+50
>> DGACNT SAVE+4*
>> DGAO 501+12*
DGARRX MOV+8~, MOV+9*, MOV+43~, MOV+44*, 601+5~, 601+6*
DGARRY MOV+8~, MOV+9, MOV+43~, MOV+44, 601+5~, 601+6
DGARRY(7 MOV+10, MOV+45, 601+7
>> DGCDR MOV+1*, MOV+6
DGCMVT 501+3!*, 501+14
>> DGCNT SAVE+17*, SAVE+18*
DGEC 501+2~, 501+13*
>> DGERR 601+2*, SAVE+4, SAVE+7
>> DGHEAD MOV+4, 601+3
DGHNC 501+2~, 501+13*
DGIR 501+2~, 501+12*
DGLOOP MOV+22~, MOV+24*, MOV+25*, MOV+26, MOV+28, MOV+31, 601+16~, 601+18*, 601+19*, 601+20
, 601+21
>> DGM 501+11*, 501+12, 501+13, 501+15, MOV+1, MOV+2*, MOV+9, MOV+10*, MOV+12
DGM2 501+2~, 501+11*
DGMPOA 501+2~, 501+11*
DGMST 501+2~, 501+13*
DGPCODE 601+16~, 601+20*, 601+23
>> DGPROC 601*, 601+1
>> DGPROCD 601+1*, 601+2, 601+3
DGPROCNODE 601+16~
DGPTDAT 601+14~
DGPTMCNT 501+2~, 501+12*
DGPTMVDT 501+2~, 501+13*
DGPTTMP MOV+22~, MOV+26*, MOV+27, 601+16~, 601+21*, 601+22
DGSC 501+2~, 501+12*
DGSTRING MOV+22~, MOV+24*, MOV+33*, MOV+34, 601+16~, 601+18*, 601+23*, 601+24
>> DGTD 501+13*, 501+14*, 501+15, MOV+4, MOV+38, MOV+39, MOV+49
>> DGXMZ SAVE+17, SAVE+18
DGY1 SAVE+1~, SAVE+2*, SAVE+9*, SAVE+10*, SAVE+11*, SAVE+12*, SAVE+13*, SAVE+14*, SAVE+15*, SAVE+16
, SAVE+17
DGY2 SAVE+1~, SAVE+2*, SAVE+9*, SAVE+10*, SAVE+11*, SAVE+12*, SAVE+13*, SAVE+14*, SAVE+15*, SAVE+16
, SAVE+18
EFFDATE MOV+20~, MOV+26, 601+14~, 601+21
>> I 501+11*, 501+14, MOV+18, MOV+23, MOV+38, MOV+49, MOV+50, PROC+1*, 601*, 601+1
, 601+17
IMPDATE MOV+20~, 601+14~
>> J 501+3, 501+11, MOV+21, MOV+23, MOV+36, MOV+38, MOV+39, 601, 601+1, 601+14
, 601+17
>> K FILL+1*
>> L MOV+2*, MOV+12*, MOV+16*, MOV+18*, MOV+47*, 601+9*, 601+11*, 601+13*, ENTER, ENTER0
>> T1 501+15, MOV+4, MOV+38, MOV+39, MOV+49, MOV+50, 601+1, 601+3
>> T2 501+3, 501+14, 501+15, MOV+49, 601+1
U 501+12, 501+13, 501+15, MOV+1, MOV+2, MOV+9, MOV+10, MOV+16, MOV+26, MOV+27
, MOV+28, MOV+31, MOV+41, MOV+44, MOV+45, MOV+49, MOV+50, 601+6, 601+7, 601+11
, 601+20, 601+21, ENTER, ENTER0
>> X MOV+4*, MOV+12*, MOV+16*, MOV+18*, MOV+36*, MOV+37*, MOV+38*, MOV+39*, MOV+41, MOV+44
, MOV+45*, 601*, 601+3, 601+6, 601+7*, 601+11*, ENTER, ENTER0
>> Y MOV+4*, MOV+18, MOV+34*, MOV+36*, MOV+49*, MOV+50*, 601+3*, 601+24*, ENTER*, ENTER0*
, SAVE+4, SAVE+9, SAVE+10, SAVE+11, SAVE+12, SAVE+13, SAVE+14, SAVE+15, FILL+1*, FILL+2*
, CDR*
>> Z MOV+6*, MOV+12*, MOV+16*, MOV+18*, MOV+38*, MOV+39*, MOV+41*, MOV+47*, 601+9*, 601+11*
, 601+13*, ENTER, ENTER0, CDR
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 |  Naked Globals |  Local Variables |  All