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

Package: Registration

Routine: DGOINPT


Information

DGOINPT ;RWA/SLC,XAK/ALBANY;ALB/MLI;ALB/REW - WARD ROSTER ; 6/11/03 12:26pm

Source Information

Source file <DGOINPT.m>

Entry Points

Name Comments DBIA/ICR reference
SETUP ;
WARD
PROV
NMRM ;
DSP
CPYS

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "Sort this report by (W)ard or (P)rovider? WARD// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: SETUP+1
Function Call: WRITE
  • Prompt: X
  • Line Location: SETUP+2
Function Call: WRITE
  • Prompt: !!?3,"Enter W to sort this report of inpatients by WARD",!?6,"or P to sort the report by PROVIDER."
  • Line Location: SETUP+4
Function Call: WRITE
  • Prompt: !,"Which provider? ",!!
  • Line Location: PROV+0
Function Call: READ
  • Timeout: DTIME
  • Line Location: PROV+1
Function Call: WRITE
  • Prompt: X
  • Line Location: PROV+2
Function Call: WRITE
  • Prompt: !!?3,"Enter P to sort this report of inpatients by PRIMARY CARE PHYSICIAN",!?9,"A to sort the report by ATTENDING PHYSICIAN, or",!?9,"E to print the report where the provider was EITHER",!?12,"Attending or Primary Care"
  • Line Location: PROV+4
Function Call: READ
  • Formatting: !!
  • Prompt: "Sub-sort by (N)ame of Patient or (R)oom NAME// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: NMRM+1
Function Call: WRITE
  • Prompt: X
  • Line Location: NMRM+2
Function Call: WRITE
  • Prompt: !!,"SECONDARY SORT ORDER:",!!?3,"Enter N to sort this report of inpatients by NAME",!?6,"or R to sort the report by ROOM NUMBER.",!!?6,"Note: ROOM NUMBER = First set of numbers that appear in ROOM-BED"
  • Line Location: NMRM+4
Function Call: WRITE
  • Prompt: !,"WOULD YOU LIKE THE INPATIENT ROSTER DOUBLE SPACED"
  • Line Location: DSP+0
Function Call: WRITE
  • Prompt: !?4,"Enter 'Y'es to double space this report, 'N'o to single space"
  • Line Location: DSP+0
Function Call: READ
  • Formatting: !
  • Prompt: "HOW MANY COPIES OF THE INPATIENT ROSTER WOULD YOU LIKE? 1//"
  • Variable: X
  • Timeout: DTIME
  • Line Location: CPYS+0
Function Call: WRITE
  • Prompt: !,"Enter a number from 1 to 10 indicating the number of copies you want printed."
  • Line Location: CPYS+0
Function Call: WRITE
  • Prompt: !!,*7,!!,"THIS REPORT REQUIRES 132 COLUMN OUTPUT"
  • Line Location: CPYS+1

FileMan Files Accessed Via FileMan Db Call

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