DGPTRI3 ;ALB/JDS/MJK/BOK,ISF/GJW,HIOFO/FT - PTF TRANSMISSION ;4/23/15 8:59am
Source file <DGPTRI3.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Registration | 4 | DGPTC1 DGPTF4 DGPTFVC DGPTRI2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
535 | ; -- setup 535 transactions
|
|
PHY | ; -- set up physical mvt
|
|
ENTER | ||
ENTER0 | ||
SAVE | ;
|
|
Q | ||
VERCHK(REC) | ; -- check version for all diagnosis and procedure codes
|
|
CPTDATA | ; -- get 801 movement Diagnosis Data in DG801(i,j,"DATA")
; 801 movement uses CPT Record date instead of 701 type dates |
Name | Field # of Occurrence |
---|---|
$$TSDATA^DGACT | PHY+7, PHY+17 |
$$STR401^DGPTFUT | VERCHK+34 |
$$STR501^DGPTFUT | VERCHK+18 |
$$STR601^DGPTFUT | VERCHK+26 |
$$STR701^DGPTFUT | VERCHK+10 |
EFFDATE^DGPTIC10 | VERCHK+5 |
CDR^DGPTRI2 | PHY+3, PHY+13 |
SAVE^DGPTRI2 | SAVE+1 |
$$CS^ICDEX | VERCHK+6, VERCHK+7, CPTDATA+6 |
$$CSI^ICDEX | VERCHK+12, VERCHK+20, VERCHK+28, VERCHK+36, VERCHK+44, CPTDATA+12 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCPT(46 - [#46] | CPTDATA+8, CPTDATA+10 |
^DGPT - [#45] | 535+5, PHY+11, VERCHK+9, VERCHK+17, VERCHK+25, VERCHK+33, VERCHK+41, CPTDATA+4, CPTDATA+5, CPTDATA+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | VERCHK+1~, VERCHK+9*, VERCHK+10*, VERCHK+11, VERCHK+18*, VERCHK+19, VERCHK+26*, VERCHK+27, VERCHK+34*, VERCHK+35 , VERCHK+41*, VERCHK+42*, VERCHK+43 |
CODSYSD | VERCHK+1~, VERCHK+6*, VERCHK+13, VERCHK+21, VERCHK+45 |
CODSYSP | VERCHK+1~, VERCHK+7*, VERCHK+29, VERCHK+37 |
>> DG801( | CPTDATA+6*, CPTDATA+8, CPTDATA+10*, CPTDATA+11, CPTDATA+17! |
DGARRX | PHY+6~, PHY+7*, PHY+16~, PHY+17* |
DGARRY | PHY+6~, PHY+7, PHY+16~, PHY+17 |
DGARRY(7 | PHY+8, PHY+18 |
DGCPTDT | CPTDATA+2~, CPTDATA+6* |
DGCPTSYS | CPTDATA+2~, CPTDATA+6*, CPTDATA+13 |
>> DGERR | VERCHK+51*, VERCHK+52*, VERCHK+53*, VERCHK+54*, VERCHK+55*, VERCHK+56* |
>> DGHEAD | PHY+1 |
DGICD | VERCHK+1~, VERCHK+11*, VERCHK+12, VERCHK+19*, VERCHK+20, VERCHK+27*, VERCHK+28, VERCHK+35*, VERCHK+36, VERCHK+43* , VERCHK+44, CPTDATA+11*, CPTDATA+12 |
DGM | 535+5*, PHY+3, PHY+7, PHY+8*, PHY+9, PHY+24, PHY+26! |
DGPTDAT | VERCHK+2~ |
DGPTF | VERCHK+1~ |
>> DGTD | 535+5*, PHY+1, PHY+11 |
EFFDATE | VERCHK+2~, VERCHK+6, VERCHK+7 |
ERR1 | VERCHK+1~, VERCHK+11, VERCHK+13*, VERCHK+55 |
ERR2 | VERCHK+1~, VERCHK+19, VERCHK+21*, VERCHK+52 |
ERR3 | VERCHK+1~, VERCHK+27, VERCHK+29*, VERCHK+53 |
ERR4 | VERCHK+1~, VERCHK+35, VERCHK+37*, VERCHK+51 |
ERR5 | VERCHK+1~, VERCHK+43, VERCHK+45*, VERCHK+54 |
ERR6 | VERCHK+1~, VERCHK+56, CPTDATA+11, CPTDATA+13* |
F | CPTDATA+7*, CPTDATA+15*, CPTDATA+17, CPTDATA+20! |
FLD | VERCHK+1~ |
H | CPTDATA+2~, CPTDATA+3*, CPTDATA+4*, CPTDATA+5 |
I | 535+5*, VERCHK+1~, VERCHK+17*, VERCHK+18, VERCHK+25*, VERCHK+26, VERCHK+33*, VERCHK+34, CPTDATA+2~, CPTDATA+3* , CPTDATA+5*, CPTDATA+6, CPTDATA+20! |
I2 | CPTDATA+2~, CPTDATA+4*, CPTDATA+6, CPTDATA+8, CPTDATA+10, CPTDATA+11, CPTDATA+17* |
ICD | VERCHK+1~, VERCHK+11*, VERCHK+19*, VERCHK+27*, VERCHK+35*, VERCHK+43* |
IEN | CPTDATA+2~ |
IMPDATE | VERCHK+2~ |
J | 535+5, PHY+11, VERCHK+1~ |
K | CPTDATA+2~, CPTDATA+7*, CPTDATA+8*, CPTDATA+10, CPTDATA+20! |
K1 | CPTDATA+2~, CPTDATA+7*, CPTDATA+9*, CPTDATA+10, CPTDATA+11, CPTDATA+20! |
L | PHY+9*, PHY+19*, PHY+24*, PHY+26!, ENTER, ENTER0, CPTDATA+2~, CPTDATA+11* |
M | VERCHK+1~, VERCHK+17* |
N | CPTDATA+2~, CPTDATA+3*, CPTDATA+20! |
>> PTF | CPTDATA+4, CPTDATA+5, CPTDATA+6, CPTDATA+8 |
REC | VERCHK~, VERCHK+3, VERCHK+5, VERCHK+9, VERCHK+10, VERCHK+17, VERCHK+18, VERCHK+25, VERCHK+26, VERCHK+33 , VERCHK+34, VERCHK+41 |
>> T1 | 535+5, PHY+1 |
>> T2 | 535+5 |
U | 535+5, PHY+3, PHY+7, PHY+8, PHY+13, PHY+17, PHY+18, PHY+24, ENTER, ENTER0 , VERCHK+11, VERCHK+19, VERCHK+27, VERCHK+35, VERCHK+42, VERCHK+43, CPTDATA+6, CPTDATA+10, CPTDATA+11 |
VER | VERCHK+1~ |
X | PHY+1*, PHY+9*, PHY+11*, PHY+13, PHY+17, PHY+18*, PHY+24*, PHY+26!, ENTER, ENTER0 , VERCHK+1~, VERCHK+12*, VERCHK+13, VERCHK+20*, VERCHK+21, VERCHK+28*, VERCHK+29, VERCHK+36*, VERCHK+37, VERCHK+44* , VERCHK+45, CPTDATA+12*, CPTDATA+13 |
Y | PHY+1*, ENTER*, ENTER0*, VERCHK+1~ |
Z | PHY+3*, PHY+9*, PHY+11*, PHY+13*, PHY+19*, PHY+24*, PHY+26!, ENTER, ENTER0 |