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 |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ORINDRP

Package: Order Entry Results Reporting

Routine: ORINDRP


Information

ORINDRP ;BIR/MA - Indication Usage Report ;Mar 30, 2022@08:09:34

Source Information

Source file <ORINDRP.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 5 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  $$INSTALDT^XPDUTL  
VA FileMan 3 ^%DT  DT^DICRW  ^DIR  
Order Entry Results Reporting 1 $$NMSP^ORCD  
Pharmacy Data Management 1 INDCATN^PSS50P7  

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

Package Total Caller Graph
Order Entry Results Reporting 1 OR INDICATION USAGE REPORT  
Pharmacy Data Management 1 PSSINDRP  

Entry Points

Name Comments DBIA/ICR reference
EN ;
QEN ;
YR ;
MEN ;
SDT ;
EDT
FEN ;
SPR
EPR
SOI ;Allow selection of all/single/multiple Orderable item
DQ ;build and print
RPT ;
END ;
CHECK ;If order matches requirements then save
GIND ;
PRINT ;
SETAR ;
NUIND ;
PL ;
HDR ;
LEAP(%) ;Check if a Leap year

External References

Name Field # of Occurrence
^%DT SDT+1, EDT, SPR, EPR
^%ZIS DQ+1
^%ZISC END+1
^%ZTLOAD DQ+7
DT^DICRW EN+2
^DIR EN+15, QEN+4, SOI+4, SOI+10, HDR+2
$$NMSP^ORCD RPT+6
INDCATN^PSS50P7 CHECK+7, SETAR+3
$$FMTE^XLFDT HDR+3, HDR+4
$$INSTALDT^XPDUTL EN+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: !!
  • Line Location: QEN+3
Function Call: WRITE
  • Prompt: !,"Select Calendar Year: ",X,"// "
  • Line Location: YR+2
Function Call: WRITE
  • Prompt: $C(7),!,"Enter a four digit calendar year (e.g. "_SYR_")",!
  • Line Location: YR+5
Function Call: WRITE
  • Prompt: $C(7),!!," No Data exist prior to "_$E(IDT,4,5)_"/"_IYR,!
  • Line Location: YR+6
Function Call: WRITE
  • Prompt: $C(7),!!," Year cannot be in the future",!
  • Line Location: YR+7
Function Call: WRITE
  • Prompt: $C(7),!!," No Data exist prior to Quarter "_IQRT_" of "_IYR,!
  • Line Location: YR+8
Function Call: WRITE
  • Prompt: $C(7),!!," Quarter cannot be in the future",!
  • Line Location: YR+9
Function Call: WRITE
  • Prompt: !!!,"**** Date Range Selection ****"
  • Line Location: MEN+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SDT+1
Function Call: WRITE
  • Prompt: $C(7),!!," No Data exist prior to "_$E(IDT,4,5)_"/"_IYR,!
  • Line Location: SDT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EDT+0
Function Call: WRITE
  • Prompt: $C(7),!!," End of month cannot be in the future"
  • Line Location: EDT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SPR+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EPR+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+1
Function Call: WRITE
  • Prompt: !!,"There is no data for the criteria you selected.",!
  • Line Location: RPT+10
Function Call: WRITE
  • Prompt: !,I_"("_POI_")"
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: !," These Indications were not used: "
  • Line Location: NUIND+2
Function Call: WRITE
  • Prompt: !,?5,$S(ZI="MCI":"Most Common",1:"Other Indic")
  • Line Location: NUIND+5
Function Call: WRITE
  • Prompt: ?18," - "_ZJ
  • Line Location: NUIND+7
Function Call: WRITE
  • Prompt: !,?18," - "_ZJ
  • Line Location: NUIND+8
Function Call: WRITE
  • Prompt: !,TXT,?68,CT
  • Line Location: PL+2
Function Call: WRITE
  • Prompt: !,?5,$S(M="A1":"Most Common",M="A2":"Other Indic",1:"Free Text")_": "
  • Line Location: PL+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: O>1
  • Line Location: PL+5
Function Call: WRITE
  • Prompt: ?18,N,?68,$G(ARR(M,N))
  • Line Location: PL+5
