Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: XUSERNEW

Package: Kernel

Routine: XUSERNEW


Information

XUSERNEW ;SF/RWF - ADD NEW USER ;5/13/08 17:19

Source Information

Source file <XUSERNEW.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;Add
KEYS
EXIT
RE ;Jump from new user to reactivate
REACT ;SEA/WDE-REACTIVATE A USER
RE2
ADD(NP1,KEYS,NONC) ;Common point to do DIC call for adding a new person.
  • ICR #10053
    • Status: Active
    • Usage: Supported
    AX
    REPRINT ;Reprint letter
    LETTER(XUN,ASK) ;Print access letter

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"Without a VERIFY code the user will not be able to sign-on!",$C(7),!
    • Line Location: EN+6
    Function Call: WRITE
    • Prompt: !
    • Line Location: EN+9
    Function Call: WRITE
    • Prompt: !!,"No ACCESS CODE has been entered.",$C(7),!
    • Line Location: RE2+6
    Function Call: WRITE
    • Prompt: !!,"User is still TERMINATED.",$C(7),!
    • Line Location: RE2+7
    Function Call: WRITE
    • Prompt: !,"Without a VERIFY code the user will not be able to sign-on!",$C(7),!
    • Line Location: RE2+8
    Function Call: WRITE
    • Prompt: !,"Name components."
    • Line Location: ADD+10
    Function Call: WRITE
    • Prompt: !,"Now for the Identifiers."
    • Line Location: ADD+16
    Function Call: WRITE
    • Prompt: !?5,"<'",$P(^VA(200,DA,0),U),"' DELETED>"
    • Line Location: ADD+21
    Function Call: WRITE
    • Prompt: !,"Key '",Y,"' not allocated"
    • Line Location: ADD+35
    Info |  Source |  Entry Points |  Interaction Calls