IBJU1 ;ALB/ARH - JBI UTILITIES ; 2/14/95
Source file <IBJU1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
DATE(X) | ; return date in external format
|
|
CMPFLD(FILE,FLD,REC) | ; return value of computed field
|
|
EXSET(X,D0,D1) | ; returns external form of data, given file and field
|
|
FASTEXIT | ; -- IBJ EXIT ACTION: sets flag signaling system should be exited
|
|
BM(LONG,SHORT) | ; called as part of MENU PROTOCOLS HEADER code so display is set up with/without actions listed
; turn on/off display of actions, extends/contracts bottom margin and number of lines of data display |
|
PRTCL(X) | ; resets menu protocol to one passed in
|
|
FSTRNG(STR,WD,ARRAY) | ; returns ARRAY(X) with STR parsed into lines of length WD
|