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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: SDCIAL

Package: Scheduling

Routine: SDCIAL


Information

SDCIAL ;ALB/TMP - INPATIENT APPOINTMENT LIST ;16 JAN 86

Source Information

Source file <SDCIAL.m>

Entry Points

Name Comments DBIA/ICR reference
RD
RD1
START
PT ;build patient list
DFN ;retrieve appt data for list of patients
WRT
APPT
WRTC
HD
END

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !
  • Prompt: "FOR WARD (TYPE 'ALL' FOR ALL WARDS): "
  • Variable: X
  • Timeout: DTIME
  • Line Location: RD+0
Function Call: WRITE
  • Prompt: !,"ENTER A WARD NAME OR ALL FOR ALL WARDS"
  • Line Location: RD+0
Function Call: WRITE
  • Prompt: *7,!,"Start date must be in the future"
  • Line Location: RD1+0
Function Call: WRITE
  • Prompt: @IOF,?29,"INPATIENT APPOINTMENT LIST",!
  • Line Location: WRT+0
Function Call: WRITE
  • Prompt: !!,$$SDAPIERR^SDAMUTDT()
  • Line Location: WRT+0
Function Call: WRITE
  • Prompt: @IOF,?29,"INPATIENT APPOINTMENT LIST",!
  • Line Location: WRT+1
Function Call: WRITE
  • Prompt: !!,"NO MATCHES FOUND!"
  • Line Location: WRT+1
Function Call: WRITE
  • Prompt: !!
  • Condition for execution: SD2
  • Line Location: APPT+0
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: APPT+0
Function Call: WRITE
  • Prompt: !,?2,$P(I3,"~",1),?34,$P(^DPT($P(I3,"~",2),0),"^",9)
  • Line Location: APPT+2
Function Call: WRITE
  • Prompt: !,?2,$P(I3,"~",1),?34,$P(^DPT($P(I3,"~",2),0),"^",9)," (CONTINUED)"
  • Line Location: WRTC+0
Function Call: WRITE
  • Prompt: !,?5,$P(^SC(+SDY,0),"^",1)
  • Line Location: WRTC+1
Function Call: WRITE
  • Prompt: ?37,$J(Y,8)
  • Line Location: WRTC+1
Function Call: WRITE
  • Prompt: ?37,$J(Y,8)
  • Line Location: WRTC+1
Function Call: WRITE
  • Prompt: !,?15,$P(^(I4),"^",6)
  • Line Location: WRTC+3
Function Call: WRITE
  • Prompt: !,@IOF,!,?29,"INPATIENT APPOINTMENT LIST",?69,"PAGE: ",SDPG,!
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: ?SDOS,"WARD: ",I
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: ?SDOS,"WARD: ",I
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: !!,"APPOINTMENT DATE",!,?2,"PATIENT NAME",?34,"SSN",!,?38,"APPOINT",?52,"LAB",?62,"XRAY",?72,"EKG",!,?5,"CLINIC",?38,"TIME"
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: ?A,"TIME"
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !,?15,"OTHER INFORMATION",!
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HD+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(42 - [#42] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call