XOBWPWD ;ALB/MJK - HWSC :: Private Password APIs ; 09/13/10 4:00pm
Source file <XOBWPWD.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Web Services Client | 1 | ^XOB(18.12 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EDIT | ; -- edit PASSWORD from DD
|
|
CLR | ; -- clear to continue
|
|
SET(XOBH,XOBTALK) | ; -- set password in entry
|
|
DEL | ; -- make sure delete is desired
|
|
DIRUT | ; -- set abort flag
|
|
ASK() | ; -- setup to ask user for password
|
|
REASK(XOBH) | ; -- reask user for password
|
|
GET() | ; -- get user input and process for '^' and ''
|
|
ACCEPT(TO) | ; -- read user input character a time; force exit on '^'; echo '*' back
|
|
ENCRYP(XOBX) | ; -- Kernel encode
|
|
DECRYP(XOBH) | ; -- Kernel decode
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("EOFF" | ASK+2, REASK+10 |
^%ZOSF("EON" | EDIT+23, DEL+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | ACCEPT+1~, ACCEPT+3*, ACCEPT+5*, ACCEPT+6, ACCEPT+7*, ACCEPT+8*, ACCEPT+10 |
C | ACCEPT+1~, ACCEPT+5*, ACCEPT+6, ACCEPT+7, ACCEPT+8 |
>> DA | SET+5 |
>> DDS | CLR+1 |
>> DDSHBX | CLR+3 |
DIR | EDIT+1~, EDIT+24! |
DIR("A" | DEL+3* |
DIR(0 | DEL+3* |
DIR0 | EDIT+1~ |
DIRUT | EDIT+9, EDIT+12, EDIT+22, EDIT+24!, DIRUT+1*, ASK+6, REASK+15 |
DUOUT | EDIT+21!, EDIT+22*, ACCEPT+2!, ACCEPT+5* |
DX | CLR+2~, CLR+3* |
DY | CLR+2~, CLR+3* |
E | ACCEPT+1~, ACCEPT+3*, ACCEPT+4, ACCEPT+6* |
FDA | SET+2~ |
FDA( | SET+5* |
>> IOXY | CLR+3 |
TO | ACCEPT~, ACCEPT+3*, ACCEPT+5 |
X | EDIT+5*, EDIT+6!, EDIT+24*, ASK+1~, GET+1*, GET+2, GET+3, GET+4 |
XOBDONE | REASK+1~, REASK+2*, REASK+11, REASK+15*, REASK+21* |
XOBERR | SET+2~, SET+7 |
XOBH | EDIT+1~, EDIT+11*, EDIT+13, EDIT+18, SET~, SET+1, SET+3*, SET+5, ASK+1~, REASK~ , REASK+6, REASK+17, DECRYP~, DECRYP+1 |
XOBI | REASK+1~, REASK+11* |
XOBMATCH | EDIT+1~, EDIT+2*, EDIT+9, EDIT+13*, EDIT+16, REASK+1~, REASK+3*, REASK+6, REASK+8*, REASK+22* , REASK+23 |
XOBTALK | SET~, SET+1 |
XOBX | ASK+1~, ASK+5*, ASK+7, ASK+12, REASK+1~, REASK+13*, REASK+17, ENCRYP~, ENCRYP+1 |
>> Y | DEL+5, ASK+9 |