IBJTED ;ALB/CXW - TPJI EDI STATUS SCREEN ;09-APR-1999
Source file <IBJTED.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; -- main entry point for IBJ TP EDI STATUS
|
|
HDR | ; -- header code
|
|
INIT | ; -- init variables and list array
|
|
INITQ | ||
HELP | ; -- help code
|
|
EXIT | ; -- exit code
|
|
BLD | ;display EDI status information
|
|
E361(IBY) | ; Bill Status Message
; IBY = ien of entry in file 361 |
|
E364(IBZ) | ; EDI Transmit Bill
; IBZ = ien of entry in file 364 |
|
BLDQ | ;
|
|
NONE(IBCH) | ;
|
|
SET(X,CNT) | ;
|
|
SET1(IBT,IBD,COL,WD) | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|