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 |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All
Print Page as PDF
Routine: LRUTIL2

Package: Lab Service

Routine: LRUTIL2


Information

LRUTIL2 ;DALOI/JDB -- Lab KIDS Utilities ;04/30/12 10:04

Source Information

Source file <LRUTIL2.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 4 ($$CJ,$$TRIM)^XLFSTR  MES^XPDUTL  SETUP^XQALERT  $$ACTIVE^XUSER  
VA FileMan 4 EN^DDIOL  $$FIND1^DIC  FILE^DIE  $$GET1^DIQ  
Lab Service 1 NP^LRUTIL  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRUTIL3  

Entry Points

Name Comments DBIA/ICR reference
MES(STR,CJ,LM,POS) ;
; Display a string using MES^XPDUTL
; Inputs
; STR:<byref>or<byval> String to display
; CJ:<opt> Center text? 1=yes 0=1 <dflt=1>
; LM:<opt> Left Margin (padding) dflt=0
; POS:<opt> <dflt=IOM,80>
BMES(STR,CJ,LM,POS) ;
; Display messages using BMES^XPDUTL or MES^XPDUTL
; Accepts single string or string array
; Inputs
; STR:<byref><byval> The string to display.
; CJ:<opt> Center text? 1=yes 0=no <dflt=1>
; LM:<opt> Left Margin (padding) <dflt=0>
; POS <opt> value for $$CJ^XLFSTR (80=default)
OPTOOO(LROPT,MODE) ;
ENDDIOL(TXT,GBL,FMT,USENP,CHKABORT,ABORT,PGDATA) ;
; Substitute for EN^DDIOL API.
; Enhanced for pagination control.
; Inputs
; TXT:<byval><byref> Text to display
; GBL:<byval><opt> Global reference of text. (See EN^DDIOL)
; FMT:<opt> Format array. (See EN^DDIOL)
; USENP:<opt> Use NP (use pagination) 1=yes 0=no <dflt=0>
; CHKABORT:<opt> Check for user abort 1=check 0=dont <dflt=0>
; ABORT:<byref><opt> User abort status (output)
; PGDATA:<byref><opt> Page Data array (see NP^LRUTIL)
; Outputs
; Displays the text.
; ABORT:
; PGDATA:
ENVCHK(CJ,LM,POS,QUIET) ;
; Perform basic environment checks
ALERT(MSG,RECIPS) ;
; Send an Alert message.
; Inputs
; MSG: Message text
; RECIPS:<byref><opt> Array of Recipients <dflt=G.LMI>
; : Set RECIPS("-G.LMI") to exclude LMI group.

External References

