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 |  Local Variables  | All
Print Page as PDF
Routine: SCRPW8

Package: Scheduling

Routine: SCRPW8


Information

SCRPW8 ;RENO/KEITH - Outpatient Encounter Workload Statistics ; 04 Feb 99 4:53 PM

Source Information

Source file <SCRPW8.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Scheduling 4 DISP0^SCRPW23  ($$XY,END)^SCRPW50  (DPRT,PARM,UNARL)^SCRPW9  $$GETOE^SDOE  
VA FileMan 3 NOW^%DTC  $$GET1^DIQ  ^DIR  
Registration 2 (,KVA)^VADPT  $$PRIM^VASITE  
Kernel 1 $$S^%ZTLOAD  

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

Package Total Caller Graph
Scheduling 6 SCRPW OUT ENC WORKLOAD STATS  SCRPW24  SCRPW7  SCRPW9  SD53198P  SD53P215  

Entry Points

Name Comments DBIA/ICR reference
QS ;Queue outpatient encounter workload report
PST ;Print stats
STCT
PRPT ;Print statistics page
XHDR
EXIT
HD1() ;Report subheader 1
HD2() ;Report subheader 2
DIV() ;Return division name
CLGR() ;Return CLINIC GROUP pointer
NCT1
CT1
UL(SDI)
TOT
SHDR(SDTX)
LIST(SDI)
COT
IAP
STOP ;Check for stop task request
COUNT ;Count encounters
C1(SDS1,SDS2) ;Set ^TMP global
VIS
STX(SDOE,SDOE0) ;Determine transmission status
DETAIL ;Set global for detailed list
DSET

External References

Name Field # of Occurrence
NOW^%DTC PST+2
$$S^%ZTLOAD STOP+1
$$GET1^DIQ PST+3
^DIR XHDR
DISP0^SCRPW23 PST+10
$$XY^SCRPW50 XHDR+1
END^SCRPW50 EXIT+2
DPRT^SCRPW9 PST+13
PARM^SCRPW9 QS+1
UNARL^SCRPW9 PST+13
$$GETOE^SDOE PST+6
^VADPT UL, DETAIL+2
KVA^VADPT EXIT+1
$$PRIM^VASITE PST+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?(80-$L(SDX)\2),SDX
  • Line Location: PST+8
Function Call: READ
  • Variable: W O R K L O A D") Q
  • Timeout: SDOUT
  • Line Location: PRPT+3
Function Call: READ
  • Variable: K L O A D") Q
  • Timeout: SDOUT
  • Line Location: PRPT+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRPT+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRPT+8
Function Call: WRITE
  • Prompt: !?10,"Act. Req./not accepted visits",?47,$J(^TMP(SDS1,$J,SDS2,"VISIT","NWK"),12),?62,$J($S(SDCT=0:0,1:(^TMP(SDS1,$J,SDS2,"VISIT","NWK")*100/SDCT)),8,2)
  • Line Location: PRPT+9
Function Call: WRITE
  • Prompt: !?10,"Transmitted, accepted visits",?47,$J(^TMP(SDS1,$J,SDS2,"VISIT","OWK"),12),?62,$J($S(SDCT=0:0,1:(^TMP(SDS1,$J,SDS2,"VISIT","OWK")*100/SDCT)),8,2)
  • Line Location: PRPT+10
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRPT+12
Function Call: WRITE
  • Prompt: !?10,"Act. Req./not accepted unique pts.",?47,$J(SDUNAR,12),?62,$J($S(SDCT=0:0,1:SDUNAR*100/SDCT),8,2)
  • Line Location: PRPT+14
Function Call: WRITE
  • Prompt: !?10,"Transmitted, accepted unique pts.",?47,$J(SDUNCO,12),?62,$J($S(SDCT=0:0,1:SDUNCO*100/SDCT),8,2)
  • Line Location: PRPT+15
