ABME8DTP ; IHS/ASDST/DMJ - 837 DTP Segment
Source file <ABME8DTP.m>
Package | Total | Call Graph |
---|---|---|
Third Party Billing | 2 | $$Y2KD2^ABMDUTL $$FMT^ABMERUTL |
Name | Comments | DBIA/ICR reference |
---|---|---|
10 | ;segment
|
|
20 | ;DTP01 - Transaction Set Identifier Code
|
|
EP(X,Y,Z,ZZ) | ;EP
; x=entity identifier |
|
30 | ;DTP02 - Date Time Period Format Qualifier
|
|
40 | ;DTP03 - Date Time Period
|
|
LOOP | ;LOOP HERE
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABMEXLM("AA" | LOOP+3 |
Name | Line Occurrences |
---|---|
@( | LOOP+2, LOOP+3 |
LOOP | EP+11 |
Name | Field # of Occurrence |
---|---|
^( | LOOP+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ABM | EP+12! |
ABME | EP+12! |
ABME("RTYPE" | EP+10*, LOOP+3 |
ABMEIC | EP+5*, EP+12!, 20+1 |
>> ABMFDT | EP+7*, 40+2, 40+4, 40+6, 40+8, 40+11*, 40+12 |
>> ABMFMT | EP+6*, 30+1, 40+1, 40+3, 40+5, 40+10 |
>> ABMP("EXP" | LOOP+3 |
>> ABMP("INS" | LOOP+3 |
>> ABMR("DTP" | EP+9!, LOOP+5, 10+1*, 20+1*, 30+1*, 40+2*, 40+4*, 40+8*, 40+9*, 40+12* |
>> ABMREC("DTP" | EP+9!, LOOP+4*, LOOP+5* |
>> ABMTDT | EP+8*, 40+4 |
>> ABMTM | 40+6*, 40+7*, 40+8 |
>> I | LOOP+1*, LOOP+2, LOOP+3, LOOP+5 |
X | EP~, EP+5 |
Y | EP~, EP+6 |
Z | EP~, EP+7 |
ZZ | EP~, EP+8 |