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 |
|