DGPMGL51 ;ALB/MRL - G&L PARAMETER ENTRY/EDIT; 28 JUN 89
;;5.3;Registration;;Aug 13, 1993
F I=1:1 S J=$P($T(@DGPM+I),";;",2) Q:J="QUIT" W !,J
K I,J Q
1 ;
;;Please enter the date on which you wish to initialize your Gains & Losses Sheet
;;and Bed Status Report. The date selected must be on or after October 1, 1988.
;;Bed Status statistics will be calculated from this date only.
;;QUIT
2 ;
;;The Gains & Losses Sheet allows one to print only the last four numbers of the
;;patient's Social Security Number or the entire number. Please determine
;;how you'd like this number to appear on your G&L. If the entire number is
;;printed the two-column G&L will always be produced.
;;QUIT
3 ;
;;This G&L is designed to display current Means Test Status (where applicable) if
;;you wish. Simply respond YES to this prompt in order to display this data on
;;your daily Gains and Losses Sheet.
;;QUIT
4 ;
;;The next prompt is for the purpose of determining whether or not you wish for
;;the exact Treating Specialty to which a patient is assigned to display on the
;;G&L whenever a movement is displayed. The information will appear immediately
;;to the right of the assigned ward location. If this parameter is "turned-on" a
;;two-column G&L will always be produced.
;;QUIT
5 ;
;;Please select whether you wish the patient listing (G&L) to display names in a
;;two or three column format. Certain transaction types, i.e., Transfers in/out,
;;will always appear as a single column output regardless, however, this feature
;;may reduce the amount of paper required to generate this listing.
;;QUIT
6 ;
;;Answer YES to the following prompt should you wish for non-movements, i.e.,
;;Treating Specialty Change to appear on the G&L otherwise answer NO.
;;QUIT
7 ;
;;Please enter the date from which you wish to recalculate totals which must be
;;on or after the G&L Initialization Date. The purpose of this parameter is to
;;allow you the flexibility to maintain an "old" initialization date without the
;;worry that a correction entered say, for five years ago, will cause a recal-
;;culation process to commence which may take days to complete. It is strongly
;;suggested that recalculation always be accomplished for, at a minumum, the
;;current fiscal reporting year.
;;QUIT
8 ;
;;Answer YES if you wish to calculate vietnam era veteran's remaining at the end
;;of each day. If you choose to do so the length of processing time may be in-
;;creased up to 20 minutes per day. Please note that this information is no
;;longer reported on any AMIS Segment.
;;QUIT
9 ;
;;Answer YES to the following prompt if you wish to calculate patient's over 65
;;years in age remaining at the end of each census date. If you choose to do so
;;processing time for recalculation may be increased up to 30 minutes per date.
;;Please note that this information is no longer reported on any AMIS Segment.
;;QUIT
10 ;
;;Once we start collecting Treating Specialty statistics it will be necessary to
;;capture those data where a Treating Specialty may not have been assigned to a
;;particular patient. Please respond to the following prompt with the DEFAULT
;;Treating Specialty to which you want these statistical data associated. Perhaps
;;one might want to create a Treating Specialty called UNKNOWN, UNDEFINED, etc.,
;;and utilize this.
;;QUIT
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HDGPMGL51 3451 printed Nov 22, 2024@17:59:36 Page 2
DGPMGL51 ;ALB/MRL - G&L PARAMETER ENTRY/EDIT; 28 JUN 89
+1 ;;5.3;Registration;;Aug 13, 1993
+2 FOR I=1:1
SET J=$PIECE($TEXT(@DGPM+I),";;",2)
if J="QUIT"
QUIT
WRITE !,J
+3 KILL I,J
QUIT
1 ;
+1 ;;Please enter the date on which you wish to initialize your Gains & Losses Sheet
+2 ;;and Bed Status Report. The date selected must be on or after October 1, 1988.
+3 ;;Bed Status statistics will be calculated from this date only.
+4 ;;QUIT
2 ;
+1 ;;The Gains & Losses Sheet allows one to print only the last four numbers of the
+2 ;;patient's Social Security Number or the entire number. Please determine
+3 ;;how you'd like this number to appear on your G&L. If the entire number is
+4 ;;printed the two-column G&L will always be produced.
+5 ;;QUIT
3 ;
+1 ;;This G&L is designed to display current Means Test Status (where applicable) if
+2 ;;you wish. Simply respond YES to this prompt in order to display this data on
+3 ;;your daily Gains and Losses Sheet.
+4 ;;QUIT
4 ;
+1 ;;The next prompt is for the purpose of determining whether or not you wish for
+2 ;;the exact Treating Specialty to which a patient is assigned to display on the
+3 ;;G&L whenever a movement is displayed. The information will appear immediately
+4 ;;to the right of the assigned ward location. If this parameter is "turned-on" a
+5 ;;two-column G&L will always be produced.
+6 ;;QUIT
5 ;
+1 ;;Please select whether you wish the patient listing (G&L) to display names in a
+2 ;;two or three column format. Certain transaction types, i.e., Transfers in/out,
+3 ;;will always appear as a single column output regardless, however, this feature
+4 ;;may reduce the amount of paper required to generate this listing.
+5 ;;QUIT
6 ;
+1 ;;Answer YES to the following prompt should you wish for non-movements, i.e.,
+2 ;;Treating Specialty Change to appear on the G&L otherwise answer NO.
+3 ;;QUIT
7 ;
+1 ;;Please enter the date from which you wish to recalculate totals which must be
+2 ;;on or after the G&L Initialization Date. The purpose of this parameter is to
+3 ;;allow you the flexibility to maintain an "old" initialization date without the
+4 ;;worry that a correction entered say, for five years ago, will cause a recal-
+5 ;;culation process to commence which may take days to complete. It is strongly
+6 ;;suggested that recalculation always be accomplished for, at a minumum, the
+7 ;;current fiscal reporting year.
+8 ;;QUIT
8 ;
+1 ;;Answer YES if you wish to calculate vietnam era veteran's remaining at the end
+2 ;;of each day. If you choose to do so the length of processing time may be in-
+3 ;;creased up to 20 minutes per day. Please note that this information is no
+4 ;;longer reported on any AMIS Segment.
+5 ;;QUIT
9 ;
+1 ;;Answer YES to the following prompt if you wish to calculate patient's over 65
+2 ;;years in age remaining at the end of each census date. If you choose to do so
+3 ;;processing time for recalculation may be increased up to 30 minutes per date.
+4 ;;Please note that this information is no longer reported on any AMIS Segment.
+5 ;;QUIT
10 ;
+1 ;;Once we start collecting Treating Specialty statistics it will be necessary to
+2 ;;capture those data where a Treating Specialty may not have been assigned to a
+3 ;;particular patient. Please respond to the following prompt with the DEFAULT
+4 ;;Treating Specialty to which you want these statistical data associated. Perhaps
+5 ;;one might want to create a Treating Specialty called UNKNOWN, UNDEFINED, etc.,
+6 ;;and utilize this.
+7 ;;QUIT