Function Call: WRITE
  • Prompt: !,"Selected Date Range: ",$$FMTE^XLFDT(SDT)," to ",$$FMTE^XLFDT(EDT)_$S($G(SQRT):" (Quarter "_SQRT_")",1:"")
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"Orderable Item Most Common Other Free Text Total"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !," Indications Indications Indications"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,"-------------------------------------------------------------------------"
  • Line Location: HDR+7
Routine Call
  • DIR
  • Line Location:
    • EN+15
    • QEN+4
    • SOI+4
    • SOI+10
    • HDR+2
Routine Call
  • %ZIS
  • Line Location:
    • DQ+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OR(100 - [#100] RPT+4, RPT+5, RPT+6, RPT+7, RPT+8, RPT+9, CHECK+3, CHECK+4
^ORD(100.98 - [#100.98] RPT+7
^ORD(101.43 - [#101.43] CHECK+6
^TMP($J RPT+3!, RPT+10, END+2!, CHECK+9*, CHECK+10*, CHECK+11*, CHECK+12*, GIND+1, GIND+2, GIND+6!
, PRINT+3, PRINT+5, PRINT+7, PRINT+9, PRINT+10, SETAR+4, SETAR+5, SETAR+7!

Label References

Name Line Occurrences
$$LEAP EDT+3
@( EN+17
CHECK RPT+9
DQ SOI+5
EDT EDT+1
EN QEN+4, SDT+1, EDT+1, SPR, EPR, SOI+4, SOI+11, DQ+1
END RPT+10
EPR EPR
GIND CHECK+8
HDR PRINT+2, NUIND+1, PL+1, PL+6
NUIND PRINT+13
PL PRINT+5
PRINT RPT+14
QEN YR+3
SDT SDT+2
SETAR PRINT+4
SOI YR+14, EDT+4
SPR SPR
YR YR+5, YR+6, YR+7, YR+8, YR+9

Naked Globals

Name Field # of Occurrence
^( GIND+2, PRINT+5, PRINT+7, SETAR+5
^(1 CHECK+3, CHECK+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% LEAP~, LEAP+1*, LEAP+2
%DT EN+1~, SDT+1*!, EDT*!, SPR*, EPR*!
%DT("A" SDT+1*, EDT*, SPR*, EPR*
%DT(0 SDT+1*, EDT*, SPR*, EPR*
%ZIS DQ+1!*
ARR PRINT+1~, PRINT+7!
ARR( PL+3, PL+4, PL+5
ARR("A" PRINT+10*
BMT EN+1~, QEN+1*, YR+11*, YR+12
CMT EN+1~, EN+10*
CQRT EN+1~, EN+9*, YR+9
CT PRINT+1~, PRINT+5*, PRINT+8, PL+2
DIR EN+12!, EN+15!, QEN+4!, SOI+1!, SOI+4!, SOI+11!, HDR+2!
DIR("?" SOI+3*, SOI+9*
DIR("A" EN+13*, QEN+3*, SOI+2*, SOI+8*
DIR("B" SOI+2*
DIR("S" SOI+7*
DIR(0 EN+14*, QEN+3*, SOI+2*, SOI+7*, HDR+2*
DIRUT EN+12!, EN+15!, QEN+4, SOI+1!, SOI+4, SOI+6, SOI+10, SOI+12!
DT EN+2, EN+3, EN+6, EN+9, EN+10, YR+1, SDT+1, EPR, HDR+3
DTIME YR+2
DTOUT EN+12!, EN+15!, SOI+1!, SOI+11, SOI+12!
DUOUT EN+12!, EN+15!, SOI+1!, SOI+11, SOI+12!
EDT EN+1~, YR+13*, EDT+2*, EDT+3, EPR*, RPT+4, RPT+12*, RPT+13*, HDR+4
EMT EN+1~, QEN+2*, YR+11*, YR+13
G DQ+4~, DQ+5*
I RPT+2~, GIND+2*, PRINT+3*, PRINT+5, PRINT+7, PRINT+9, PRINT+10
ICT PRINT+1~, PRINT+7*, PRINT+8
IDT EN+1~, EN+5*, EN+6*, EN+7, EN+8, YR+6, SDT+2, SPR
IO RPT+1
IO("Q" DQ+2, DQ+3!
IOF HDR+3
IOP DQ+1!
IOSL NUIND+1, PL+1, PL+6
IOST HDR+2
IQRT EN+1~, EN+8*, YR+8
IYR EN+1~, EN+4*, EN+5, EN+7*, YR+6, YR+8, SDT+2
IYR(0 EN+5
J RPT+2~, CHECK+3*, CHECK+4*, PRINT+5*, PRINT+6, PRINT+7, PRINT+9, PRINT+10
K RPT+2~, GIND+2*, GIND+3*, GIND+4*, PRINT+7*, PRINT+8, PRINT+9, PRINT+10, PRINT+11
L PRINT+1~, PRINT+9*, PRINT+10, PRINT+11
LATE EN+1~, EN+3*, EDT+1
M PRINT+1~, PL+3*, PL+4, PL+5
MEND EN+1~, QEN+6*, EDT+3*, RPT+12
N PRINT+1~, PL+4*, PL+5
ND CHECK+1~, CHECK+6*, GIND+2*, GIND+3, GIND+4
NOIND PRINT+12!, PRINT+13!, SETAR+1!
NOIND( PRINT+11!, SETAR+6*, NUIND+4, NUIND+6
O PRINT+1~, PL+4*, PL+5
OI CHECK+1~, CHECK+4*, CHECK+5, CHECK+6
OINM CHECK+1~, CHECK+6*, CHECK+9, CHECK+10, CHECK+11, CHECK+12
ORALL SOI+1~, SOI+5*, CHECK+5, HDR+3
ORDT RPT+2~, RPT+3*, RPT+4*, RPT+9
ORIEN RPT+2~, RPT+4*, RPT+5, RPT+6, RPT+7, RPT+8, RPT+9, CHECK+3, CHECK+4
ORQ RPT+2~, PRINT+1~*, PRINT+3, PRINT+5, PRINT+12, NUIND+1, PL+1, PL+3, PL+4, HDR+2*
ORSEL SOI+1~, SOI+8, SOI+11, DQ+6
ORSEL( SOI+10*, CHECK+5
ORSI CHECK+1~, CHECK+9, CHECK+10, GIND+1*, GIND+3*, GIND+4*, GIND+5*
ORUI CHECK+1~, CHECK+3*, CHECK+10, GIND+3, GIND+4
PG RPT+2~, HDR+1*, HDR+2, HDR+3
PKG RPT+2~, RPT+6*, RPT+7*, CHECK+2*, CHECK+9, CHECK+10, CHECK+11
POI CHECK+1~, CHECK+6*, CHECK+7, CHECK+12, PRINT+1~, PRINT+3*, SETAR+2, SETAR+3
POP DQ+1!
SDT EN+1~, YR+12*, SDT+3*, EDT, SPR*, RPT+3, RPT+11*, HDR+4
SEL EN+1~, EN+16*
SQRT EN+1~, QEN+5*, QEN+6, YR+8, YR+9, YR+11, HDR+4
SYR EN+1~, YR+1*, YR+4, YR+5, YR+7, YR+9, YR+10*, YR+12, YR+13
TXT PRINT+1~, PRINT+6*, PRINT+8*, PL+2
U YR+11, EDT+3, RPT+7, CHECK+3, CHECK+4, CHECK+6, GIND+3, GIND+4, SETAR+6
X EN+1~, YR+1*, YR+2*, YR+3, YR+4*, YR+5, YR+6, YR+7, YR+8, YR+9
, YR+10, SDT+1, EDT+1, SPR, EPR
Y EN+1~, EN+16, EN+17, QEN+5, SDT+1, SDT+2, SDT+3, EDT+1, EDT+2, SPR
, EPR, SOI+5, SOI+10, HDR+2
ZI SETAR+1~, SETAR+5*, NUIND+3~, NUIND+4*, NUIND+5, NUIND+6
ZJ NUIND+3~, NUIND+5*, NUIND+6*, NUIND+7, NUIND+8
ZND SETAR+1~, SETAR+5*, SETAR+6
ZTDESC DQ+3!, DQ+4*
ZTDTH DQ+3!
ZTIO DQ+3!
>> ZTQUEUED END+1
>> ZTREQ END+1*
ZTRTN DQ+3!, DQ+4*
ZTSAVE DQ+3!
ZTSAVE( DQ+5*
ZTSAVE("ORSEL(" DQ+6*
ZTSK DQ+3!, DQ+7!
ZY NUIND+3~, NUIND+6*, NUIND+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All