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: XQSMDCPY

Package: Kernel

Routine: XQSMDCPY


Information

XQSMDCPY ;ISC-SF/JLI - COPY ONE USER (PRIM & SEC MENUS, KEYS, FILES) TO ANOTHER USER ;07/12/10 11:12

Source Information

Source file <XQSMDCPY.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 ^DIC  ^DIE  
Kernel 1 ^%ZTLOAD  

Entry Points

Name Comments DBIA/ICR reference
COPY1
EXIT ;
TSK
DQ ;

External References

Name Field # of Occurrence
^%ZTLOAD TSK
^DIC XQSMDCPY+6, XQSMDCPY+16, COPY1+2, COPY1+4
^DIE COPY1, COPY1+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?5,"Note: You must have been delegated these options and",!,?11,"keys to transfer them from user to user.",!
  • Line Location: XQSMDCPY+4
Function Call: WRITE
  • Prompt: !!,$C(7),"No Menus have been delegated to you to use this option",!,"If there are questions see your site manager's staff."
  • Line Location: XQSMDCPY+5
Function Call: WRITE
  • Prompt: !,"The donor user has no primary menu."
  • Line Location: XQSMDCPY+7
Function Call: WRITE
  • Prompt: !,$C(7),"You are not able to give out this user's primary menu ",$P(^DIC(19,XQUSRPM,0),U)
  • Line Location: XQSMDCPY+8
Function Call: WRITE
  • Prompt: !,$C(7),"Skipping secondary menu ",$P(^DIC(19,+X,0),U)
  • Line Location: XQSMDCPY+9
Function Call: WRITE
  • Prompt: !!,$C(7),"No Primary or Secondary Menus to copy -- quitting.",!!
  • Line Location: XQSMDCPY+10
Function Call: WRITE
  • Prompt: !,$C(7),"Not authorized to give ",$P(^DIC(19.1,X,0),U)," key -- skipping"
  • Line Location: XQSMDCPY+11
Function Call: READ
  • Prompt: "Do you want to QUEUE this job ? Y// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: XQSMDCPY+20
Routine Call
  • DIE
  • Line Location:
    • COPY1
    • COPY1+2
Routine Call
  • DIC
  • Line Location:
    • XQSMDCPY+6
    • XQSMDCPY+16
    • COPY1+2
    • COPY1+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(19 - [#19] XQSMDCPY+8, XQSMDCPY+9, COPY1, COPY1+2
^DIC(19.1 - [#19.1] XQSMDCPY+11, COPY1+4
^VA(200 - [#200] XQSMDCPY+7, XQSMDCPY+8, XQSMDCPY+9, XQSMDCPY+11, COPY1+1, COPY1+3
^XUSEC("XUMGR" XQSMDCPY+3

Label References

Name Line Occurrences
COPY1 DQ+1
EXIT XQSMDCPY+19, XQSMDCPY+20
TSK XQSMDCPY+20

Naked Globals

Name Field # of Occurrence
^( XQSMDCPY+9, XQSMDCPY+11
^(0 COPY1+1*, COPY1+3*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EXIT+1!
D EXIT+1!
D0 EXIT+1!
DA EXIT+1!, COPY1*, COPY1+2*, COPY1+4*
DA(1 COPY1+2*, COPY1+4*
DI EXIT+1!
DIC XQSMDCPY+6*, XQSMDCPY+15*, XQSMDCPY+17!, EXIT+1!, COPY1+2*, COPY1+4*
DIC("A" XQSMDCPY+6*, XQSMDCPY+15*, XQSMDCPY+16*
DIC("P" COPY1+2*, COPY1+4*
DIC(0 XQSMDCPY+6*, XQSMDCPY+15*, COPY1+2*, COPY1+4*
DIE EXIT+1!, COPY1*, COPY1+2*
DIE("P" COPY1+2*
DISYS EXIT+1!
DLAYGO COPY1+1*, COPY1+5!
DR EXIT+1!, COPY1*, COPY1+2*
DTIME XQSMDCPY+20
DUZ XQSMDCPY+3, XQSMDCPY+8, XQSMDCPY+9, XQSMDCPY+11
>> I XQSMDCPY+9*, XQSMDCPY+11*
U XQSMDCPY+8, XQSMDCPY+9, XQSMDCPY+11, XQSMDCPY+20, COPY1, COPY1+2, COPY1+4
X XQSMDCPY+9*, XQSMDCPY+11*, XQSMDCPY+20*, EXIT+1!, COPY1+2*, COPY1+4*
XQBOSS XQSMDCPY+3*, XQSMDCPY+4, XQSMDCPY+8, XQSMDCPY+9, XQSMDCPY+11, EXIT+1!
XQI XQSMDCPY+16*, DQ+1*, EXIT+1!, COPY1, COPY1+1, COPY1+2, COPY1+3, COPY1+4
XQJ EXIT+1!, COPY1+2*, COPY1+4*
XQUSEC EXIT+1!
XQUSEC( XQSMDCPY+9*!, COPY1+2
XQUSEC(0 XQSMDCPY+9*
XQUSEK EXIT+1!
XQUSEK( XQSMDCPY+11*!, COPY1+4
XQUSEK(0 XQSMDCPY+11*
XQUSR1 XQSMDCPY+6*, XQSMDCPY+7, XQSMDCPY+9, XQSMDCPY+11, EXIT+1!
XQUSRPM XQSMDCPY+7*, XQSMDCPY+8*, EXIT+1!, COPY1
XUSR EXIT+1!
XUSR( XQSMDCPY+16*, DQ+1
XUSR(0 XQSMDCPY+19
Y XQSMDCPY+6, XQSMDCPY+16, EXIT+1!, COPY1+2
>> ZTDESC TSK*
>> ZTIO TSK*
>> ZTRTN TSK*
>> ZTSAVE("XQUSEC(" TSK*
>> ZTSAVE("XQUSEK(" TSK*
>> ZTSAVE("XQUSRPM" TSK*
>> ZTSAVE("XUSR(" TSK*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All