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

Package: Kernel

Routine: XQSMD4


Information

XQSMD4 ; SEA/MJM,JLI - Edit a user's options ;01/25/2008

Source Information

Source file <XQSMD4.m>

Entry Points

Name Comments DBIA/ICR reference
BUILD ;
ASKOPT(XQOPT,XQTYPE) ;
ADDFIND(X,XQOPT) ;
NEW(XQOPT) ;
OLD(XQOPT) ;
EDIT(XQOPT) ;
SHOWITEM ;
NODEL(XQOPT) ; called by ^XQSMDFM, too
DELETE(XQOPT) ; called by ^XQSMDFM, too
NAMESP(XQNMSP) ; Check for available namespaces. Called by ^XQSMDFM, too.
HLPNAME ;
TYPE(XQT) ;
ASKNAME(XQOPNM,XQNMSP,XQTYPE)
CHKNAME ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?7,$C(7),"You haven't been delegated any options with which to build a menu."
  • Line Location: BUILD+2
Function Call: WRITE
  • Prompt: !,$C(7),"This option already exists but is not a MENU."
  • Line Location: OLD+1
Function Call: WRITE
  • Prompt: !,$C(7),"This option already exists but is not included in your delegated options.",!,"Choose another option name or get this option delegated to yourself."
  • Line Location: OLD+2
Function Call: WRITE
  • Prompt: !!,"You may only include options that have been delegated as items to you.",!
  • Line Location: EDIT+2
Function Call: WRITE
  • Prompt: !,$C(7),"Menu item ",XQITEM("NAME")," deleted from menu."
  • Line Location: EDIT+17
Function Call: WRITE
  • Prompt: !,"This menu contains no menu items."
  • Line Location: EDIT+19
Function Call: WRITE
  • Prompt: !,"It will be deleted if you don't add a menu item."
  • Line Location: EDIT+20
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+21
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+27
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+31
Function Call: WRITE
  • Prompt: !,"These users now have a Primary Menu with no menu items!",$C(7)
  • Line Location: EDIT+35
Function Call: WRITE
  • Prompt: !,"Recommend you add some menu items to it."
  • Line Location: EDIT+36
Function Call: WRITE
  • Prompt: !!?7,$C(7),"Empty menu removed from option file and your delegated options.",!
  • Line Location: EDIT+38
Function Call: WRITE
  • Prompt: !,"This menu contains the following menu items. You may add a new menu item."
  • Line Location: SHOWITEM+2
Function Call: WRITE
  • Prompt: !,"If you select an existing menu item, it will be deleted from the menu.",!
  • Line Location: SHOWITEM+3
Function Call: WRITE
  • Prompt: !,?3,$P(XQREC0,U),?40,$P(XQREC,U,2),?46,$P(XQREC0,U,2)
  • Line Location: SHOWITEM+7
Function Call: WRITE
  • Prompt: !
  • Line Location: SHOWITEM+8
Function Call: WRITE
  • Prompt: !!,"This option is used as a Primary Menu for:"
  • Line Location: NODEL+2
Function Call: WRITE
  • Prompt: !?10,$P(^VA(200,I,0),U)
  • Line Location: NODEL+4
Function Call: WRITE
  • Prompt: !,"Can't delete it while it is used as a primary menu."
  • Line Location: NODEL+5
Function Call: WRITE
  • Prompt: !!?7,$C(7),"No namespace(s) have been set up for you to build new menus.",!?7,"Contact your computer service representative."
  • Line Location: NAMESP+6
Function Call: WRITE
  • Prompt: !?7,"The options you build or edit must begin with ",$S(XQNMSP>1:"one of ",1:""),!?7,"the following namespace",$S(XQNMSP>1:"(s)",1:"")," and be no more than 30 characters long:",!
  • Line Location: HLPNAME+2
Function Call: WRITE
  • Prompt: !?35,$S($E(I,1)="A":I,1:I_"Z")
  • Line Location: HLPNAME+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HLPNAME+5
Function Call: WRITE
  • Prompt: !?7,"You have no existing delegated "_$$TYPE(XQTYPE)_" options. You may enter a new one."
  • Line Location: HLPNAME+12
Function Call: WRITE
  • Prompt: !,"The following are your existing delegated "_$$TYPE(XQTYPE)_" options:"
  • Line Location: HLPNAME+13
Function Call: WRITE
  • Prompt: !,I,?40,XQM(I)
  • Line Location: HLPNAME+14
Function Call: WRITE
  • Prompt: $C(7),!!?7,$E(X,1,4),"* is not a valid namespace for you.",!
  • Line Location: CHKNAME+7
Info |  Source |  Entry Points |  Interaction Calls