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

Package: Lab Service

Routine: LRORDGUI


Information

LRORDGUI ;IHS/OIT/MKK - LAZY ACCESSION LOGGING for IHS PATIENT CHART ONLY ;JUL 06, 2010 3:14 PM;

Source Information

Source file <LRORDGUI.m>

Call Graph

Call Graph Total: 16

Package Total Call Graph
Lab Service 7 ^LRORD1GU  Q15^LRORD2  GS^LRORD3  SMID^LRORDB  ^LRORDK  ^LRPARAM  DT^LRX  
VA Fileman 4 ^%DT  ^%DTC  (,$$FIND1)^DIC  YN^DICN  
Automated Lab Instruments 2 $$BAR^LA7SBCR  SITE^LA7SBCR2  
IHS Changes To Lab 2 ^BLRPARAM  ENTRYAUD^BLRUTIL  
Kernel 1 HOME^%ZIS  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRORD  

Entry Points

Name Comments DBIA/ICR reference
G5 ; EP
EN ; EP ; from EN^LRORD
IMMCOL ;EP - IMMEDIATE LAB COLLECTION
G1
G0 ; EP ;
QUIZ ; EP
GET ; EP
EN01 ;LAB COLLECT ORDER ENTRY
EN03 ;WARD COLLECT ORDER ENTRY
EN02 ;SEND PATIENT ORDER ENTRY
EN1 ; EP ; from EN1^LRORD also
SENDPAT ; EP
L5 ; EP ; from L5^LRORD also
KILL ; EP
LEDI ; EP - Laboratory Electronic Data Exchange
WARDCOL ; EP
ORDER ; EP
LRORD ;DALOI/CJS - LAZY ACCESSION LOGGING ;2/6/91 12:54 ;

External References

Name Field # of Occurrence
^%DT L5+3
^%DTC L5+4
HOME^%ZIS KILL+2
^BLRPARAM EN1+2
ENTRYAUD^BLRUTIL LRORD+10, EN+1, EN1+1, L5+1, G0+1, G1+1, GET+1, G5+1, KILL+1, ORDER+1
, SENDPAT+1, IMMCOL+1, WARDCOL+1, LEDI+1, LEDI+27, QUIZ+1
^DIC GET+3
$$FIND1^DIC LEDI+13
YN^DICN ORDER+2, SENDPAT+2, WARDCOL+3
$$BAR^LA7SBCR LEDI+9
SITE^LA7SBCR2 LEDI+14
^LRORD1GU G5+4
Q15^LRORD2 GET+2
GS^LRORD3 GET+10
SMID^LRORDB LEDI+21
^LRORDK KILL+2, LEDI+6, LEDI+10, LEDI+17, LEDI+22, LEDI+26
^LRPARAM EN1+3, LEDI+5
DT^LRX EN1+5

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Variable: %
  • Line Location: KILL+5
Function Call: WRITE
  • Prompt: !,"Answer 'Y' or 'N': "
  • Line Location: KILL+5
Function Call: WRITE
  • Prompt: !,"Do you want copies of the orders"
  • Line Location: ORDER+2
Function Call: WRITE
  • Prompt: !,"Do you want copies of the orders"
  • Line Location: SENDPAT+2
Function Call: WRITE
  • Prompt: !!?5," This option is not available at the time ",!!,$C(7)
  • Line Location: IMMCOL+2
Function Call: WRITE
  • Prompt: !,"Do you want copies of the orders"
  • Line Location: WARDCOL+3
Function Call: WRITE
  • Prompt: !!,$C(7),"ERROR -- ",$P(LRRSITE("ERROR"),"^",2),!
  • Line Location: LEDI+16
Function Call: WRITE
  • Prompt: !,"The order copy is automatically sent to the CLOSEST PRINTER,"
  • Line Location: QUIZ+2
Function Call: WRITE
  • Prompt: !,"if a closest printer is defined for the device you are using."
  • Line Location: QUIZ+3
Function Call: WRITE
  • Prompt: !,"Otherwise, you will be prompted with ORDER COPY DEVICE.",!
  • Line Location: QUIZ+4
Routine Call
  • %ZIS
  • Line Location:
    • KILL+2
Routine Call
  • DIC
  • Line Location:
    • LEDI+13
