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 |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: SDCWL3

Package: Scheduling

Routine: SDCWL3


Information

SDCWL3 ;ALB/MLI - CLINIC WORKLOAD REPORT CONTINUATION ; 25 MAY 88

Source Information

Source file <SDCWL3.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
Scheduling 1 (PRO,PRO1)^SDCWL2  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Scheduling 2 SDCWL  SDCWL1  
PCE Patient Care Encounter 1 PXRRPCE  

Entry Points

Name Comments DBIA/ICR reference
NONE
SET
ERR ;IHS/ITSC/WAR 4/20/04 1 Mod to handle StopCode,2nd Mod Name field
LEG

External References

Name Field # of Occurrence
PRO^SDCWL2 SET+16
PRO1^SDCWL2 SET+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?37,"***ERRORS***",?70,"PAGE: ",$J(SDPG,4)
  • Line Location: ERR+1
Function Call: WRITE
  • Prompt: !!,"No stop code assigned to the following clinics:"
  • Line Location: ERR+1
Function Call: WRITE
  • Prompt: !!,"No stop code assigned to the following clinics:"
  • Line Location: ERR+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ERR+2
Function Call: WRITE
  • Prompt: !?37,"***ERRORS***",?70,"PAGE: ",$J(SDPG,4)
  • Line Location: ERR+2
Function Call: WRITE
  • Prompt: !?37,"***ERRORS***",?70,"PAGE: ",$J(SDPG,4)
  • Line Location: ERR+2
Function Call: WRITE
  • Prompt: !?37,"***ERRORS***",?70,"PAGE: ",$J(SDPG,4)
  • Line Location: ERR+2
Function Call: WRITE
  • Prompt: !!,"Invalid pointer to stop code file for the following clinics:"
  • Line Location: ERR+3
Function Call: WRITE
  • Prompt: !?3,I
  • Line Location: ERR+3
Function Call: WRITE
  • Prompt: !!,"Invalid pointer to stop code file for the following clinics:"
  • Line Location: ERR+4
Function Call: WRITE
  • Prompt: !?3,I
  • Line Location: ERR+4
Function Call: WRITE
  • Prompt: !!,"***APPTS MADE TO CLINICS ABOVE WERE NOT INCLUDED IN WORKLOAD COMPUTATIONS***"
  • Line Location: ERR+6
Function Call: WRITE
  • Prompt: !!,"Stop code between 900 and 907 assigned to the following clinics:"
  • Line Location: ERR+7
Function Call: WRITE
  • Prompt: !?3,I
  • Line Location: ERR+7
Function Call: WRITE
  • Prompt: !!,"Credit stop code between 900 and 907 assigned to the following clinics:"
  • Line Location: ERR+8
Function Call: WRITE
  • Prompt: !?3,I
  • Line Location: ERR+8
Function Call: WRITE
  • Prompt: !,"***THESE STOP CODES MUST BE CHANGED TO ACTIVE STOP CODES***",!,"***THEY WERE INCLUDED IN WORKLOAD***"
  • Line Location: ERR+9
Function Call: WRITE
  • Prompt: !
  • Line Location: LEG+0
Function Call: WRITE
  • Prompt: !
  • Line Location: LEG+1
Function Call: WRITE
  • Prompt: !?11,$P($T(LEG+S),";;",2)
  • Line Location: LEG+1
Function Call: WRITE
  • Prompt: @IOF,"***CLINIC WORKLOAD REPORTS HAVE RUN -- NO MATCHES FOUND***",!!!,"DATE RANGE: ",SDB,"-",SDE,!," DATE RUN: ",SDNOW,!,"SORTED BY ",$S(SDS="C":"CLINIC",1:"STOP CODE"),"(S): ",$S(SDALL!VAUTC:"ALL",1:"")
  • Line Location: NONE+0
Function Call: WRITE
  • Prompt: I,", "
  • Line Location: NONE+1
Function Call: WRITE
  • Prompt: I,", "
  • Line Location: NONE+2
Function Call: WRITE
  • Prompt: VAUTC(I),", "
  • Line Location: NONE+3
Function Call: WRITE
  • Prompt: !,"FOR DIVISION(S): "
  • Line Location: NONE+4
Function Call: WRITE
  • Prompt: "ALL"
  • Condition for execution: VAUTD
  • Line Location: NONE+4
Function Call: WRITE
  • Prompt: VAUTD(I),", "
  • Line Location: NONE+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] SET
^DIC(40.7 - [#40.7] SET+6, SET+10, SET+13
^DPT - [#2] SET+16, SET+17
^DPT("ASDCN" SET+17
^SC - [#44] SET, SET+10, SET+16, SET+18
^TMP($J SET*, SET+9*, SET+10*, SET+13*, ERR+7, ERR+8
^UTILITY($J SET+7*, ERR+2, ERR+4

Naked Globals

Name Field # of Occurrence
^( SET, SET+16, SET+18
^("OB" SET+16
^("S" SET, SET+16
^(0 SET, SET+10, SET+16, SET+17, SET+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN SET+16*, SET+17*, SET+18
>> I SET, SET+10, SET+16, SET+17, SET+18, ERR+2*, ERR+4*, ERR+7*, ERR+8*, NONE+2*
, NONE+3*, NONE+4*
>> I1 ERR+2*, ERR+4*, ERR+7*, ERR+8*
IOF ERR+2, NONE
IOSL LEG
>> J SET+16*, SET+17*, SET+18
>> K SET+16*, SET+17*
>> NULL ERR+2*, ERR+4
>> S LEG*, LEG+1*
>> SD1 LEG, LEG+1, LEG+2*
>> SDALL SET+13, NONE
>> SDAS SET+17*
>> SDB NONE
>> SDBD SET, SET+16, SET+17
>> SDCL( SET+13, NONE+2
>> SDCR SET+10*, SET+13
>> SDDIV SET*, SET+1
>> SDE NONE
>> SDED SET, SET+16, SET+17
>> SDF1 SET+13*, SET+14*
>> SDF2 SET+13*, SET+14
>> SDFL ERR+2*, ERR+4*, ERR+6, ERR+7*, ERR+8*, ERR+9
>> SDN SET*, SET+7, SET+9, SET+10, SET+13
>> SDNOW NONE
>> SDOB SET+16*, SET+17*
>> SDPG ERR+2*
>> SDS SET+13, SET+14, NONE, NONE+2, NONE+3
>> SDSC SET*, SET+6*, SET+7, SET+8*, SET+9, SET+13
>> SDST SET*, SET+13
U SET, SET+6, SET+13, SET+16, SET+17
>> VAUTC NONE
>> VAUTC( NONE+3
>> VAUTD SET+1, NONE+4
>> VAUTD( SET+1, NONE+4
>> Y SET+18*, SET+19

Marked Items

Name Field # of Occurrence
$T(LEG+S LEG+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  Marked Items |  All