IBTRH8 ;ALB/JWS - HCSR Worklist - view 278 message in X12 format ;24-AUG-2015
Source file <IBTRH8.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; display message in X12 format
; IBTRIEN = ien of file 356.22 ; MSGTYPE = 217 or 215 ; RR = 0 for request / inquiry, 1 for response |
|
PER | ; create PER segment in loop 2010B
|
|
PRV | ; create PRV segment (X12: PRV, 2010B)
|
|
NM1 | ; create NM1 segment (X12: NM1, 2010C)
|
|
NM12010D | ; create NM1 segment, loop 2010D
|
|
EVENT | ; 2000E loop
; create G2R.PRB segment (G2R segment group) |
|
REF | ; REF segment
|
|
DTP | ; create DTP segments
|
|
HI | ; create HI segments
|
|
HSD | ; create HSD segment
|
|
CRC | ; create CRC and CL1 segments in loop 2000E
|
|
CR1 | ; create CR1 segment
|
|
CR2 | ; create CR2 segment
|
|
PWK | ; create the PWK segment loop 2000E
|
|
MSG | ; create the MSG segment loop 2000E
|
|
SAVE(X) | ;
|
|
ERROR | ;
|
|
PERR | ; PER segment for response loop 2010A
|
|
HCR | ; HCR segment for response loop 2000E
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^IBE(353.1 - [#353.1] | GET1^DIQ |
^IBA(355.3 - [#355.3] | GET1^DIQ |
^IBT(356.001 - [#356.001] | GET1^DIQ |
^IBT(356.002 - [#356.002] | GET1^DIQ |
^IBT(356.003 - [#356.003] | GET1^DIQ |
^IBT(356.004 - [#356.004] | GET1^DIQ |
^IBT(356.005 - [#356.005] | GET1^DIQ |
^IBT(356.006 - [#356.006] | GET1^DIQ |
^IBT(356.007 - [#356.007] | GET1^DIQ |
^IBT(356.008 - [#356.008] | GET1^DIQ |
^IBT(356.009 - [#356.009] | GET1^DIQ |
^IBT(356.01 - [#356.01] | GET1^DIQ |
^IBT(356.011 - [#356.011] | GET1^DIQ |
^IBT(356.012 - [#356.012] | GET1^DIQ |
^IBT(356.018 - [#356.018] | GET1^DIQ |
^IBT(356.02 - [#356.02] | GET1^DIQ |
^IBT(356.021 - [#356.021] | GET1^DIQ |
^IBT(356.22 - [#356.22] | EXTERNAL^DILFD |
356.223 | EXTERNAL^DILFD |
^DIC(36 - [#36] | GET1^DIQ |
^IBE(365.013 - [#365.013] | GET1^DIQ |
^IBE(365.015 - [#365.015] | GET1^DIQ |
^IBE(365.016 - [#365.016] | GET1^DIQ |
^IBE(365.025 - [#365.025] | GET1^DIQ |
^DIC(5 - [#5] | GET1^DIQ |
^HL(779.004 - [#779.004] | GET1^DIQ |