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

Package: Order Entry Results Reporting

Routine: ORCMGMCK


Information

ORCMGMCK ;SLC/JFR - FIND GMRC QO'S WITH INACTIVE CODES ;6/4/03 11:33

Source Information

Source file <ORCMGMCK.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 5 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  $$REPEAT^XLFSTR  
VA Fileman 2 $$FIND1^DIC  ^DIR  
DRG Grouper 1 ($$HIST,$$STATCHK)^ICDAPIU  
MailMan 1 ^XMD  
Order Entry Results Reporting 1 $$PTR^ORCD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Order Entry Results Reporting 1 ORCM GMRC CSV CHECK  

Entry Points

Name Comments DBIA/ICR reference
QUEUE ; entry point for tasked report
CSVPEP ; protocol event point called upon CSV install
; Called by Protocol - ??
PAGE(NUM) ;print header and raise page number
CSVOPT ; report of CSV affected quick orders from option ORCM ...
FINDQOS ; find cons/proc quick orders with a default Prov. DX code

External References

Name Field # of Occurrence
^%ZIS CSVOPT+2
HOME^%ZIS CSVOPT+3, QUEUE+40
^%ZISC CSVOPT+3, QUEUE+39
^%ZTLOAD CSVOPT+7
$$FIND1^DIC FINDQOS+3, FINDQOS+4
^DIR QUEUE+37, PAGE+3
$$HIST^ICDAPIU FINDQOS+17
$$STATCHK^ICDAPIU FINDQOS+15
$$PTR^ORCD FINDQOS+5
$$FMTE^XLFDT FINDQOS+20, CSVPEP+28, QUEUE+31
$$REPEAT^XLFSTR PAGE+8
^XMD CSVPEP+38

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Unable to task report"
  • Line Location: CSVOPT+8
Function Call: WRITE
  • Prompt: !,"The following Consult or Procedure quick orders were found that currently"
  • Line Location: QUEUE+8
Function Call: WRITE
  • Prompt: !,"have a provisional diagnosis code that is inactive. These should be edited"
  • Line Location: QUEUE+9
Function Call: WRITE
  • Prompt: !,"as soon as possible to reduce interruption of ordering these quick orders.",!
  • Line Location: QUEUE+10
Function Call: WRITE
  • Prompt: !,"Quick order name: ",$P(^TMP("ORCMGMCK",$J,"I",IREC),U)," IEN: ",IREC
  • Line Location: QUEUE+14
Function Call: WRITE
  • Prompt: !,"Provisional Diagnosis code: ",$P(^TMP("ORCMGMCK",$J,"I",IREC),U,2)
  • Line Location: QUEUE+15
Function Call: WRITE
  • Prompt: !," "
  • Line Location: QUEUE+16
Function Call: WRITE
  • Prompt: !,"The following Consult or Procedure quick orders were found to have a"
  • Line Location: QUEUE+21
Function Call: WRITE
  • Prompt: !,"provisional diagnosis code that will become inactive in the future."
  • Line Location: QUEUE+22
Function Call: WRITE
  • Prompt: !,"These should be edited as soon as possible after the inactivation date to"
  • Line Location: QUEUE+23
Function Call: WRITE
  • Prompt: !,"reduce interruption in ordering these quick orders."
  • Line Location: QUEUE+24
Function Call: WRITE
  • Prompt: !," "
  • Line Location: QUEUE+25
Function Call: WRITE
  • Prompt: !,"Quick order name: ",$P(^TMP("ORCMGMCK",$J,"F",FREC),U)," IEN: ",FREC
  • Line Location: QUEUE+30
Function Call: WRITE
  • Prompt: !,"Provisional Diagnosis code: ",$P(^TMP("ORCMGMCK",$J,"F",FREC),U,2)," Inactivation Date: ",$$FMTE^XLFDT($P(^(FREC),U,3),2)
  • Line Location: QUEUE+31
Function Call: WRITE
  • Prompt: !,"There were no problem quick orders found.",!
  • Line Location: QUEUE+34
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PAGE+5
Function Call: WRITE
  • Prompt: "Code Set Version review of Consult/Procedure Quick Orders"
  • Line Location: PAGE+6
Function Call: WRITE
  • Prompt: ?70,"Page: ",NUM
  • Line Location: PAGE+7
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("-",78)
  • Line Location: PAGE+8
Routine Call
  • %ZIS
  • Line Location:
    • CSVOPT+3
    • QUEUE+40
Routine Call
  • DIC
  • Line Location:
    • FINDQOS+3
    • FINDQOS+4
Routine Call
  • DIR
  • Line Location:
    • QUEUE+37
    • PAGE+3
