Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

Name Comments DBIA/ICR reference
SET
ERR
LEG
NONE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ERR+0
Function Call: WRITE
  • Prompt: !?37,"***ERRORS***",?70,"PAGE: ",$J(SDPG,4)
  • Line Location: ERR+0
Function Call: WRITE
  • Prompt: !?37,"***ERRORS***",?70,"PAGE: ",$J(SDPG,4)
  • Line Location: ERR+0
Function Call: WRITE
  • Prompt: !?37,"***ERRORS***",?70,"PAGE: ",$J(SDPG,4)
  • Line Location: ERR+0
Function Call: WRITE
  • Prompt: !!,"Invalid pointer to stop code file for the following clinics:"
  • Line Location: ERR+1
Function Call: WRITE
  • Prompt: !?3,I
  • Line Location: ERR+1
Function Call: WRITE
  • Prompt: !!,"***APPTS MADE TO CLINICS ABOVE WERE NOT INCLUDED IN WORKLOAD COMPUTATIONS***"
  • Line Location: ERR+2
Function Call: WRITE
  • Prompt: !!,"Stop code between 900 and 907 assigned to the following clinics:"
  • Line Location: ERR+3
Function Call: WRITE
  • Prompt: !?3,I
  • Line Location: ERR+3
Function Call: WRITE
  • Prompt: !!,"Credit stop code between 900 and 907 assigned to the following clinics:"
  • Line Location: ERR+4
Function Call: WRITE
  • Prompt: !?3,I
  • Line Location: ERR+4
Function Call: WRITE
  • Prompt: !,"***THESE STOP CODES MUST BE CHANGED TO ACTIVE STOP CODES***",!,"***THEY WERE INCLUDED IN WORKLOAD***"
  • Line Location: ERR+5
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: VAUTC(I),", "
  • Line Location: NONE+2
Function Call: WRITE
  • Prompt: !,"FOR DIVISION(S): "
  • Line Location: NONE+3
Function Call: WRITE
  • Prompt: "ALL"
  • Condition for execution: VAUTD
  • Line Location: NONE+3
Function Call: WRITE
  • Prompt: VAUTD(I),", "
  • Line Location: NONE+3
Info |  Source |  Entry Points |  Interaction Calls