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 |  Marked Items |  All
Print Page as PDF
Routine: SCRPW9

Package: Scheduling

Routine: SCRPW9


Information

SCRPW9 ;RENO/KEITH - Outpatient Encounter Workload Statistics (cont.) ; 15 Jul 98 02:38PM

Source Information

Source file <SCRPW9.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Scheduling 4 ($$XY,SUBT,TITL)^SCRPW50  ($$STX,EXIT,STOP)^SCRPW8  DETAIL^SCRPW9  $$GETOE^SDOE  
VA Fileman 4 ^%DT  C^%DTC  ^DIC  ^DIR  
Kernel 1 EN^XUTMDEVQ  
Registration 1 $$PRIM^VASITE  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Scheduling 2 SCRPW8  SCRPW9  

Entry Points

Name Comments DBIA/ICR reference
PARM ;Prompt for report parameters
ZDIV ;Get division for detail
U1
DHDR
FDT
DPRT(SDS1,SDS2) ;Detail print
UNARL(SDS1,SDS2) ;Print list of 'action required'/not accepted uniques
V1
UHDR
LDT
ASK
TXS ;All transmission statuses
E2
UNP
E ;Print encounters
UNP1
U ;Print uniques
V ;Print visits
DET1
E1
DETAIL ;Ask questions for detail of encounters or uniques for a division
QUE
UNP2

External References

Name Field # of Occurrence
^%DT FDT, LDT
C^%DTC LDT
^DIC DET1, ZDIV+2
^DIR UHDR, DETAIL+1, DETAIL+3, DET1+5, DHDR, ASK+1, ASK+3
$$XY^SCRPW50 UHDR+2, DHDR+2
SUBT^SCRPW50 PARM+2, ASK
TITL^SCRPW50 PARM+1
$$STX^SCRPW8 UNP2
EXIT^SCRPW8 FDT, LDT, ASK+1, ASK+2, ASK+3, QUE+1
STOP^SCRPW8 UHDR+1, DHDR+1
DETAIL^SCRPW9 ASK+2
$$GETOE^SDOE UNP1+1
$$PRIM^VASITE ZDIV+1
EN^XUTMDEVQ QUE+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No 'action required'/not accepted unique patients identified."
  • Line Location: UNARL+2
Function Call: WRITE
  • Prompt: !!,SDARCT," 'action required'/not accepted unique patient",$S(SDARCT=1:"",1:"s")," identified."
  • Line Location: UNARL+4
Function Call: WRITE
  • Prompt: !,$E(SDPNAM,1,18),?20,SDSSN
  • Line Location: UNP+0
Function Call: WRITE
  • Prompt: !
  • Condition for execution: SDI
  • Line Location: UNP+1
Function Call: WRITE
  • Prompt: ?31,Y
  • Line Location: UNP+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: SDII
  • Line Location: UNP2+1
Function Call: WRITE
  • Prompt: ?44,$E(SDCL,1,17),?63,$E(SDST,1,17)
  • Line Location: UNP2+1
Function Call: WRITE
  • Prompt: $$XY^SCRPW50(IOF,1,0),SDLINE,!?8,"<*> LIST OF 'ACTION REQUIRED'/NOT ACCEPTED UNIQUE PATIENTS <*>",!?(66-$L(SDDNAM)\2),"For station: ",SDDNAM
  • Line Location: UHDR+2
Function Call: WRITE
  • Prompt: !,SDLINE,!,"For encounter dates ",SDDTPF," to ",SDDTPL,!,"Date printed: ",SDPNOW,?(74-$L(SDPAGE)),"Page: ",SDPAGE,!,SDLINE,!
  • Line Location: UHDR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DETAIL+1
Function Call: WRITE
  • Prompt: !!!,$C(7)," WARNING: Selection high activity areas will result in lengthy output!",!
  • Line Location: DETAIL+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DET1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DET1+5
Function Call: WRITE
  • Prompt: !
  • Line Location: ZDIV+2
Function Call: WRITE
  • Prompt: $C(7)," Required for patient detail!"
  • Line Location: ZDIV+3
Function Call: WRITE
  • Prompt: !,"No records found in this category."
  • Line Location: DPRT+5
Function Call: WRITE
  • Prompt: !!,SDCT," uniques identified."
  • Line Location: U+2
