SDPPHLP ;ALB/CAW - Patient Profile - Help ; 7/16/92
;;5.3;Scheduling;**6,1015**;Aug 13, 1993;Build 21
;
HLP ; -- help for list
I $D(X),X'["??" D HLPS G HLPQ
D CLEAR^VALM1
F I=1:1 S SDX=$P($T(@VAR+I),";",3,99) Q:SDX="$END" D PAUSE^VALM1:SDX="$PAUSE" Q:'Y W !,$S(SDX["$PAUSE":"",1:SDX)
HLPQ K SDX,Y S X="" Q
;
HLPS ; -- short help
S X="?" W !,"Enter action by typing the name or the abbreviation.",! Q
;
HELPTXT ; -- help text
;;Enter action by typing the name or abbreviation.
;;
;;DI - Display Info
;; Allows selection of Appointments, Add/Edits, Enrollments, Means Test,
;; and Dispositions. Selection of ALL information is also available.
;;
;;PP - Print Profile
;; Allows the patient profile to be printed, with patient demographics
;; as well as user selected appts, add/edits, dispositions, etc.
;;
;;CP - Change Patient
;; Allows the patient to be changed within the Patient Profile without
;; exiting the option.
;;
;;CD - Change Date Range
;; Allows the selection of the date range to be changed. This changes
;; the date range the appointments, add/edits, etc. will be displayed
;; for.
;;
;;$PAUSE
;;$END
Q
HLPTXT1 ;help text for DI - Display Info Menu
;;AE - Add/Edits
;; This will display information on add/edit appointments. You
;; may select a specific stop code to view.
;;
;;AP - Appointments
;; This will display information on appointments. You may select a
;; specific clinic to view.
;;
;;DE - Enrollments
;; This will display information on enrollments. You may select
;; specific clinic to view. You may select active enrollments only
;; to either all or a specified clinic.
;;
;;DD - Dispositions
;; This will display information on dispositions.
;;
;;MT - Means Test
;; This will display information on means test. You may select
;; a specific means test.
;;
;;$PAUSE
;;AL - All
;; This will display information on add/edits, appointments,
;; enrollments, dispositions and means test.
;;
;;$PAUSE
;;$END
;
SDPPHLP ;ALB/CAW - Patient Profile - Help ; 7/16/92
+1 ;;5.3;Scheduling;**6,1015**;Aug 13, 1993;Build 21
+2 ;
HLP ; -- help for list
+1 IF $DATA(X)
IF X'["??"
DO HLPS
GOTO HLPQ
+2 DO CLEAR^VALM1
+3 FOR I=1:1
SET SDX=$PIECE($TEXT(@VAR+I),";",3,99)
IF SDX="$END"
QUIT
IF SDX="$PAUSE"
DO PAUSE^VALM1
IF 'Y
QUIT
WRITE !,$SELECT(SDX["$PAUSE":"",1:SDX)
HLPQ KILL SDX,Y
SET X=""
QUIT
+1 ;
HLPS ; -- short help
+1 SET X="?"
WRITE !,"Enter action by typing the name or the abbreviation.",!
QUIT
+2 ;
HELPTXT ; -- help text
+1 ;;Enter action by typing the name or abbreviation.
+2 ;;
+3 ;;DI - Display Info
+4 ;; Allows selection of Appointments, Add/Edits, Enrollments, Means Test,
+5 ;; and Dispositions. Selection of ALL information is also available.
+6 ;;
+7 ;;PP - Print Profile
+8 ;; Allows the patient profile to be printed, with patient demographics
+9 ;; as well as user selected appts, add/edits, dispositions, etc.
+10 ;;
+11 ;;CP - Change Patient
+12 ;; Allows the patient to be changed within the Patient Profile without
+13 ;; exiting the option.
+14 ;;
+15 ;;CD - Change Date Range
+16 ;; Allows the selection of the date range to be changed. This changes
+17 ;; the date range the appointments, add/edits, etc. will be displayed
+18 ;; for.
+19 ;;
+20 ;;$PAUSE
+21 ;;$END
+22 QUIT
HLPTXT1 ;help text for DI - Display Info Menu
+1 ;;AE - Add/Edits
+2 ;; This will display information on add/edit appointments. You
+3 ;; may select a specific stop code to view.
+4 ;;
+5 ;;AP - Appointments
+6 ;; This will display information on appointments. You may select a
+7 ;; specific clinic to view.
+8 ;;
+9 ;;DE - Enrollments
+10 ;; This will display information on enrollments. You may select
+11 ;; specific clinic to view. You may select active enrollments only
+12 ;; to either all or a specified clinic.
+13 ;;
+14 ;;DD - Dispositions
+15 ;; This will display information on dispositions.
+16 ;;
+17 ;;MT - Means Test
+18 ;; This will display information on means test. You may select
+19 ;; a specific means test.
+20 ;;
+21 ;;$PAUSE
+22 ;;AL - All
+23 ;; This will display information on add/edits, appointments,
+24 ;; enrollments, dispositions and means test.
+25 ;;
+26 ;;$PAUSE
+27 ;;$END
+28 ;