IBCEOB2 ;ALB/TMP - EOB LIST FOR MANUAL MAINTENANCE ;18-FEB-99
Source file <IBCEOB2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Enter/edit an EOB manually for a bill
; MRA's cannot be manually entered |
|
HDR | ; -- header code
|
|
INIT | ; -- init variables and list array
; Select bill |
|
INITQ | ||
HELP | ; -- help code
|
|
EXIT | ; -- exit code
|
|
BLD | ; Build list template display - IBIFN must equal ien of bill in file 399
|
|
SET(X,CNT,IBEOB) | ;set list manager screen arrays
|
|
BILL(VALMQUIT,IBX) | ; Select bill
; VALMQUIT = pass by reference to determine if protocol should quit ; IBX = pass by reference to return 1 if timeout or ^ entered |
|
BILLQ |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^IBM(361.1 - [#361.1] | EXTERNAL^DILFD |
^DGCR(399 - [#399] | Classic Fileman Calls, EXTERNAL^DILFD |