IBJU1 ;ALB/ARH - JBI UTILITIES ; 2/14/95
Source file <IBJU1.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 4 | ^DIC Y^DIQ ^DIR ^DIWP |
List Manager | 1 | FULL^VALM1 |
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
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | CMPFLD+1, EXSET+1 |
^UTILITY($J | FSTRNG+1!, FSTRNG+3, FSTRNG+4, FSTRNG+5! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRAY | FSTRNG~, FSTRNG+1!, FSTRNG+5* |
ARRAY( | FSTRNG+4* |
BM | BM+2~*, BM+3 |
C | EXSET+1~*! |
D0 | CMPFLD+1~*, EXSET~, EXSET+1 |
D1 | EXSET~, EXSET+1 |
DIC | PRTCL+1~* |
DIC(0 | PRTCL+1* |
DIR | FASTEXIT+3!, FASTEXIT+5! |
DIR("A" | FASTEXIT+3* |
DIR("B" | FASTEXIT+3* |
DIR(0 | FASTEXIT+3* |
DIRUT | FASTEXIT+4, FASTEXIT+5! |
DIWF | FSTRNG+1~, FSTRNG+2* |
DIWL | FSTRNG+1~, FSTRNG+2* |
DIWR | FSTRNG+1~, FSTRNG+2* |
FILE | CMPFLD~, CMPFLD+1 |
FLD | CMPFLD~, CMPFLD+1 |
IBCNT | FSTRNG+1~*, FSTRNG+3*, FSTRNG+4*, FSTRNG+5 |
>> IBFASTXT | FASTEXIT+4* |
IBI | FSTRNG+1~, FSTRNG+3*, FSTRNG+4 |
IBX | CMPFLD+1~* |
LONG | BM~, BM+2 |
REC | CMPFLD~, CMPFLD+1 |
SHORT | BM~, BM+2 |
STR | FSTRNG~, FSTRNG+2 |
U | CMPFLD+1 |
>> VALM("BM" | BM+3* |
>> VALM("LINES" | BM+3* |
>> VALM("PROTOCOL" | PRTCL+1* |
>> VALM("TM" | BM+3 |
>> VALMBCK | FASTEXIT+1*, BM+3* |
>> VALMMENU | BM+2 |
WD | FSTRNG~, FSTRNG+2 |
X | DATE~, DATE+1, CMPFLD+1~*, CMPFLD+2, EXSET~, EXSET+1, PRTCL~, PRTCL+1, FSTRNG+1~, FSTRNG+2* |
Y | DATE+1~*, DATE+2, CMPFLD+1~, EXSET+1~*, EXSET+2, FASTEXIT+4, PRTCL+1~ |