ASDUSR1 ; IHS/ADC/PDW/ENM - DISPLAY USER SETUP ; [ 03/25/1999 11:48 AM ]
Source file <ASDUSR1.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 4 | (,HOME)^%ZIS ^%ZISC ^%ZTLOAD $$REPEAT^XLFSTR |
IHS Changes To Scheduling | 1 | ^ASDUSL1 |
IHS VA Utilities | 1 | ($$VAL,$$VALI)^XBDIQ1 |
VA Fileman | 1 | ^DIC |
Package | Total | Caller Graph |
---|---|---|
IHS Changes To Scheduling | 1 | ASDUSL1 |
Scheduling | 1 | SD IHS USER DISPLAY |
Name | Comments | DBIA/ICR reference |
---|---|---|
DISP | ;EP; -- display user data
|
|
SET(DATA) | ; -- sets ^tmp
|
|
HDR | ; -- header
|
|
KEYS | ; -- display user's sd keys and descriptions
|
|
DEV | ; -- ask for device
|
|
PAD(DATA,LENGTH) | ; -- SUBRTN to pad length of data
|
|
ACCESS | ; -- display access to restricted clinics
|
|
; -- print list if sent to a printer
|
||
EXIT | ; -- eoj
|
|
OVERBK | ; -- display overbook level
|
|
ASK | ; -- ask for user name
|
|
SP(NUM) | ; -- SUBRTN to pad spaces
|
|
MSTOV() | ; -- returns whether user has master ovbk in clinic
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(19.1 - [#19.1] | KEYS+3, KEYS+5 |
^SC - [#44] | MSTOV+2 |
^SC("AIHSOV" | OVERBK+6, OVERBK+8 |
^SC("AIHSPRIV" | ACCESS+2, ACCESS+4 |
^TMP("ASDUSL1" | DISP+2!, PRINT+3, PRINT+5, SET+1*, SET+2* |
^XUSEC( | KEYS+4 |
^XUSEC("AGZDOG" | KEYS+7 |
^XUSEC("SDMOB" | OVERBK+2 |
^XUSEC("SDOB" | OVERBK+4 |
Name | Line Occurrences |
---|---|
$$MSTOV | OVERBK+9 |
$$PAD | DISP+3, DISP+5, SP+1 |
$$SP | KEYS+6, KEYS+8, OVERBK+3, OVERBK+5, OVERBK+7, OVERBK+9, ACCESS+3, ACCESS+7 |
ACCESS | DISP+9 |
ASK | ASDUSR1+4 |
DEV | ASDUSR1+5 |
DISP | ASDUSR1+7 |
EXIT | ASDUSR1+4, ASDUSR1+5, ASDUSR1+6, PRINT+6 |
HDR | PRINT+2, PRINT+4 |
KEYS | DISP+9 |
OVERBK | DISP+9 |
DISP+10 | |
SET | DISP+8, KEYS+6, KEYS+8, OVERBK+3, OVERBK+5, OVERBK+7, OVERBK+9, ACCESS+2, ACCESS+3, ACCESS+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %ZIS | DEV+1* |
ASDL | DISP+1~, DISP+3*, DISP+5*, DISP+7*, DISP+8, PRINT+1~, PRINT+2*, PRINT+3*, PRINT+5 |
ASDLN | EXIT+1!, DISP+2*, SET+1*, SET+2 |
ASDPG | PRINT+1~, PRINT+2*, HDR+1* |
ASDQ | ASDUSR1+3*, ASDUSR1+4, ASDUSR1+5, EXIT+1!, ASK+4*, DEV+1*, DEV+2* |
ASDU | EXIT+1!, ASK+5*, DISP+3, DISP+4, DISP+6, KEYS+4, KEYS+7, OVERBK+2, OVERBK+4, OVERBK+6 , OVERBK+8, MSTOV+2, ACCESS+2, ACCESS+4 |
ASDX | KEYS+1~, KEYS+2*, KEYS+3*, KEYS+4, KEYS+5, OVERBK+1~, OVERBK+8*, OVERBK+9, MSTOV+2, ACCESS+1~ , ACCESS+4*, ACCESS+5, ACCESS+6, ACCESS+7 |
ASDY | KEYS+1~, KEYS+5*, KEYS+6 |
DATA | SET~, SET+1, PAD~, PAD+1 |
DIC | ASK+1~, ASK+2* |
DIC("A" | ASK+2* |
DIC("S" | ASK+3* |
DIC(0 | ASK+2* |
DT | ACCESS+6 |
IO | PRINT+1 |
IO("Q" | DEV+2, DEV+5! |
IOF | HDR+1 |
IOSL | PRINT+4 |
IOST | ASDUSR1+6, DISP+10 |
LENGTH | PAD~, PAD+1 |
NUM | SP~, SP+1 |
>> POP | DEV+1 |
U | ASK+4, DISP+3, MSTOV+2 |
X | ASK+1~, ASK+4, DISP+4*, DISP+5, DISP+6*, DISP+7, MSTOV+1~, MSTOV+2*, MSTOV+3, ACCESS+6* |
Y | ASK+1~, ASK+4, ASK+5 |
>> ZTDESC | DEV+3* |
>> ZTRTN | DEV+3* |
>> ZTSAVE("ASDU" | DEV+4* |
ZTSK | DEV+5! |