Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: XOBWPWD

Package: Web Services Client

Routine: XOBWPWD


Information

XOBWPWD ;ALB/MJK - HWSC :: Private Password APIs ; 09/13/10 4:00pm

Source Information

Source file <XOBWPWD.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 4 CLRMSG^DDS  FILE^DIE  $$IENS^DILF  ^DIR  
Kernel 2 ^%ZTER  ($$DECRYP,$$ENCRYP)^XUSRB1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Web Services Client 1 ^XOB(18.12  

Entry Points

Name Comments DBIA/ICR reference
GET() ; -- get user input and process for '^' and ''
ASK() ; -- setup to ask user for password
EDIT ; -- edit PASSWORD from DD
ACCEPT(TO) ; -- read user input character a time; force exit on '^'; echo '*' back
DECRYP(XOBH) ; -- Kernel decode
REASK(XOBH) ; -- reask user for password
DEL ; -- make sure delete is desired
DIRUT ; -- set abort flag
SET(XOBH,XOBTALK) ; -- set password in entry
CLR ; -- clear to continue
ENCRYP(XOBX) ; -- Kernel encode

External References

Name Field # of Occurrence
^%ZTER SET+7
CLRMSG^DDS CLR+3
FILE^DIE SET+6
$$IENS^DILF SET+5
^DIR DEL+4
$$DECRYP^XUSRB1 DECRYP+1
$$ENCRYP^XUSRB1 ENCRYP+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("EOFF" ASK+2, REASK+10
^%ZOSF("EON" EDIT+23, DEL+1

Label References

Name Line Occurrences
$$ACCEPT GET+1
$$ASK EDIT+11
$$DECRYP REASK+17
$$ENCRYP ASK+12
$$GET ASK+5, REASK+13
$$REASK EDIT+13
CLR EDIT+10, EDIT+17, ASK+3, ASK+11, REASK+9, REASK+18
DEL ASK+8
DIRUT ASK+9, GET+3
SET EDIT+18

Local Variables

Legend:

>> 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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All