IBJTTB2 ;ALB/ARH - TPI AR TRANSACTION PROFILE (CONT) ; 07-APR-1995
Source file <IBJTTB2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
BC | ; balance and collection amounts:
; returns: IBBC= total balance ^ total collected ; IBBC(x) = data lable ^ $ balance ^ $ collected |
|
ADDM | ; administrative charges
; returns: IBADDM(x) = data lable ^ $ amount - only if $ amount not 0 |
|
TRCOMM | ; sets TRANS. COMMENTS (433,86) into list manager array for display (if any)
; requires IBRCT8 and IBSTR - contains lable |
|
COMM | ; sets COMMENTS (433,41) into list manager array for display (if any)
; requires IBTRNS - ptr to 433 transaction, IBSTR - lable |
|
BCSCR | ; balance and collection amounts: continuation of screen build
|
|
SETLN(STR,IBX,COL,WD) | ;
|
|
SET(STR,LN) | ; set up TMP array with screen data
|
|
SETQ |