IBCEMCL ;ALB/ESG - Multiple CSA Message Management ;20-SEP-2005
Source file <IBCEMCL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; -- main entry point
|
|
HDR | ; -- header code
|
|
INIT | ; -- init variables and list array
|
|
BLD | ; Build the display area of the list
|
|
INITX | ;
|
|
SET(X,CNT,DATA) | ; Set an entry into the display array and scratch global
; X - visual line to display ; CNT - current record counter ; DATA - 3 piece string IBIFN^IBDA^IB364 (optional) |
|
SETX | ;
|
|
HELP | ; -- help code
|
|
EXIT | ; -- exit code
|
|
UNLOCK | ; unlock any entries that may still be selected
|
|
UNLOCKX | ;
|
|
MARK(IBDA,IBIFN,VALMCNT,INDEX,RESULT) | ; Select/De-select Entry in List.
; This procedure toggles the selection of a status message either ; ON or OFF. It also adds or removes the "*" to the list display. ; If a selection can't be locked, then it will not be selected. ; VALMHDR is killed so ListManager will invoke the header code. |
|
MARKX | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|