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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Routine: LRUTIL1

Package: Lab Service

Routine: LRUTIL1


Information

LRUTIL1 ;DALOI/JDB -- Lab Utilities ;06/12/09 15:31

Source Information

Source file <LRUTIL1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 3 ^DIC  FILE^DID  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRUTIL  

Entry Points

Name Comments DBIA/ICR reference
SELECT(DIC,OUT,FNAME,SELS,SORT,NOALL,MODE) ;
; Package replacement for FIRST^VAUTOMA
; Allows user to select multiple entries from a file.
; Inputs
; DIC :<byref> Standard DIC array
; OUT :<byref> See Outputs below
; FNAME :<opt> Filename to use for "Select " prompt
; : FNAME="" and DIC=# then uses File's Name
; SELS :<opt> How many selections user may make. dflt=20
; SORT :<opt> Numeric or Alpha sort? N or A -or- 0 or 1
; NOALL ;<opt> If 1 then user cannot select "ALL"
; MODE :<opt> Behave like FIRST^VAUTOMA or not (1 or 0)
; : dflt=0 (not) (see Outputs below for info)
; Outputs
; Returns the # of records selected
; OUT : Array that holds the records selected
; : MODE=0 OUT=total selected or OUT="*" (ALL)
; : SORT=0 -> OUT(select seq)=IEN
; : SORT=1 -> OUT(alpha seq)=IEN
; :
; : MODE=1 (VAUTOMA mode) OUT="" or OUT=1 (ALL)
; : SORT=0 -> OUT(IEN)=.01 field
; : SORT=1 -> OUT(.01 field)=IEN
HELP ;
; Displays "?" help info. For use with above.
; Expects SELS,NOALL,FNAME,CNT,TMPNM,LRDIC

External References

Name Field # of Occurrence
^DIC SELECT+74, HELP+19
FILE^DID SELECT+40
^DIR SELECT+65

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"ENTER up to ",SELS,":"
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !?5,"- <return> for all ",FNAME,"s, or"
  • Line Location: HELP+5
Function Call: WRITE
  • Prompt: !?5,"- a ",FNAME," or <return> after all selections made."
  • Line Location: HELP+6
Function Call: WRITE
  • Prompt: !?5,"- An entry preceded by a minus [-] sign to remove entry from list."
  • Line Location: HELP+8
Function Call: WRITE
  • Prompt: !,"NOTE, you have already selected:"
  • Line Location: HELP+9
Function Call: WRITE
  • Prompt: !?8,LRX
  • Line Location: HELP+12
Function Call: WRITE
  • Prompt: !
  • Line Location: HELP+13
Routine Call
  • DIC
  • Line Location:
    • SELECT+74
    • HELP+19
Routine Call
  • DIR
  • Line Location:
    • SELECT+65

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP( SELECT+45!, SELECT+83*, SELECT+84*, SELECT+88!, SELECT+89!, SELECT+93, SELECT+108, SELECT+112!, HELP+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT SELECT+24~, SELECT+36*, SELECT+48, SELECT+49, SELECT+56, SELECT+66*, SELECT+67*, SELECT+76*, SELECT+81*, SELECT+82
, SELECT+86*, SELECT+116, SELECT+117, SELECT+118, SELECT+121, SELECT+122, SELECT+123, SELECT+125, HELP+5, HELP+7
DATA SELECT+39!, SELECT+41, SELECT+43!
DATA("NAME" SELECT+42
DELSEL SELECT+24~, SELECT+68*, SELECT+70*, SELECT+80, SELECT+85
DIC SELECT~, SELECT+38, SELECT+40, SELECT+64, HELP+3~, HELP+18*
DIC("A" SELECT+50, SELECT+59
DIC("B" SELECT+35!, SELECT+46*
DIC("W" SELECT+75*
DIC(0 SELECT+47*
DIERR SELECT+25~, SELECT+39!, SELECT+43!
DIR SELECT+24~
DIR("?" SELECT+54*
DIR("A" SELECT+52*, SELECT+62*
DIR("B" SELECT+46*, SELECT+57!
DIR(0 SELECT+53*, SELECT+58*
DIROUT SELECT+25~, SELECT+66
DIRUT SELECT+25~
DTOUT SELECT+25~, SELECT+66, SELECT+76
DUOUT SELECT+25~, SELECT+66, SELECT+76
FNAME SELECT~, SELECT+27*, SELECT+38, SELECT+42*, SELECT+51, SELECT+60, HELP+5, HELP+6
I SELECT+24~, SELECT+95*, SELECT+97*, SELECT+98, SELECT+104*, SELECT+105*, SELECT+106, SELECT+107
LRDIC SELECT+24~, SELECT+64!*, HELP+18
LRDIC("W" SELECT+75
LRX HELP+3~, HELP+10*, HELP+11*, HELP+12
MODE SELECT~, SELECT+31*, SELECT+98, SELECT+99, SELECT+107, SELECT+108, SELECT+115, SELECT+120
NOALL SELECT~, SELECT+29*, SELECT+46, SELECT+67, HELP+5
NODE SELECT+24~, SELECT+78*, SELECT+79*, SELECT+80, SELECT+82, SELECT+86, SELECT+87, SELECT+94*, SELECT+96*, SELECT+98
, SELECT+99, SELECT+100
OUT SELECT~, SELECT+34!, SELECT+66!, SELECT+67!, SELECT+76!, SELECT+116!*, SELECT+117*, SELECT+118!*, SELECT+121!*, SELECT+122*
, SELECT+123!*
OUT( SELECT+98*, SELECT+99*, SELECT+107*, SELECT+108*
OUT(0 SELECT+100*, SELECT+103, SELECT+105, SELECT+106, SELECT+111!
SELS SELECT~, SELECT+28*, SELECT+48, HELP+4
SORT SELECT~, SELECT+30*, SELECT+32*, SELECT+33*, SELECT+79, SELECT+98, SELECT+99, SELECT+100
STOP SELECT+24~, SELECT+36*, SELECT+48, SELECT+66*, SELECT+67*, SELECT+72*, SELECT+76*
TMPNM SELECT+24~, SELECT+37*, SELECT+45, SELECT+83, SELECT+84, SELECT+88, SELECT+89, SELECT+93, SELECT+96, SELECT+108
, SELECT+112, HELP+11
X SELECT+24~, SELECT+50*, SELECT+51*, SELECT+52, SELECT+59*, SELECT+60*, SELECT+61, SELECT+62, SELECT+71, SELECT+73*
, SELECT+106*, SELECT+107, SELECT+108
Y SELECT+24~, SELECT+67, SELECT+69, SELECT+71*, SELECT+72, SELECT+73, SELECT+77, SELECT+83, SELECT+84, SELECT+88
, SELECT+89
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables  | All