IBTRHLO ;ALB/YMG - Create and send 278 inquiry ;02-JUN-2014
Source file <IBTRHLO.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(IBTRIEN,MSGTYPE) | ; entry point
; IBTRIEN - ien in file 356.22 ; MSGTYPE - 1 for 215, 0 or null for 217 |
|
| ENX | ;
|
|
| EVN | ; create EVN segment
|
|
| IN1 | ; create IN1 segment
|
|
| PRD | ; create PRD segment (X12: NM1, 2010B)
|
|
| CTD | ; create CTD segment
|
|
| PRD2 | ; create PRD segment (X12: PRV, 2010B)
|
|
| GT1 | ; create GT1 segment
|
|
| PID | ; create PID segment
|
|
| G2RPRB | ; create G2R.PRB segment (G2R segment group)
|
|
| G2RPV1 | ; create G2R.PV1 segment (G2R segment group)
|
|
| ZTP | ; create ZTP segments
|
|
| DG1 | ; create DG1 segments
|
|
| PV1 | ; create PV1 segments
|
| 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.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.22 - [#356.22] | EXTERNAL^DILFD |
| 356.223 | EXTERNAL^DILFD |
| ^DIC(36 - [#36] | GET1^DIQ |
| ^IBE(365.013 - [#365.013] | GET1^DIQ |
| ^DIC(5 - [#5] | GET1^DIQ |
| ^HL(779.004 - [#779.004] | GET1^DIQ |
