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

Package: Nursing Service

Routine: NURARPC0


Information

NURARPC0 ;HIRMFO/MD-DRIVER TO PRINT AMIS 1106 ACUITY REPORTS ;2/28/96

Source Information

Source file <NURARPC0.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ; ENTRY FROM OPTION NURAPR-RES-PCSER
EN2 ; ENTRY FROM OPTION NURAPR-RES-PCLOC
HSKEEP ; SET LOCAL VARIABLES
START ;
QUIT ; KILL LOCAL VARIABLES
RPTYPSEL ; SELECT WHETHER REPORT IS BED SECTION OR WARD
REPTYPE ;
HOSPSEL ; SET UP FOR WHOLE HOSPITAL REPORT
WARDSEL ; SELECT WARD FOR REPORT
ASK
BEDSEL ; SELECT BED SECTION FOR REPORT
TIMESEL ; SELECT REPORT RANGE (DAILY, MONTHLY, QUARTERLY OR ANNUALLY)
TIME ;
ERROR ; ERROR IN SELECTION PROCESS

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: HSKEEP+6
Function Call: WRITE
  • Prompt: !!!!,?21,"Patient Classification Data",!!,?19,"AMIS Report 10-1106 Segment 200"
  • Line Location: RPTYPSEL+1
Function Call: WRITE
  • Prompt: !
  • Line Location: REPTYPE+2
Function Call: WRITE
  • Prompt: !!,?13,"Please select whether this report is to show",!,?13,"acuity by unit or bed section"
  • Line Location: REPTYPE+3
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: REPTYPE+8
Function Call: READ
  • Formatting: !!
  • Prompt: "Select Nursing Unit: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"Select Nursing Bed Section (Press return for all bed sections): "
  • Line Location: BEDSEL+1
Function Call: READ
  • Variable: NBDSECT
  • Timeout: DTIME
  • Line Location: BEDSEL+2
Function Call: WRITE
  • Prompt: !!,?13,"Select report range: ",!!,?18,"Daily",!,?18,"Monthly",!,?18,"Quarterly",!,?18,"Annually"
  • Line Location: TIMESEL+1
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TIME+5
Function Call: WRITE
  • Prompt: !!,$C(7),"CANNOT RUN REPORT, PARAMETERS WERE BADLY CHOSEN"
  • Line Location: ERROR+1

FileMan Files Accessed Via FileMan Db Call

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