Routine Call
  • %ZIS
  • Line Location:
    • CSVOPT+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(100.98 - [#100.98] FIND1^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ORD(101.41 - [#101.41] FINDQOS+7, FINDQOS+9, FINDQOS+11, FINDQOS+13, FINDQOS+16, FINDQOS+20
^TMP("ORCMGMCK" FINDQOS+2!, FINDQOS+16*, FINDQOS+20*, CSVPEP+7, CSVPEP+13, CSVPEP+14, CSVPEP+15, CSVPEP+19, CSVPEP+26, CSVPEP+27
, CSVPEP+28, CSVPEP+39!, QUEUE+6, QUEUE+12, QUEUE+14, QUEUE+15, QUEUE+19, QUEUE+28, QUEUE+30, QUEUE+31
, QUEUE+33, QUEUE+41!
^TMP("ORCMMSG" CSVPEP+5!, CSVPEP+8*, CSVPEP+9*, CSVPEP+10*, CSVPEP+11*, CSVPEP+14*, CSVPEP+15*, CSVPEP+16*, CSVPEP+20*, CSVPEP+21*
, CSVPEP+22*, CSVPEP+23*, CSVPEP+24*, CSVPEP+27*, CSVPEP+28*, CSVPEP+31, CSVPEP+32*, CSVPEP+39!

Label References

Name Line Occurrences
FINDQOS CSVPEP+4, QUEUE+4
PAGE QUEUE+5, QUEUE+13, QUEUE+20, QUEUE+29

Naked Globals

Name Field # of Occurrence
^( FINDQOS+7, CSVPEP+28, QUEUE+31

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS CSVOPT+1~, CSVOPT+2*
ACTDT FINDQOS+8~, FINDQOS+18*, FINDQOS+19, FINDQOS+20
DIR QUEUE+36~, PAGE+2~
DIR(0 QUEUE+37*, PAGE+3*
DIRUT QUEUE+36~, PAGE+2~
DT FINDQOS+15, FINDQOS+18
DTOUT QUEUE+36~, PAGE+2~, PAGE+4
DUOUT QUEUE+36~, PAGE+2~, PAGE+4
FREC CSVPEP+25*, CSVPEP+26*, CSVPEP+27, CSVPEP+28, QUEUE+26~, QUEUE+27*, QUEUE+28*, QUEUE+30, QUEUE+31
IO QUEUE+3
IO("Q" CSVOPT+3
IOF PAGE+5
ION CSVOPT+6
IOSL QUEUE+13, QUEUE+20, QUEUE+29
IOST QUEUE+35, QUEUE+39, PAGE+1
IREC CSVPEP+12*, CSVPEP+13*, CSVPEP+14, CSVPEP+15, QUEUE+7~, QUEUE+11*, QUEUE+12*, QUEUE+14, QUEUE+15
LN CSVPEP+3~, CSVPEP+6*, CSVPEP+8*, CSVPEP+9*, CSVPEP+10*, CSVPEP+11*, CSVPEP+14*, CSVPEP+15*, CSVPEP+16*, CSVPEP+20*
, CSVPEP+21*, CSVPEP+22*, CSVPEP+23*, CSVPEP+24*, CSVPEP+27*, CSVPEP+28, CSVPEP+29*, CSVPEP+32, CSVPEP+33*
NUM PAGE~, PAGE+1, PAGE+4*, PAGE+7, PAGE+9*
ORAPIVAL FINDQOS+8~, FINDQOS+17*
ORAPIVAL( FINDQOS+18, FINDQOS+19
ORCODEF FINDQOS+8~, FINDQOS+13*, FINDQOS+15, FINDQOS+16, FINDQOS+17, FINDQOS+20
ORDGC FINDQOS+1~, FINDQOS+3*, FINDQOS+10
ORDGP FINDQOS+1~, FINDQOS+4*, FINDQOS+10
ORDLG FINDQOS+1~, FINDQOS+6*, FINDQOS+7*, FINDQOS+9, FINDQOS+11, FINDQOS+13, FINDQOS+16, FINDQOS+20
ORPDLG FINDQOS+1~, FINDQOS+5*, FINDQOS+11
ORPRMPT FINDQOS+8~, FINDQOS+11*, FINDQOS+12, FINDQOS+13, FINDQOS+14
ORQDG FINDQOS+8~, FINDQOS+9*, FINDQOS+10
PG QUEUE+2~, QUEUE+5*, QUEUE+12, QUEUE+13, QUEUE+20, QUEUE+28, QUEUE+29
POP CSVOPT+1~, CSVOPT+2
U FINDQOS+7, FINDQOS+9, FINDQOS+16, FINDQOS+20, CSVPEP+14, CSVPEP+15, CSVPEP+27, CSVPEP+28, QUEUE+14, QUEUE+15
, QUEUE+30, QUEUE+31
X QUEUE+36~, PAGE+2~
XMDUZ CSVPEP+3~, CSVPEP+36*
XMSUB CSVPEP+3~, CSVPEP+35*
XMTEXT CSVPEP+3~, CSVPEP+37*
XMY CSVPEP+3~
XMY("G.ORCM C SV EVENT" , CSVPEP+34*
Y QUEUE+36~, PAGE+2~
ZTDESC CSVOPT+4~, CSVOPT+5*
ZTDTH CSVOPT+4~, CSVOPT+6*
ZTIO CSVOPT+4~, CSVOPT+6*
>> ZTQUEUED QUEUE+1
>> ZTREQ QUEUE+1*
ZTRTN CSVOPT+4~, CSVOPT+6*
ZTSK CSVOPT+4~, CSVOPT+8
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