Function Call: WRITE
  • Prompt: $$XY^SCRPW50(IOF,1,0)
  • Condition for execution: SDPAGE>1!($E(IOST)="C")
  • Line Location: XHDR+1
Function Call: WRITE
  • Prompt: $$XY^SCRPW50("",0,0)
  • Condition for execution: $X
  • Line Location: XHDR+1
Function Call: WRITE
  • Prompt: SDLINE,!?15,"<*> OUTPATIENT ENCOUNTER WORKLOAD STATISTICS <*>"
  • Line Location: XHDR+1
Function Call: WRITE
  • Prompt: !?(80-$L(X)\2),X
  • Line Location: XHDR+2
Function Call: WRITE
  • Prompt: !,SDLINE,!,"For encounter dates ",SDDTPF," to ",SDDTPL,!,"Date printed: ",SDPNOW,?(74-$L(SDPAGE)),"Page: ",SDPAGE,!,SDLINE,!
  • Line Location: XHDR+3
Function Call: WRITE
  • Prompt: !?47,"============ =========",!?39,"TOTAL:",?47,$J(SDCT,12),?64,"100.00"
  • Line Location: TOT+0
Function Call: WRITE
  • Prompt: !!?(80-$L(SDTX)\2),SDTX,!?(80-$L(SDTX)\2)
  • Line Location: SHDR+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SHDR+0
Function Call: WRITE
  • Prompt: !!?39,"Status",?54,"Count",?63,"Percent",!?10,"----------------------------------- ------------ ---------"
  • Line Location: SHDR+1
Function Call: WRITE
  • Prompt: !?10,$P(^SD(409.63,+SDI,0),U),?47,$J(^TMP(SDS1,$J,SDS2,SDI),12),?62,$J($S(SDCT=0:0,1:(^TMP(SDS1,$J,SDS2,SDI)*100/SDCT)),8,2)
  • Line Location: LIST+1
Function Call: WRITE
  • Prompt: !?15,SDSTAT,?47,$J(^TMP(SDS1,$J,SDS2,2,SDI,SDSTAT),12),?62,$J($S(SDCT=0:0,1:(^TMP(SDS1,$J,SDS2,2,SDI,SDSTAT)*100/SDCT)),8,2)
  • Line Location: COT+0
Function Call: WRITE
  • Prompt: !?15,SDSTAT,?47,$J(^TMP(SDS1,$J,SDS2,"8-CC",SDI,SDSTAT),12),?62,$J($S(SDCT=0:0,1:(^TMP(SDS1,$J,SDS2,"8-CC",SDI,SDSTAT)*100/SDCT)),8,2)
  • Line Location: IAP+0