Function Call: WRITE
  • Prompt: !,$E(SDPNAM,1,18),?21,SDSSN
  • Line Location: U1+0
Function Call: WRITE
  • Prompt: !!,SDCT," visits identified."
  • Line Location: V+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: SDI
  • Line Location: V1+1
Function Call: WRITE
  • Prompt: ?32,Y
  • Line Location: V1+1
Function Call: WRITE
  • Prompt: !!,SDCT," encounters identified."
  • Line Location: E+2
Function Call: WRITE
  • Prompt: !,$E(SDPNAM,1,18),?21,SDSSN
  • Line Location: E1+0
Function Call: WRITE
  • Prompt: !
  • Condition for execution: SDI
  • Line Location: E2+0
Function Call: WRITE
  • Prompt: ?32,$P(Y,":",1,2),?50,SDHL
  • Line Location: E2+0
Function Call: WRITE
  • Prompt: !?(80-$L(SDH(I))\2),SDH(I)
  • Line Location: DHDR+2
Function Call: WRITE
  • Prompt: !,SDLINE,!,"For date range: ",SDDTPF," to ",SDDTPL,!,"Date printed: ",SDPNOW,?(74-$L(SDPAGE)),"Page: ",SDPAGE,!,SDLINE,!
  • Line Location: DHDR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: FDT+0
Function Call: WRITE
  • Prompt: " ",Y,!
  • Line Location: FDT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: FDT+1
Function Call: WRITE
  • Prompt: " ",Y,!
  • Line Location: LDT+0
Function Call: WRITE
  • Prompt: !!,$C(7),"Ending date must be after beginning date!",!
  • Line Location: LDT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+3
Routine Call
  • DIC
  • Line Location:
    • DET1
    • ZDIV+2