Routine Call
  • DIC
  • Line Location:
    • GET+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(64.061 - [#64.061] FIND1^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] G0+18, G0+19
^LAB(62 - [#62] G0+23
^LAB(62.2 - [#62.2] G0+4
^LAB(62.6 - [#62.6] G0+4, G0+5, G0+7, G0+8
^LAB(69.9 - [#69.9] EN+2, EN1+7, ORDER+3, IMMCOL+2
^LRO(69 - [#69] G5+3*
^TMP("LRSTIK" EN1+4!, G0+9*, G0+11*, G0+13*, G0+26*, G0+27*, GET+5*, GET+7*, GET+9*, GET+10
, GET+13*

Label References

Name Line Occurrences
% %
G5 G0+31, GET+3
GET GET+12, GET+14
KILL G5+2
LRORD ORDER+5, SENDPAT+4, IMMCOL+6, WARDCOL+5, LEDI+26
ORDER ORDER+2
QUIZ ORDER+2, SENDPAT+2, WARDCOL+3
SENDPAT SENDPAT+2
WARDCOL WARDCOL+3

Naked Globals

Name Field # of Occurrence
^("RO" EN+2, EN+4
^(0 G5+3*
^(3 ORDER+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % %*, ORDER+2*, SENDPAT+2*, WARDCOL+2*, WARDCOL+3
>> %DT L5+3*
>> BLROPT LRORD+11*, LRORD+13*, ORDER+4*, IMMCOL+5*, WARDCOL+4*
>> BLROPT(0 LRORD+11*, LRORD+13*, ORDER+4*, IMMCOL+5*, WARDCOL+4*
BPCCS G0+17~, G0+20*, G0+22, G0+23, G0+26
BPCCSDTA G0+17~, G0+23*, G0+24*, G0+26
>> BPCODT EN1+9
BPCOORD G0+17~, G0+18*, G0+19, G0+26
>> BPCOORDS G0+16, G0+18
BPCTDTA G0+17~, G0+19*, G0+20, G0+21
>> BPCTL G0+28*
BPCTNAM G0+17~, G0+21*, G0+26
>> BPCURG EN1+9
CONTROL LEDI+8~
DIC EN1+4!
DIC("S" GET+3!
DT EN1+7, L5+4, L5+7, G5+4
DTIME %
DUZ(2 IMMCOL+2
>> I G0+2*, G0+6*, G0+7*, G0+8, G0+9, G0+11, G0+13, G0+18*
I1 G0+30!
LA7 LEDI+8~
LA7SCFG LEDI+8~
LA7X LEDI+8~
LA7Y LEDI+8~
LR64 LEDI+8~
LR696 LEDI+8~
>> LRAD G5+4*
>> LRADDTST EN1+6
LRCOM EN1+4!
>> LRDAHEAD L5+2, L5+5
>> LRECT EN1+7*, EN1+8*, EN1+9*
>> LREND LEDI+6, LEDI+21, LEDI+22
>> LRFIRST EN1+7*, EN1+8*, G0+14*
>> LRFLOG L5+11, G0+3, G0+4*, G0+5
>> LRFLOG(0 G0+5*, G0+9, G0+11, G0+13
LRLABLIO LEDI+8~
>> LRLWC EN1+10*, EN1+11*, EN1+12*
>> LRLWCURG ORDER+3*
LRNATURE EN1+4!
LRODT EN1+7*, EN1+9*, L5+3, L5+4*, L5+7, G5+3, IMMCOL+4!, LEDI+25!
>> LRORDR EN1+5*, EN1+10, EN1+11, EN1+12, L5+2, ORDER+3*, SENDPAT+3*, IMMCOL+3*, WARDCOL+5*, LEDI+25*
>> LRORDRR EN1+8, LEDI+25*
>> LRORDTIM EN1+5*, L5+4*
>> LROUTINE EN1+7*
>> LRREFBAR LEDI+9*, LEDI+10, LEDI+14
LRRSITE LEDI+8~, LEDI+14
LRRSITE("ERROR" LEDI+15, LEDI+16
LRRSITE("SMID" LEDI+20, LEDI+21
LRRSTAT LEDI+8~, LEDI+12*
LRRSTAT(0 LEDI+13*
LRSAME EN1+4!
>> LRSAMP GET+11, GET+12, GET+13
LRSD LEDI+8~
>> LRSLIP ORDER+2*, SENDPAT+2*, WARDCOL+3*
>> LRSPEC GET+11, GET+12, GET+13
LRTCOM EN1+4!
LRTSN LEDI+8~
>> LRTSTS GET+10*
LRURG EN1+4!, EN1+9*
>> LRWP G0+2*, G0+6*, G0+8*, G0+9, G0+11, G0+13, G0+14, G0+25*, G0+26, G0+27
, G0+28, G1*, GET+4*, GET+5, GET+7, GET+9, GET+10, GET+11*, GET+13, G5+2
, G5+4
>> LRWPD G5+4*
>> LRY GET+4*, GET+5, GET+9
>> RESULT(1 EN+6*, L5+3*, L5+5*, L5+8*
>> RESULT(2 EN+6*, L5+3*, L5+5*, L5+9*
>> SNAPSHOT LRORD+10, EN+1, EN1+1, L5+1, G0+1, G1+1, GET+1, G5+1, KILL+1, ORDER+1
, SENDPAT+1, IMMCOL+1, WARDCOL+1, LEDI+1, LEDI+27, QUIZ+1
STR EN+3~, EN+4*, EN+5*, EN+6
U LRORD+11, LRORD+13, EN+4, EN1+7*, G0+4, G0+20, G0+21, G0+24, G0+26, GET+5
, GET+13, G5+3, ORDER+3, ORDER+4, IMMCOL+2, IMMCOL+5, WARDCOL+4
>> X L5+2, L5+3*, L5+5
>> X1 L5+4*
>> X2 L5+4*
>> XQY0 LRORD+11, LRORD+13, ORDER+4, IMMCOL+5, WARDCOL+4
>> XWBWRAP LRORD+12*
>> Y L5+2, L5+3, L5+4, L5+11*, G0+7, G0+8, GET+3, GET+4
>> Y(0 G0+8*, G0+9, G0+13
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All