Routine Call
  • DIR
  • Line Location:
    • XHDR

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" PST+2
^DG(40.8 - [#40.8] PST+3, DIV+1
^DG(43 - [#43] PST+2
^SC - [#44] CLGR+1, COUNT+1
^SCE("B" PST+5, PST+6
^SD(409.63 - [#409.63] LIST+1
^SD(409.67 - [#409.67] CLGR+1
^SD(409.73 - [#409.73] STX+5, STX+6
^SD(409.75 - [#409.75] STX+8
^SD(409.76 - [#409.76] STX+8
^TMP( PST+4!, PST+9, PST+11, STCT+1, STCT+2*, STCT+3, STCT+4, STCT+5*, PRPT+2, PRPT+4
, PRPT+5, PRPT+6, PRPT+8, PRPT+9, PRPT+10, PRPT+13, EXIT+1!, NCT1, NCT1+1, CT1
, CT1+1, UL*, LIST, LIST+1, COT, IAP, C1+6*, VIS*, VIS+2*, VIS+3*
, VIS+4*, DETAIL+3*, DETAIL+4*, DSET*
^TMP("SCRPW" PST+8, XHDR+2

Label References

Name Line Occurrences
$$CLGR PST+6
$$DIV PST+6
$$HD1 XHDR+2
$$HD2 PRPT+8, PRPT+12
$$STX VIS+3, DETAIL+12
C1 COUNT+3
COT PRPT+4
COUNT PST+6
CT1 STCT+4
DETAIL C1+5
DSET DETAIL+8, DETAIL+11, DETAIL+12
EXIT PST+8, PST+10, PST+12, PST+13
IAP PRPT+5
LIST PRPT+3, PRPT+7
NCT1 STCT+3
PRPT PST+11
SHDR PRPT+3, PRPT+7, PRPT+8, PRPT+12
STCT PST+9
STOP STCT, PRPT+1, COUNT+2
TOT PRPT+6, PRPT+8, PRPT+11, PRPT+15
UL NCT1, CT1
VIS C1+7
XHDR PST+8, PRPT+3, PRPT+4, PRPT+5, PRPT+9, PRPT+10, PRPT+14, PRPT+15, SHDR, LIST
, COT, IAP

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PST+1~, PST+2
DFN STCT*, STCT+1*, STCT+2*, STCT+3*, STCT+4*, EXIT!, NCT1, NCT1+1, CT1, CT1+1
, UL, C1+4*, VIS, VIS+4, DETAIL+3, DETAIL+4, DSET
DIR XHDR~
DIR(0 XHDR*
DTOUT EXIT!
DUOUT EXIT+1!
I PST+4*, EXIT+1*, EXIT+2!
IOF XHDR+1
IOSL PRPT+4, PRPT+5, PRPT+9, PRPT+10, PRPT+14, PRPT+15, SHDR, LIST, COT, IAP
IOST PST+10, XHDR, XHDR+1
SDARCT EXIT+1!
SDCG PST+6*, EXIT+1!, COUNT+3
SDCLGR EXIT+1!, COUNT+3
SDCT STCT*, STCT+1*, STCT+2*, STCT+5, PRPT+2*, PRPT+6*, PRPT+8*, PRPT+9, PRPT+10, PRPT+13*
, PRPT+14, PRPT+15, EXIT!, NCT1+1*, CT1+1*, TOT, LIST+1, COT, IAP
SDDIV PST+6*, EXIT+1!, COUNT+3, C1+5
SDDNAM PST+3*, PST+13, EXIT+1!, COUNT+3
SDDT PST+2*, PST+5*, PST+6, STCT+1*, EXIT!, NCT1+1*, CT1+1*, UL*, VIS, VIS+4
, DETAIL+4, DSET
SDDTF PST+2, EXIT!
SDDTL PST+5, EXIT!
SDDTPF XHDR+3, EXIT!
SDDTPL XHDR+3, EXIT!
SDFF PST+2*, EXIT+2!
SDH EXIT+1!
SDHL EXIT+1!
SDI PRPT+2*, PRPT+3*, PRPT+4*, PRPT+5*, PRPT+6*, PRPT+7*, EXIT!, UL~, LIST~, LIST+1
, COT, IAP
SDIF DETAIL+1~*, DETAIL+6, DETAIL+7*, DETAIL+8*, DETAIL+9, DETAIL+10*, DETAIL+11*
SDLINE XHDR+1*, XHDR+3, EXIT!
SDMC PST+2*, PST+3, EXIT+1!
SDMD PST+2*, EXIT+1!, COUNT+3
SDNCOU EXIT+2!, COUNT+1*, C1+4, VIS, DETAIL+3, DETAIL+4
SDOE PST+5*, PST+6*, EXIT!, VIS+3, STX~, STX+5, DETAIL+12, DSET
SDOE0 PST+6*, EXIT!, DIV+1, CLGR+1, COUNT+1, C1+4, VIS+1, VIS+3, STX~, STX+4
, DETAIL+12, DSET
SDOUT PST+2*, PST+5, PST+6, PST+9, PST+10, PST+11, PST+12, PST+13, STCT, PRPT+1
, PRPT+3, PRPT+4, PRPT+5, PRPT+7, PRPT+8, PRPT+9, PRPT+10, PRPT+12, PRPT+14, PRPT+15
, XHDR*, EXIT+2!, SHDR, LIST, COT, IAP, STOP+1*, COUNT+2
SDPAGE PST+2*, XHDR, XHDR+1, XHDR+3*, EXIT+1!
SDPNAM EXIT+1!, DETAIL+2*, DETAIL+3, DETAIL+4, DSET
SDPNOW PST+2*, XHDR+3, EXIT!, EXIT+1!
SDPT0 EXIT+1!
SDS1 PST+9*, PST+11*, STCT+1, STCT+2, STCT+3, STCT+4, STCT+5, PRPT+2, PRPT+4, PRPT+5
, PRPT+6, PRPT+8, PRPT+9, PRPT+10, PRPT+13, EXIT+1!, HD1+1, HD2+1, NCT1, NCT1+1
, CT1, CT1+1, UL, LIST, LIST+1, COT, IAP, C1~, C1+5, C1+6
, VIS, VIS+2, VIS+3, VIS+4, DETAIL+3, DETAIL+4, DSET
SDS2 PST+9*, PST+11*, STCT+1, STCT+2, STCT+3, STCT+4, STCT+5, PRPT+2, PRPT+4, PRPT+5
, PRPT+6, PRPT+8, PRPT+9, PRPT+10, PRPT+13, EXIT+1!, HD1+1, NCT1, NCT1+1, CT1
, CT1+1, UL, LIST, LIST+1, COT, IAP, C1~, C1+6, VIS, VIS+2
, VIS+3, VIS+4, DETAIL+3, DETAIL+4, DSET
SDSSN EXIT+1!, DETAIL+2*, DETAIL+3, DETAIL+4, DSET
SDST EXIT+1!
SDSTAT PRPT+4*, PRPT+5*, EXIT!, COT, IAP, C1+4*, C1+6, C1+7, VIS, VIS+1
, VIS+2, VIS+3, DETAIL+3, DETAIL+4, DETAIL+6, DETAIL+7, DETAIL+9, DETAIL+10
SDSTOP PST+2*, EXIT+2!, COUNT+2*
SDSTX EXIT!, VIS+3*, VIS+4
SDTOE EXIT!, STX+3~, STX+5*, STX+6, STX+8
SDTOE0 EXIT!, STX+6*
SDTOE1 EXIT!, STX+6*, STX+9, STX+10
SDTOEE EXIT!, STX+3~, STX+8*
SDTX EXIT!, SHDR~
SDTXS EXIT!, STX+10*, STX+11, STX+12
SDUL PST+13, EXIT+1!, NCT1, CT1
SDUNAR STCT+2*, STCT+5, PRPT+13*, PRPT+14, EXIT!, NCT1*, CT1*
SDUNCO STCT*, STCT+1*, STCT+2, PRPT+13*, PRPT+15, EXIT!
SDX PST+8*, EXIT!, SHDR*
SDZ EXIT!
SDZ(0 PST+13, C1+5
SDZ(1 DETAIL+3, DETAIL+4
SDZ(2 DETAIL+5, DETAIL+6, DETAIL+7, DETAIL+9
SDZ(3 DETAIL+7, DETAIL+11, DETAIL+12
SDZ(4 C1+5
U PST+2, PST+3, PST+6, DIV+1, CLGR+1, UL, LIST+1, COUNT+1, C1+4, VIS+1
, VIS+3, VIS+4, STX+4, STX+6, STX+8, STX+9, STX+10, DETAIL+2, DSET
>> VADM(1 UL, DETAIL+2
>> VADM(2 UL, DETAIL+2
X PST+1~, XHDR+2*, EXIT!, DIV+1~*, CLGR+1~*
X1 EXIT+1!
X2 EXIT+1!
Y PST+1~, PST+2*, XHDR, EXIT!
ZTDESC EXIT!
>> ZTQUEUED STOP+1
ZTRTN EXIT!
ZTSAVE EXIT!
>> ZTSTOP STOP+1*
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 |  Local Variables  | All