Routine Call
  • DIR
  • Line Location:
    • UHDR
    • DETAIL+1
    • DETAIL+3
    • DET1+5
    • DHDR
    • ASK+1
    • ASK+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(40.8 - [#40.8] Classic Fileman Calls
^SD(409.63 - [#409.63] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" UNP+1, V1+1, E2, FDT, FDT+1, LDT, LDT+2
^DG(40.8 - [#40.8] ZDIV+1
^DG(43 - [#43] ZDIV+1
^SC - [#44] UNP2, E2
^SCE("ADFN" UNP1, UNP1+1
^SD(409.63 - [#409.63] UNP2, DPRT+3
^TMP( UNARL+2, UNARL+3, UNP, UNP+1, UHDR+4, DPRT+5, U+1, U1, V+1, V1
, E+1, E1+1, E2

Label References

Name Line Occurrences
@( DPRT+6
ASK LDT
DHDR DPRT+5, U1, V1, V1+1, E1, E2
E1 E+1
E2 E1+1
FDT FDT+1
LDT FDT, LDT+1, LDT+2
U1 U+1
UHDR UNARL+2, UNARL+4, UNP, UNP+1, UNP2+1
UNP UNARL+3
UNP1 UNP+1
UNP2 UNP1+1
V1 V+1
ZDIV DETAIL+4, DET1+1, ZDIV+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT PARM+2~, FDT*
%DT("A" FDT*, LDT*
%DT(0 FDT*
>> DFN UNARL+3*, UNP, UNP+1, UNP1, UNP1+1, U+1*, U1, V+1*, V1, E+1*
, E1+1, E2
DIC DET1!*, ZDIV+2!*, PARM+2~
DIC("A" DET1*, ZDIV+2*
DIC("S" DET1*
DIC(0 DET1*, ZDIV+2*
DIR UHDR~, DETAIL+1!, DETAIL+3!, DET1+1!, DHDR~, PARM+2~, ASK+1!, ASK+3!
DIR("?" ASK+1*
DIR("A" DETAIL+1*, DETAIL+3*, DET1+1*, ASK+1*, ASK+3*
DIR("B" DETAIL+1*, ASK+1*, ASK+3*
DIR(0 UHDR*, DETAIL+1*, DETAIL+3*, DET1+2*, DET1+3*, DET1+4*, DHDR*, ASK+1*, ASK+3*
DT LDT
>> DTOUT DETAIL+1, DETAIL+3, DET1, DET1+5, ZDIV+2, FDT, LDT, ASK+1, ASK+3
>> DUOUT DETAIL+1, DETAIL+3, DET1, DET1+5, ZDIV+2, ASK+1, ASK+3
>> I DHDR+2*
IOF UHDR+2, DHDR+2
IOSL UNARL+4, UNP, UNP+1, UNP2+1, U1, V1, V1+1, E1, E2
IOST UHDR, DHDR
>> SDARCT UNARL+3*, UNARL+4, UNP+1*
SDCL UNP2~*, UNP2+1
>> SDCLGR ASK+1*
>> SDCT DPRT+6*, U+2, U1*, V+2, V1+1*, E+2, E2*
>> SDDNAM UHDR+2
>> SDDT UNP+1*, UNP1, V1*, V1+1, E1+1*, E2
SDDT1 UNP1~*, UNP1+1
>> SDDTF FDT*, FDT+1*, LDT+1
>> SDDTL LDT*, LDT+2*
>> SDDTPF UHDR+3, DHDR+3, FDT*, FDT+1*
>> SDDTPL UHDR+3, DHDR+3, LDT*, LDT+2*
SDH DPRT+2!
SDH( DHDR+2
SDH(1 DPRT+2*
SDH(2 DPRT+2*
SDH(3 DPRT+3*
SDH(4 DPRT+4*
>> SDHL E2*
>> SDI UNP+1*, V1*, V1+1*, E1+1*, E2*, QUE*
SDII UNP1~*, UNP2+1*
>> SDLINE UHDR+2, UHDR+3, DHDR+2, DHDR+3
>> SDOE UNP1+1*, UNP2, E1+1*, E2
>> SDOE0 UNP1+1*, UNP2
>> SDOUT UNARL+2, UNARL+3, UNARL+4, UNP, UNP+1, UNP1, UNP1+1, UNP2+1, UHDR*, UHDR+1
, DPRT+5, U+1, U+2, U1, V+1, V+2, V1, V1+1, E+1, E+2
, E1, E1+1, E2, DHDR*, DHDR+1
>> SDPAGE UNARL+2*, UHDR+3*, DPRT+2*, DHDR+3*
>> SDPNAM UNARL+3*, UNP, UNP+1, U+1*, U1, V+1*, V1, E+1*, E1, E1+1
, E2
>> SDPNOW UHDR+3, DHDR+3
SDS1 UNARL~, UNARL+2, UNARL+3, UNP, UNP+1, UHDR+4, DPRT~, DPRT+5, U+1, U1
, V+1, V1, E+1, E1+1, E2
SDS2 UNARL~, UNARL+2, UNARL+3, UNP, UNP+1, UHDR+4, DPRT~, DPRT+5, U+1, U1
, V+1, V1, E+1, E1+1, E2
>> SDSSN UNP*, UNP+1, U1*, V+1*, V1, E+1*, E1, E1+1, E2
SDST UNP2~*, UNP2+1
>> SDUL ASK+3*
SDZ DETAIL+1!
SDZ(0 DETAIL+1*, DETAIL+2*, DETAIL+3*, DET1*, DET1+5*, ZDIV+2*, ASK+2
SDZ(1 DETAIL+4*, DPRT+2, DPRT+6
SDZ(2 DET1+1*, DET1+4, DPRT+3, DPRT+4
SDZ(3 DET1+6*
SDZ(4 ZDIV+1*, ZDIV+4*, DPRT+2
U UNP1+1, UNP2, DET1+1, ZDIV+1, ZDIV+4, DPRT+3, E2, FDT, LDT
>> X FDT, LDT
>> X1 LDT*
>> X2 LDT*
>> Y UNP+1*, UHDR, DETAIL+2, DETAIL+4, DET1, DET1+1, DET1+6, ZDIV+3, ZDIV+4, V1+1*
, E2*, DHDR, FDT*, FDT+1, LDT*, LDT+1, LDT+2, ASK+1, ASK+3
>> ZTDESC QUE*, QUE+1
>> ZTRTN QUE*, QUE+1
>> ZTSAVE QUE+1
>> ZTSAVE( QUE*

Marked Items

Name Field # of Occurrence
$T(TXS+SDZ(1) DPRT+4
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 |  Marked Items |  All