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

Package: Run Time Library

Routine: RGUTLK2


Information

RGUTLK2 ;CAIRO/DKM - Continuation of RGUTLKP;04-Sep-1998 11:26;DKM

Source Information

Source file <RGUTLK2.m>

Entry Points

Name Comments DBIA/ICR reference
LKP(%RGDX) ;
NXTREF
NR2
NR3
NR4
NR5
SLCT(%RGSLCT) ;
DISV(%RGIEN) ;
APP(%RGIEN) ;
MTL
ADD(%RGKEY,%RGIDX,%RGSUB) ;
VALD(%S)
V2
V3
SHOW(%RGSLCT,%RGCOL1,%RGCOL2) ;
FMT(%S,%RGKEY) ;
SID(%S,%RGKEY) ;
PARTIAL(%RGD,%RGKEY) ;
P1
HELP(X) ; Application-specific help
HELP1
HELP2
PAUSE
XY(X,Y)

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: %#1
  • Timeout: 0
  • Line Location: NR2+0
Function Call: WRITE
  • Prompt: %RGEOS_%RGBEL,!!
  • Line Location: NR4+11
Function Call: WRITE
  • Prompt: *13
  • Line Location: NR4+14
Function Call: WRITE
  • Prompt: $$XY(0,%RGY+1),%RGEOS,!
  • Line Location: NR5+17
Function Call: WRITE
  • Prompt: $$MSG^RGUT(%RGPRMPT,"|"),!
  • Line Location: SHOW+6
Function Call: WRITE
  • Prompt: $$XY(%RGCOL1,$Y)
  • Line Location: SHOW+11
Function Call: WRITE
  • Prompt: $$TRUNC^RGUT(%P,IOM\%RGCOL-6),?%RGCOL2," "_$$TRUNC^RGUT(%I,IOM-%RGCOL2-2)
  • Line Location: SHOW+12
Function Call: WRITE
  • Prompt: $$TRUNC^RGUT(%I,IOM\%RGCOL-6)
  • Line Location: SHOW+13
Function Call: WRITE
  • Prompt: $G(X(%)),!
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP1+1
Function Call: WRITE
  • Prompt: !,"Enter a blank line for default action.",!
  • Line Location: HELP1+3
Function Call: WRITE
  • Prompt: "Enter a space to retrieve previous selection.",!
  • Line Location: HELP1+7
Function Call: WRITE
  • Prompt: "Enter a valid identifier for lookup."
  • Line Location: HELP1+9
Function Call: WRITE
  • Prompt: !
  • Line Location: HELP1+11
Function Call: WRITE
  • Prompt: $$XY(0,16),%RGEOS,!
  • Line Location: HELP2+1
Function Call: WRITE
  • Prompt: $S(%RGOPT(0)["K":"Enter N for next choices.",1:"Press RETURN for more choices.")
  • Line Location: HELP2+2
Function Call: WRITE
  • Prompt: ?35,"Enter B for previous choices.",!
  • Line Location: HELP2+3
Function Call: WRITE
  • Prompt: "Enter ^ to abort lookup.",?35,"Enter choice number to select.",!
  • Line Location: HELP2+4
Function Call: WRITE
  • Prompt: "Any other entry = new lookup."
  • Line Location: HELP2+5
Function Call: WRITE
  • Prompt: $$XY(0,%RGY+2),%RGEOS
  • Line Location: PAUSE+2
Info |  Source |  Entry Points |  Interaction Calls