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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ORPR07

Package: Order Entry Results Reporting

Routine: ORPR07


Information

ORPR07 ; slc/dcm - Printless in Tuscaloosa ;6/10/97 15:36

Source Information

Source file <ORPR07.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Inpatient Medications 1 MAR^PSJORMAR  
Order Entry Results Reporting 1 ($$DATE,$$TIME)^ORU  
Outpatient Pharmacy 1 OEL^PSOORRL  

Entry Points

Name Comments DBIA/ICR reference
TEST1 ;Print test label
ENTBY(IFN,ACT) ;Get Entered by
ESTIT(IFN,ACT) ;Get Electronic Sig Title
ESODATE(IFN,ACT) ;Get Date/time Signed online
ENTIT(IFN,ACT) ;Get Electronic Sig Title of Entering Person
ESDATE(IFN,ACT) ;Get Electronic Sig Date
RVIEW(IFN,ACT) ;Get Chart reviewed by data
RX(IFN,FLD,Y) ;Get Pharmacy Fields
ACT(IFN,ACT) ;This is an action
PHONE(IFN,ACT,PIECE) ;Get Ordering provider's phone number (multiple choice)
BY(ORIFN) ;Get DC info for DC by & when PRINT FIELD
ORDT(IFN,ACT) ;Get order date
NAT(IFN,ACT) ;Get Nature of order
ESNAME(IFN,ACT) ;Get Electronic Sig Name
WARDREM(ORIFN) ;Get Ward Remarks
ENTINT(IFN,ACT) ;Get Entered by Initials
VNURSE(IFN,ACT) ;Get verifying nurse data
TEST ;Test RX call
LABEL(Y,ORIFN,QUIET,OACTION) ;Print pharmacy label
ORDOC(IFN,ACT) ;Get Ordering provider
VCLERK(IFN,ACT) ;Get verifying clerk data

External References

Name Field # of Occurrence
$$DATE^ORU BY+4
$$TIME^ORU BY+4
MAR^PSJORMAR LABEL+7, LABEL+8
OEL^PSOORRL RX+10

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: TEST+1
Function Call: WRITE
  • Prompt: !,$C(7),X_" does not exist"
  • Line Location: TEST+1
Function Call: WRITE
  • Prompt: !,ORI_"- "
  • Line Location: TEST+2
Function Call: WRITE
  • Prompt: @ORIOF
  • Line Location: LABEL+15
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ORC>1
  • Line Location: LABEL+16
Function Call: WRITE
  • Prompt: LINES(I)
  • Line Location: LABEL+16
Function Call: WRITE
  • Prompt: !,"03/03 | | (F1990)|"
  • Line Location: TEST1+1
Function Call: WRITE
  • Prompt: !,"Test Pharmacy Label"
  • Line Location: TEST1+2
Function Call: WRITE
  • Prompt: !,"Give: 1GM TOP QD"
  • Line Location: TEST1+3
