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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: XQABGEN

Package: Toolkit

Routine: XQABGEN


Information

XQABGEN ;ISC-SF/JLI - GENERATE ALPHA/BETA TEST INITIALIZATION ROUTINE ;1/21/93 11:50 ;

Source Information

Source file <XQABGEN.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 ^DIC  

Entry Points

Name Comments DBIA/ICR reference
XCLUD1
VERS
FINISH
UCASE
ADRESS
ABTEST
NMSPAC
KILL
XCLUD
ENTRY
MESG

External References

Name Field # of Occurrence
^DIC ENTRY, ADRESS+2

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: ABTEST+0
Function Call: WRITE
  • Prompt: !!,"Is this version of the ",XQABPKG,!?5,"an Alpha or Beta test version (Y/N) ? "
  • Line Location: ABTEST+0
Function Call: WRITE
  • Prompt: $C(7)," ??",!!,"ANSWER EITHER YES OR NO OR '^' TO EXIT"
  • Line Location: ABTEST+0
Function Call: WRITE
  • Prompt: !!,"Enter as an adressee for installation messages a mailgroup in NETWORK MAIL",!,"format, e.g., G.GROUPNAME@DOMAIN.NAME"
  • Line Location: ADRESS+0
Function Call: WRITE
  • Prompt: " This same address will",!,"be used for reports on Alpha/Beta Option Usage"
  • Condition for execution: XQABTEST
  • Line Location: ADRESS+0
Function Call: READ
  • Prompt: "Addressee: "
  • Formatting: !?10
  • Timeout: DTIME
  • Variable: X
  • Line Location: ADRESS+1
Function Call: WRITE
  • Prompt: $C(7)," ??"
  • Line Location: ADRESS+1
Function Call: READ
  • Prompt: "Do you want a message returned upon installation (Y/N) ? "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: MESG+0
Function Call: WRITE
  • Prompt: $C(7)," ??",!,"ENTER Y (YES) OR N (NO) OR '^' TO EXIT"
  • Line Location: MESG+0
Function Call: READ
  • Prompt: "ENTER Version Number: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: VERS+0
Function Call: WRITE
  • Prompt: !,"Enter the version number as nVm or nTm where n and m are numbers,",!,"and n may have one decimal place.",!!
  • Line Location: VERS+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: XCLUD+0
Function Call: WRITE
  • Prompt: !!,"ENTER 'Y' OR 'YES' IF SOME OPTIONS BEGINNING WITH '",XQABOPT,"' SHOULD BE",!,"EXCLUDED FROM THE ANALYSIS, E.G., '",XQABOPT,"A'"
  • Line Location: XCLUD+1
Function Call: READ
  • Prompt: "Enter ANOTHER namespace used by options in this package: "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: NMSPAC+0
Function Call: WRITE
  • Prompt: !,"If this package supports options with names which begin with ANOTHER namespace",!,"than ",$S(XQABOPTN=1:"that",1:"those")," already entered, then enter THAT namespace now."
  • Line Location: NMSPAC+1
Function Call: WRITE
  • Prompt: !,"The namespace or prefix must be four or fewer characters long, beginning",!,"with a letter and followed by letters and/or digits. Enter a RETURN if there",!,"are no additional namespaces to include."
  • Line Location: NMSPAC+3
Function Call: READ
  • Prompt: "Enter the FULL namespace or prefix to be excluded: "
  • Formatting: !!?10
  • Timeout: DTIME
  • Variable: X
  • Line Location: XCLUD1+0
Function Call: WRITE
  • Prompt: $C(7)," ??",!,"Enter the namespace to exclude as",!?15,"'",XQABOPT,"' followed by one or more letters or digits."
  • Line Location: XCLUD1+1
Function Call: WRITE
  • Prompt: " OK"
  • Line Location: XCLUD1+2
Routine Call
  • DIC
  • Line Location:
    • ENTRY
    • ADRESS+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("LOAD" ENTRY+2
^%ZOSF("SAVE" FINISH
^DIC(9.4 - [#9.4] ENTRY+1
^TMP($J ENTRY+2!, ENTRY+3, ENTRY+4*, ABTEST+1*, ADRESS+2*, MESG+1*, VERS+1*, VERS+2*, NMSPAC+2*, KILL+1!
, XCLUD1+2

Label References

Name Line Occurrences
ABTEST ABTEST
ADRESS ADRESS+1, ADRESS+2
FINISH MESG+2
KILL ABTEST, ADRESS+1, MESG, XCLUD, NMSPAC
MESG MESG
NMSPAC NMSPAC+1, NMSPAC+3
UCASE ADRESS+1, NMSPAC+2, XCLUD1
VERS VERS
XCLUD XCLUD+1, NMSPAC+2
XCLUD1 XCLUD+2, XCLUD1+1, XCLUD1+3

Naked Globals

Name Field # of Occurrence
^(0 ENTRY+3*, XCLUD1+2*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIC ENTRY*, ADRESS+2*, KILL!
DIC(0 ENTRY*, ADRESS+2*
DIE FINISH*, KILL!
DIF ENTRY+2*, KILL!
>> DKP ENTRY*, ENTRY+1
>> DKP(0 ENTRY+1*
DTIME ABTEST, ADRESS+1, MESG, VERS, XCLUD, NMSPAC, XCLUD1
I KILL!, UCASE*
U ENTRY+1, ABTEST, ADRESS+1, ADRESS+2, MESG, XCLUD, NMSPAC, XCLUD1
X ENTRY+2*, ABTEST*, ABTEST+1, ADRESS+1*, ADRESS+2*, MESG*, MESG+1, VERS*, VERS+1, XCLUD*
, XCLUD+1, XCLUD+2, NMSPAC*, NMSPAC+1, NMSPAC+2, NMSPAC+3, FINISH*, KILL!, UCASE*, XCLUD1*
, XCLUD1+1, XCLUD1+2
XCN FINISH*, KILL!
XCNP ENTRY+2*, ENTRY+4*, ABTEST+1*, ADRESS+2*, MESG+1*, VERS+1*, VERS+2, NMSPAC+2*, KILL!, XCLUD1+2
XQABADRS ADRESS+2*, KILL!
XQABNMSP ENTRY+1*, VERS+2, KILL!
XQABOPT VERS+2*, XCLUD, XCLUD+1, NMSPAC+2*, KILL!, XCLUD1+1
XQABOPTN VERS+2*, NMSPAC+1, NMSPAC+2*, KILL!
XQABPKG ENTRY+1*, ENTRY+4, ABTEST, KILL!
XQABROU ENTRY+1*, ENTRY+3, FINISH, KILL!
XQABTEST ABTEST+1*, ADRESS, MESG+2, KILL!
Y ENTRY, ADRESS+2, KILL!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All