- ADGH01 ; IHS/ADC/PDW/ENM - HELP FOR SYS DEF OPTIONS ; [ 03/25/1999 11:48 AM ]
- ;;5.0;ADMISSION/DISCHARGE/TRANSFER;;MAR 25, 1999
- ;
- SYS1 ;EP
- D ^XBCLS W !!?20,"PARAMETER SETUP",!
- W !?5,"Use this option to define parameters to customize the"
- W !?5,"Admissions package for your facility. Each question has"
- W !?5,"help if you do not know how to answer it.",!
- Q
- ;
- SYS2 ;EP
- D ^XBCLS W !!?20,"TREATING SPECIALTY SETUP",!
- W !?5,"Use this option to define your admitting treating specialties."
- W !?5,"You will be asked for an abbreviation, IHS Code and Hospital"
- W !?5,"Service for each.",!
- Q
- ;
- SYS3 ;EP
- D ^XBCLS W !!?20,"WARD DEFINITION OPTION",!
- W !?5,"Use this option to set up and change the definitions of your"
- W !?5,"inpatient units. This setup includes breaking down the beds"
- W !?5,"by category for Part III of the M202.",!
- Q
- ;
- SYS4 ;EP
- D ^XBCLS W !!?20,"ADD/EDIT INPATIENT BEDS",!
- W !?5,"Use this option to add or change the definition of your"
- W !?5,"inpatient beds. You will be asked for a room-bed name, "
- W !?5,"description and to which ward it belongs.",!
- Q
- ;
- SYS5 ;EP
- D ^XBCLS W !!?20,"CENSUS SETUP: TREATING SPECIATIES",!
- W !?5,"Use this option to initialize your census files. Pick a"
- W !?5,"date for starting your census (usually the last day of a"
- W !?5,"month). Enter the number of remaining inpatients in each"
- W !?5,"treating specialty at the end of that day. DO NOT use this"
- W !?5,"option to edit any other day but that first one!!!",!
- Q
- ;
- SYS6 ;EP
- D ^XBCLS W !!?20,"CENSUS SETUP: WARDS",!
- W !?5,"Use this option to initialize your census files. Pick a"
- W !?5,"date for starting your census (usually the last day of a"
- W !?5,"month). Enter the number of remaining inpatients in each"
- W !?5,"inpatient unit at the end of that day. DO NOT use this"
- W !?5,"option to edit any other day but that first one!!!",!
- Q
- ;
- SYS7 ;EP
- Q
- ;
- SYS8 ;EP
- Q
- ;
- SYS9 ;EP
- Q
- ADGH01 ; IHS/ADC/PDW/ENM - HELP FOR SYS DEF OPTIONS ; [ 03/25/1999 11:48 AM ]
- +1 ;;5.0;ADMISSION/DISCHARGE/TRANSFER;;MAR 25, 1999
- +2 ;
- SYS1 ;EP
- +1 DO ^XBCLS
- WRITE !!?20,"PARAMETER SETUP",!
- +2 WRITE !?5,"Use this option to define parameters to customize the"
- +3 WRITE !?5,"Admissions package for your facility. Each question has"
- +4 WRITE !?5,"help if you do not know how to answer it.",!
- +5 QUIT
- +6 ;
- SYS2 ;EP
- +1 DO ^XBCLS
- WRITE !!?20,"TREATING SPECIALTY SETUP",!
- +2 WRITE !?5,"Use this option to define your admitting treating specialties."
- +3 WRITE !?5,"You will be asked for an abbreviation, IHS Code and Hospital"
- +4 WRITE !?5,"Service for each.",!
- +5 QUIT
- +6 ;
- SYS3 ;EP
- +1 DO ^XBCLS
- WRITE !!?20,"WARD DEFINITION OPTION",!
- +2 WRITE !?5,"Use this option to set up and change the definitions of your"
- +3 WRITE !?5,"inpatient units. This setup includes breaking down the beds"
- +4 WRITE !?5,"by category for Part III of the M202.",!
- +5 QUIT
- +6 ;
- SYS4 ;EP
- +1 DO ^XBCLS
- WRITE !!?20,"ADD/EDIT INPATIENT BEDS",!
- +2 WRITE !?5,"Use this option to add or change the definition of your"
- +3 WRITE !?5,"inpatient beds. You will be asked for a room-bed name, "
- +4 WRITE !?5,"description and to which ward it belongs.",!
- +5 QUIT
- +6 ;
- SYS5 ;EP
- +1 DO ^XBCLS
- WRITE !!?20,"CENSUS SETUP: TREATING SPECIATIES",!
- +2 WRITE !?5,"Use this option to initialize your census files. Pick a"
- +3 WRITE !?5,"date for starting your census (usually the last day of a"
- +4 WRITE !?5,"month). Enter the number of remaining inpatients in each"
- +5 WRITE !?5,"treating specialty at the end of that day. DO NOT use this"
- +6 WRITE !?5,"option to edit any other day but that first one!!!",!
- +7 QUIT
- +8 ;
- SYS6 ;EP
- +1 DO ^XBCLS
- WRITE !!?20,"CENSUS SETUP: WARDS",!
- +2 WRITE !?5,"Use this option to initialize your census files. Pick a"
- +3 WRITE !?5,"date for starting your census (usually the last day of a"
- +4 WRITE !?5,"month). Enter the number of remaining inpatients in each"
- +5 WRITE !?5,"inpatient unit at the end of that day. DO NOT use this"
- +6 WRITE !?5,"option to edit any other day but that first one!!!",!
- +7 QUIT
- +8 ;
- SYS7 ;EP
- +1 QUIT
- +2 ;
- SYS8 ;EP
- +1 QUIT
- +2 ;
- SYS9 ;EP
- +1 QUIT