Function Call: WRITE
  • Prompt: !!," RPH: _____RN: _____|"
  • Line Location: TEST1+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(3.1 - [#3.1] VNURSE+5, VCLERK+5, RVIEW+5, BY+4
^DIC(9.4 - [#9.4] RX+8, LABEL+4
^OR(100 - [#100] ORDT+4, ORDT+7, ACT+2, VNURSE+3, VCLERK+3, RVIEW+3, ORDOC+2, ORDOC+6, PHONE+3, PHONE+8
, NAT+2, ESNAME+2, ESTIT+2, ESDATE+2, ESODATE+2, ENTBY+2, ENTBY+5, ENTINT+2, ENTINT+5, ENTIT+2
, ENTIT+5, BY+3, WARDREM+3, RX+5, RX+6, TEST+1, LABEL+3, LABEL+6
^ORD(100.02 - [#100.02] NAT+5
^ORD(100.03 - [#100.03] BY+5
^TMP("PS" RX+11, RX+13, RX+14, RX+15, RX+16, RX+17, RX+18, RX+20, RX+22, RX+24
, RX+26, RX+28
^VA(200 - [#200] VNURSE+5, VCLERK+5, RVIEW+5, ORDOC+5, ORDOC+6, PHONE+7, PHONE+8, ESNAME+6, ESTIT+4, ENTBY+4
, ENTBY+5, ENTINT+4, ENTINT+5, ENTIT+4, ENTIT+5, BY+4

Label References

Name Line Occurrences
$$ACT ORDT+6, VNURSE+5, VCLERK+5, RVIEW+5, ORDOC+5, PHONE+7, NAT+5, ESNAME+5, ESTIT+4, ESDATE+5
, ESODATE+5, ENTBY+4, ENTINT+4, ENTIT+4
RX TEST+2
TEST TEST+1
TEST1 LABEL+1

Naked Globals

Name Field # of Occurrence
^( RX+13, RX+20, RX+22, RX+24, RX+26, RX+28
^(0 ACT+2, NAT+5, RX+8, RX+26, RX+28, LABEL+3, LABEL+6
^(4 RX+6, LABEL+3
^(6 BY+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACT ORDT~, ORDT+6, ACT~, ACT+2, VNURSE~, VNURSE+5, VCLERK~, VCLERK+5, RVIEW~, RVIEW+5
, ORDOC~, ORDOC+5, PHONE~, PHONE+7, NAT~, NAT+5, ESNAME~, ESNAME+5, ESTIT~, ESTIT+4
, ESDATE~, ESDATE+5, ESODATE~, ESODATE+5, ENTBY~, ENTBY+4, ENTINT~, ENTINT+4, ENTIT~, ENTIT+4
, LABEL+5~, LABEL+6*, LABEL+7
DFN RX+6~, RX+9*, RX+10
DTIME TEST+1
FLD RX~, RX+4, RX+11, RX+12, RX+14, RX+15, RX+16, RX+17, RX+18, RX+19
, RX+21, RX+23, RX+25, RX+27
I RX+6~, RX+12*, RX+13*, RX+19*, RX+20*, RX+21*, RX+22*, RX+23*, RX+24*, RX+25*
, RX+26*, RX+27*, RX+28*, LABEL+5~, LABEL+9*, LABEL+10*, LABEL+11*, LABEL+14*, LABEL+16
IFN ORDT~, ORDT+3, ORDT+4, ORDT+6, ORDT+7, ACT~, ACT+2, VNURSE~, VNURSE+2, VNURSE+3
, VNURSE+5, VCLERK~, VCLERK+2, VCLERK+3, VCLERK+5, RVIEW~, RVIEW+2, RVIEW+3, RVIEW+5, ORDOC~
, ORDOC+1, ORDOC+2, ORDOC+5, ORDOC+6, PHONE~, PHONE+2, PHONE+3, PHONE+7, PHONE+8, NAT~
, NAT+1, NAT+2, NAT+5, ESNAME~, ESNAME+1, ESNAME+2, ESNAME+5, ESTIT~, ESTIT+1, ESTIT+2
, ESTIT+4, ESDATE~, ESDATE+1, ESDATE+2, ESDATE+5, ESODATE~, ESODATE+1, ESODATE+2, ESODATE+5, ENTBY~
, ENTBY+1, ENTBY+2, ENTBY+4, ENTBY+5, ENTINT~, ENTINT+1, ENTINT+2, ENTINT+4, ENTINT+5, ENTIT~
, ENTIT+1, ENTIT+2, ENTIT+4, ENTIT+5, RX~, RX+4, RX+5, RX+6
IOF LABEL+13
IOSL LABEL+12
LINES LABEL+5~, LABEL+7, LABEL+8
LINES( LABEL+10, LABEL+14, LABEL+16
OACTION LABEL~, LABEL+6
ORC LABEL+2~, LABEL+11*, LABEL+14*, LABEL+15*, LABEL+16
ORDCBY BY+2~, BY+3, BY+5*
ORI WARDREM+1~, WARDREM+3*, TEST+2*
ORIFN BY~, BY+1, BY+3, WARDREM~, WARDREM+3, TEST+2*, LABEL~, LABEL+3, LABEL+6
ORIOF LABEL+13~*, LABEL+15
ORIOSL LABEL+12~*, LABEL+15
>> ORPICKUP LABEL+10*
>> ORTEST LABEL+1
ORXPTMP LABEL+5~
PIECE PHONE~, PHONE+4, PHONE+7, PHONE+8
PKG RX+6~, RX+7*, RX+8*, RX+10
QUIET LABEL~, LABEL+9
TEST TEST+2!
X ORDT+5~, ORDT+6*, ORDT+7*, ORDT+8, ACT+1~, ACT+2*, ACT+3, VNURSE+4~*, VNURSE+5*, VNURSE+6
, VCLERK+4~*, VCLERK+5*, VCLERK+6, RVIEW+4~*, RVIEW+5*, RVIEW+6, ORDOC+3~, ORDOC+4*, ORDOC+5*, ORDOC+6*
, ORDOC+7, PHONE+5~, PHONE+6*, PHONE+7*, PHONE+8*, PHONE+9, NAT+3~, NAT+4*, NAT+5*, NAT+6
, ESNAME+3~, ESNAME+4*, ESNAME+5, ESNAME+6*, ESNAME+7*, ESNAME+8, ESTIT+3~, ESTIT+4*, ESTIT+5, ESDATE+3~
, ESDATE+4*, ESDATE+5*, ESDATE+6, ESODATE+3~, ESODATE+4*, ESODATE+5*, ESODATE+6, ENTBY+3~, ENTBY+4*, ENTBY+5*
, ENTBY+6, ENTINT+3~, ENTINT+4*, ENTINT+5*, ENTINT+6, ENTIT+3~, ENTIT+4*, ENTIT+5*, ENTIT+6, WARDREM+1~
, WARDREM+2*, WARDREM+3*, WARDREM+4, RX+6~*, RX+7, RX+9, TEST+1*, TEST+2, LABEL+2~, LABEL+3*
, LABEL+4, LABEL+7, LABEL+8
X1 BY+2~, BY+4*, BY+5
X4 RX+6~*, RX+10, LABEL+2~, LABEL+3*, LABEL+7, LABEL+8
X6 BY+2~, BY+3*, BY+4, BY+5
Y ORDT+5~, ORDT+6*, VNURSE+4~, VNURSE+5*, VCLERK+4~, VCLERK+5*, RVIEW+4~, RVIEW+5*, ORDOC+3~, ORDOC+5*
, ORDOC+6*, PHONE+5~, PHONE+7*, PHONE+8*, NAT+3~, NAT+5*, ESNAME+3~, ESNAME+5*, ESNAME+6, ESNAME+7
, ESTIT+3~, ESTIT+4*, ENTBY+3~, ENTBY+4*, ENTINT+3~, ENTINT+4*, ENTIT+3~, ENTIT+4*, BY+2~, BY+4*
, BY+5, RX~, RX+11*, RX+14*, RX+15*, RX+16*, RX+17*, RX+18*, LABEL~, LABEL+9!*
Y( RX+13*, RX+20*, RX+22*, RX+24*, RX+26*, RX+28*, LABEL+10*
Z VNURSE+4~, VNURSE+5*, VCLERK+4~, VCLERK+5*, RVIEW+4~, RVIEW+5*, ORDOC+3~, ORDOC+5*, ORDOC+6*, PHONE+5~
, PHONE+7*, BY+2~, BY+4*

Marked Items

Name Field # of Occurrence
$T(MAR^PSJORMAR LABEL+7, LABEL+8
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All