Name Field # of Occurrence
EN^DDIOL ENDDIOL+28, ENDDIOL+29, ENDDIOL+30, ENDDIOL+37
$$FIND1^DIC OPTOOO+19
FILE^DIE OPTOOO+46
$$GET1^DIQ OPTOOO+22
NP^LRUTIL ENDDIOL+38
$$CJ^XLFSTR MES+17, ENDDIOL+25
$$TRIM^XLFSTR MES+17, ENDDIOL+25
MES^XPDUTL MES+19
SETUP^XQALERT ALERT+13
$$ACTIVE^XUSER ENVCHK+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(19 - [#19] FIND1^DIC,  GET1^DIQ

Label References

Name Line Occurrences
BMES ENVCHK+9, ENVCHK+13, ENVCHK+17
MES BMES+20, BMES+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABORT ENDDIOL~, ENDDIOL+33, ENDDIOL+36, ENDDIOL+38, ENDDIOL+39
ADDPRMPT ENDDIOL+16~, ENDDIOL+24*, ENDDIOL+42
CHKABORT ENDDIOL~, ENDDIOL+20*, ENDDIOL+23, ENDDIOL+33, ENDDIOL+36, ENDDIOL+39
CJ ENVCHK~, ENVCHK+3*, BMES~, BMES+10*, BMES+20, BMES+23, MES~, MES+8*, MES+17, MES+18
DA ALERT+7~
DIERR OPTOOO+15~, OPTOOO+21!, OPTOOO+43!
DIK ALERT+7~
DUZ ENVCHK+12, ENVCHK+16
DUZ(0 ENVCHK+12
ERR ENVCHK+2~, ENVCHK+7*, ENVCHK+10*, ENVCHK+14*, ENVCHK+18*, ENVCHK+19
FMT ENDDIOL~, ENDDIOL+18*, ENDDIOL+28, ENDDIOL+30, ENDDIOL+37
GBL ENDDIOL~, ENDDIOL+17*, ENDDIOL+30
I BMES+9~, BMES+18*, BMES+19*, BMES+20, MES+7~, MES+14*, MES+15*, MES+16
IOM ENVCHK+8, BMES+14, MES+12, ENDDIOL+25
IOSL ENVCHK+8
LM ENVCHK~, ENVCHK+4*, BMES~, BMES+11*, BMES+12*, BMES+20, BMES+23, MES~, MES+9*, MES+11*
, MES+18
LRFDA OPTOOO+15~, OPTOOO+43!
LRFDA(1 OPTOOO+45*
LRMSG OPTOOO+15~
LROOO OPTOOO+15~, OPTOOO+23*, OPTOOO+25*, OPTOOO+26*, OPTOOO+29*, OPTOOO+34*, OPTOOO+37*, OPTOOO+39, OPTOOO+44, OPTOOO+45
LROPT OPTOOO~, OPTOOO+16*, OPTOOO+19
LRSTR2 MES+7~, MES+16*, MES+17*, MES+18*, MES+19
MODE OPTOOO~, OPTOOO+17*, OPTOOO+24, OPTOOO+28, OPTOOO+34, OPTOOO+37, OPTOOO+40, OPTOOO+41
MSG ALERT~, ALERT+8
NODE ENDDIOL+16~, ENDDIOL+35*, ENDDIOL+36*, ENDDIOL+37
OOM OPTOOO+15~, OPTOOO+22*, OPTOOO+24, OPTOOO+28, OPTOOO+32, OPTOOO+33, OPTOOO+35, OPTOOO+36
PGDATA ENDDIOL~, ENDDIOL+22, ENDDIOL+38
PGDATA("PROMPT" ENDDIOL+25*, ENDDIOL+42!
POS ENVCHK~, ENVCHK+5*, BMES~, BMES+13*, BMES+14*, BMES+20, BMES+23, MES~, MES+10*, MES+12*
, MES+17
QUIET ENVCHK~, ENVCHK+6*, ENVCHK+9, ENVCHK+13, ENVCHK+17
R19 OPTOOO+15~, OPTOOO+19*, OPTOOO+20, OPTOOO+22, OPTOOO+45
RECIPS ALERT~, ALERT+10
STATUS OPTOOO+15~, OPTOOO+18*, OPTOOO+40*, OPTOOO+41*, OPTOOO+47*, OPTOOO+48
STR BMES~, BMES+17, BMES+23, MES~, MES+13
STR( BMES+19, BMES+20, MES+13*, MES+15, MES+16
TXT ENDDIOL~, ENDDIOL+27, ENDDIOL+28, ENDDIOL+29, ENDDIOL+33, ENDDIOL+34, ENDDIOL+37
TXT( ENDDIOL+34*, ENDDIOL+40!
U ENVCHK+8
USENP ENDDIOL~, ENDDIOL+19*, ENDDIOL+26, ENDDIOL+31
X BMES+9~, MES+7~, MES+18*
>> XPDNM OPTOOO+25, OPTOOO+26, OPTOOO+32, OPTOOO+33, OPTOOO+35
XQA ALERT+7~, ALERT+10*, ALERT+12
XQA("-G.LMI" ALERT+11!
XQA("G.LMI" ALERT+9*, ALERT+11!
XQAMSG ALERT+7~, ALERT+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All