XUS ;SFISC/STAFF - SIGNON ;11/29/2011
Source file <XUS.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CHECKAV(X1) | ;Check A/V code return DUZ or Zero. (Called from XUSRB)
|
|
| LBAV | ;Log Bad AV
|
|
| USER(IX) | ;Build XUSER
|
|
| ASKAV(PRE) | ;Ask and return Access;Verify code, Turn off echo before calling
|
|
| DEVPAS() | ;EF. Ask device password
|
|
| LC | ||
| NO | ;Tell why didn't get on
|
|
| PGM | ;
|
|
| UP(%) | ||
| SET2() | ;EF. Return error code (also called from XUSRB)
|
|
| FAC | ;Failed access
|
|
| A | ||
| C | ;CLOSE
|
|
| B | ||
| H | ;Exit point for all applications
|
|
| UVALID() | ;EF. Is it valid for this user to sign on?
|
|
| XOPT | ;Setup initial XOPT
|
|
| ON | ||
| OK | ||
| ACCEPT(TO) | ;Read A/V and echo '*' char.
|
|
| XUVOL | ;Setup XUENV, XUCI,XQVOL,XUVOL,XUOSVER
|
|
| SET1(FLAG) | ;Setup parameters (also called from XUSRB)
|
|
| CHK() | ;Check that option exeist and LOCK
|
|
| RESTART | ;
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZIS | SET1+5 |
| $$VERSION^%ZOSV | XUVOL+1 |
| GETENV^%ZOSV | XUVOL+1 |
| $$EZBLD^DIALOG | XUS+13 |
| ^DIK | CHECKAV+18 |
| $$FMTE^XLFDT | UVALID+2 |
| $$HTFM^XLFDT | SET2+2 |
| CHEK^XQ83 | OK |
| NEXT^XUS1 | OK+2 |
| USER^XUS1 | B+1 |
| INTRO^XUS1A | XUS+4 |
| $$AUTOXUS^XUS1B | A+4 |
| $$NO^XUS3 | NO+1 |
| CLRFAC^XUS3 | B+6 |
| GETFAC^XUS3 | SET1+7 |
| SEC^XUS3 | B+2 |
| TT^XUS3 | B+5 |
| ^XUSCLEAN | C+1 |
| XMR^XUSCLEAN | A+6 |
| $$EN^XUSHSH | CHECKAV+13, CHECKAV+16 |
| $$INHIBIT^XUSRB | SET2+5 |
| $$CHKASH^XUSRB4 | CHECKAV+5 |
| $$CHKCCOW^XUSRB4 | CHECKAV+6 |
| $$LKCHECK^XUSTZIP | A+2 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZIS(1 - [#3.5] | B+2, PGM+1, SET2+6, SET2+9 |
| ^%ZOSF( | B+4 |
| ^%ZOSF("EON" | ON, SET1+2 |
| ^DD("DILOCKTM" | SET1+12 |
| ^DIC(19 - [#19] | PGM+3, CHK+1 |
| ^VA(200 - [#200] | PGM+2, CHECKAV+13, CHECKAV+14, LBAV+2, USER+1 |
| ^XTV(8989.3 - [#8989.3] | XUVOL+2, XOPT+1, SET1+11 |
| ^XUSEC( | CHK+1 |
| ^XUTL("XQ" | SET1+4! |
| ^XUTL("ZISPARAM" | XUS+5! |
| Name | Line Occurrences |
|---|---|
| $$ACCEPT | ASKAV+2, ASKAV+6 |
| $$ASKAV | A+5 |
| $$CHECKAV | A+8 |
| $$CHK | PGM+1, PGM+2 |
| $$DEVPAS | RESTART+2 |
| $$SET2 | RESTART+1 |
| $$UP | LC, CHECKAV+9 |
| $$UVALID | A+9 |
| B | A+4 |
| FAC | LBAV+1, DEVPAS+2 |
| H | RESTART+2, A+5 |
| LBAV | CHECKAV+13, CHECKAV+17 |
| LC | DEVPAS+2 |
| NO | XUS+12, RESTART+1, RESTART+2, A+2, A+9, B+1, B+2, B+3, PGM+5 |
| OK | PGM+1, PGM+2, PGM+3 |
| RESTART | NO+1 |
| SET1 | XUS+12 |
| USER | A+4, CHECKAV+14 |
| XOPT | SET1+3 |
| XUVOL | SET1+3 |
| Name | Field # of Occurrence |
|---|---|
| ^( | B+4, USER+1 |
| ^("EOFF" | SET1+2 |
| ^("XUS" | XOPT+1 |
| ^(0 | CHK+1 |
| ^(1 | SET2+6 |
| ^(1.1 | LBAV+2*, USER+1 |
| ^(90 | SET2+9 |
| ^(95 | B+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | UP~, CHECKAV+1~, SET1+1~, SET1+8*, SET1+9, SET1+10, SET1+11, SET2+1~, SET2+5* |
| %1 | B!, FAC+1, FAC+2*, CHECKAV+1~, CHECKAV+10*, CHECKAV+14*, CHECKAV+16*, DEVPAS+2* |
| >> %UCI | SET2+4* |
| >> %ZIS | SET1+5* |
| A | ACCEPT+2~*, ACCEPT+4*, ACCEPT+5, ACCEPT+6*, ACCEPT+7*, ACCEPT+9 |
| AV | A+5*, A+6, A+7, A+8! |
| C | ACCEPT+2~, ACCEPT+4*, ACCEPT+5, ACCEPT+6, ACCEPT+7 |
| DA | CHECKAV+1~, CHECKAV+18* |
| DIK | CHECKAV+1~, CHECKAV+18* |
| >> DILOCKTM | SET1+12* |
| DT | SET2+2*, SET2+9, UVALID+3 |
| DTIME | B+4*, SET2+8* |
| DUOUT | ACCEPT+2!, ACCEPT+4* |
| DUZ | A+4*, A+6*, A+8*, B+1, B+2, B+3, PGM+2, CHK+1, FAC+1, SET1+4* , SET2+3!, SET2+4*, UVALID+1 |
| DUZ("AG" | SET2+4* |
| DUZ("ASH" | PGM+3, UVALID+4 |
| DUZ("BUF" | B+4 |
| DUZ("LANG" | SET1+3* |
| DUZ(0 | SET1+4*, SET2+4* |
| DUZ(2 | SET2+4* |
| E | ACCEPT+2~*, ACCEPT+3, ACCEPT+5* |
| FLAG | SET1~, SET1+5 |
| >> I | XOPT+2*, SET2+7* |
| IEN | CHECKAV+1~, CHECKAV+2*, CHECKAV+4, CHECKAV+5*, CHECKAV+6*, CHECKAV+14*, CHECKAV+19, LBAV+2 |
| IO("IP" | B+6, SET1+7 |
| IO("ZIO" | XUS+14 |
| ION | SET1+4*, SET1+6 |
| >> IOP | SET1+5* |
| >> IOS | SET1+4*, SET1+6 |
| IX | USER~, USER+1 |
| >> PGM | A+6*, OK+1* |
| >> POP | XUS+12, SET1+5 |
| PRE | ASKAV~, ASKAV+1*, ASKAV+2, ASKAV+6 |
| TO | ACCEPT~, ACCEPT+2*, ACCEPT+4 |
| U | XUS+4*, XUS+11*, XUS+14, RESTART+2, A+2, A+4, B+4, CHK+1, LBAV+2, XUVOL+1* , XOPT+2, SET1+2*, SET1+3, SET1+8, SET2+7, SET2+9, UVALID+2, UVALID+3, UVALID+5, DEVPAS+2 |
| X | A+4*, B+4*, LC*, NO+1*, ASKAV+1~, ASKAV+2*, ASKAV+3*, ASKAV+4*, ASKAV+5, ASKAV+6* , ASKAV+7, CHECKAV+1~, CHECKAV+10*, CHECKAV+11, CHECKAV+13*, CHECKAV+14, CHECKAV+16*, CHECKAV+17, LBAV+2*, XUVOL+2* , SET2+1~, SET2+6*, SET2+7, DEVPAS+1*, DEVPAS+2* |
| X1 | CHECKAV~, CHECKAV+4, CHECKAV+5, CHECKAV+6, CHECKAV+9*, CHECKAV+10, CHECKAV+16 |
| >> XMCHAN | A+6* |
| >> XOPT | A+2, B+4, XOPT+1*, XOPT+2*, SET1+3, SET1+8, SET2+7*, SET2+9 |
| >> XQUR | A*, A+7* |
| >> XQVOL | XUVOL+1*, XUVOL+2 |
| >> XQXFLG("GUI" | XUS+11* |
| >> XQY | PGM+1*, PGM+2*, PGM+3* |
| >> XU1 | RESTART+2, SET2+6*, DEVPAS+2 |
| >> XUA | A+6*, OK+1* |
| >> XUCI | XUS+14, XUVOL+1* |
| >> XUDEV | B+2, PGM+1, SET1+4*, SET1+6*, SET1+11, SET2+6, SET2+9 |
| >> XUENV | XUS+14, XUVOL+1* |
| >> XUEOFF | A+5, SET1+2*, DEVPAS+1 |
| >> XUEON | A+5, B, SET1+2*, DEVPAS+1 |
| XUF | B!*, FAC+2, CHECKAV+10, CHECKAV+16, LBAV+1, SET1+4*, SET1+10*, SET1+11*, DEVPAS+2 |
| XUF( | FAC+1*, FAC+2*, CHECKAV+14*, SET1+10* |
| >> XUFAC | A+2* |
| >> XUFAC(1 | CHECKAV+18 |
| >> XUHALT | A+2* |
| >> XUIOP | SET1+6* |
| >> XUM | XUS+12*, RESTART+1*, RESTART+2*, A+2*, A+9*, B+1, B+2, PGM+4* |
| >> XUM(0 | UVALID+2* |
| >> XUNOW | SET2+2*, UVALID+2 |
| >> XUOSVER | XUVOL+1* |
| XUSER | SET2+3! |
| XUSER( | USER+1*, UVALID+2 |
| XUSER(0 | A*, A+4, USER+1*, SET2+4*, UVALID+3, UVALID+5 |
| XUSER(1 | A*, CHECKAV+17, USER+1*, SET2+4* |
| >> XUSTMP(51 | XUS+13*, ASKAV+2 |
| >> XUSTMP(52 | XUS+13*, ASKAV+6 |
| >> XUTT | B+5, CHECKAV+9*, SET2+4* |
| >> XUVOL | XUVOL+2* |
| Y | PGM+1*, PGM+2*, PGM+3*, CHK+1, ASKAV+1~, ASKAV+6*, CHECKAV+1~, XUVOL+1 |