PXRMEHLP ; SLC/PJH - Reminder Extract help. ;05/31/2006
;;2.0;CLINICAL REMINDERS;**4**;Feb 04, 2005;Build 21
;====================================================
LOAD(SUB) ;
;If necessary load the help text into the ^TMP array.
;Check if the help text has already been loaded.
I $D(^TMP(SUB,$J,"VALMCNT")) D Q
. S VALMCNT=^TMP(SUB,$J,"VALMCNT")
;
N DONE,IND,LABEL,TEXT
S LABEL="NOHLP"
I SUB["ETM" S LABEL="TX1"
I SUB["ETH" S LABEL="TX2"
I SUB["ETT" S LABEL="TX3"
I SUB["EPM" S LABEL="TX4"
I SUB["EPED" S LABEL="TX5"
I SUB["EFM" S LABEL="TX6"
I SUB["EFED" S LABEL="TX7"
I SUB["EGM" S LABEL="TX8"
I SUB["EGED" S LABEL="TX9"
S DONE=0,VALMCNT=0
F IND=1:1 Q:DONE D
. S TEXT=$P($T(@(LABEL_"+"_IND)),";;",2)
. I TEXT="**End Text**" S DONE=1 Q
. S VALMCNT=VALMCNT+1,^TMP(SUB,$J,VALMCNT,0)=TEXT
S ^TMP(SUB,$J,"VALMCNT")=VALMCNT
Q
;
;====================================================
TX1 ;Help text
;;The following actions are available:
;;
;;EDM Extract Definition Management
;; Display/edit extract definitions.
;;
;;VSE View/Schedule Extract
;; Display list of prior extract summaries or schedule manual
;; extracts and transmission runs.
;;
;;QU Quit
;;**End Text**
Q
;
;====================================================
TX2 ;Help text
;;The following actions are available:
;;
;;CV Change View
;; Toggle view of extract summaries between creation date order and
;; extract period order.
;;
;;ES Extract Summary
;; Display reminder compliance and finding totals for extract summary.
;; Also displays patient list with option to print Health Summary.
;;
;;ME Manual Extract
;; Initiate a new extract for a selected period with option to
;; transmit.
;;
;;MT Manual Transmission
;; Initiate a transmission or retransmission of an existing extract
;; summary.
;;
;;TH Transmission History
;; Display transmission history and HL7 message ID's for an
;; existing extract.
;;
;;QU Quit
;;**End Text**
Q
;
;====================================================
TX3 ;Help text
;;The following actions are available:
;;
;;DPL Display Patient List
;; Display a patient list used to create extract summary with
;; option to print Health Summary.
;;
;;DSF Display/Suppress Finding Totals
;; Toggle between display with reminder compliance totals only and
;; display with both reminder compliance and finding totals.
;;
;;PL Print List
;; Print extract totals currently displayed.
;;
;;QU Quit
;;**End Text**
Q
;
;====================================================
TX4 ;Help text
;;The following actions are available:
;;
;;CR Create Extract Definition
;;
;;DE Display/Edit Extract Definition
;;
;;QU Quit
;;**End Text**
Q
;
;====================================================
TX5 ;Help text
;;The following actions are available:
;;
;;ED Edit Extract Definition
;;
;;QU Quit
;;**End Text**
Q
;
;====================================================
TX6 ;Help text
;;The following actions are available:
;;
;;CR Create Extract Counting Rule
;;
;;DE Display/Edit Extract Counting Rule
;;
;;QU Quit
;;**End Text**
Q
;
;====================================================
TX7 ;Help text
;;The following actions are available:
;;
;;ED Edit Extract Counting Rule
;;
;;CG Counting Groups
;;
;;QU Quit
;;**End Text**
Q
;
;====================================================
TX8 ;Help text
;;The following actions are available:
;;
;;CR Create Extract Counting Group
;;
;;DE Display/Edit Extract Counting Group
;;
;;QU Quit
;;**End Text**
Q
;
;====================================================
TX9 ;Help text
;;The following actions are available:
;;
;;ED Edit Extract Counting Group
;;
;;QU Quit
;;**End Text**
Q
;
;====================================================
NOHLP ;Help text
;;
;;No Help Text Available
;;
;;**End Text**
Q
;
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPXRMEHLP 4128 printed Dec 13, 2024@01:44:30 Page 2
PXRMEHLP ; SLC/PJH - Reminder Extract help. ;05/31/2006
+1 ;;2.0;CLINICAL REMINDERS;**4**;Feb 04, 2005;Build 21
+2 ;====================================================
LOAD(SUB) ;
+1 ;If necessary load the help text into the ^TMP array.
+2 ;Check if the help text has already been loaded.
+3 IF $DATA(^TMP(SUB,$JOB,"VALMCNT"))
Begin DoDot:1
+4 SET VALMCNT=^TMP(SUB,$JOB,"VALMCNT")
End DoDot:1
QUIT
+5 ;
+6 NEW DONE,IND,LABEL,TEXT
+7 SET LABEL="NOHLP"
+8 IF SUB["ETM"
SET LABEL="TX1"
+9 IF SUB["ETH"
SET LABEL="TX2"
+10 IF SUB["ETT"
SET LABEL="TX3"
+11 IF SUB["EPM"
SET LABEL="TX4"
+12 IF SUB["EPED"
SET LABEL="TX5"
+13 IF SUB["EFM"
SET LABEL="TX6"
+14 IF SUB["EFED"
SET LABEL="TX7"
+15 IF SUB["EGM"
SET LABEL="TX8"
+16 IF SUB["EGED"
SET LABEL="TX9"
+17 SET DONE=0
SET VALMCNT=0
+18 FOR IND=1:1
if DONE
QUIT
Begin DoDot:1
+19 SET TEXT=$PIECE($TEXT(@(LABEL_"+"_IND)),";;",2)
+20 IF TEXT="**End Text**"
SET DONE=1
QUIT
+21 SET VALMCNT=VALMCNT+1
SET ^TMP(SUB,$JOB,VALMCNT,0)=TEXT
End DoDot:1
+22 SET ^TMP(SUB,$JOB,"VALMCNT")=VALMCNT
+23 QUIT
+24 ;
+25 ;====================================================
TX1 ;Help text
+1 ;;The following actions are available:
+2 ;;
+3 ;;EDM Extract Definition Management
+4 ;; Display/edit extract definitions.
+5 ;;
+6 ;;VSE View/Schedule Extract
+7 ;; Display list of prior extract summaries or schedule manual
+8 ;; extracts and transmission runs.
+9 ;;
+10 ;;QU Quit
+11 ;;**End Text**
+12 QUIT
+13 ;
+14 ;====================================================
TX2 ;Help text
+1 ;;The following actions are available:
+2 ;;
+3 ;;CV Change View
+4 ;; Toggle view of extract summaries between creation date order and
+5 ;; extract period order.
+6 ;;
+7 ;;ES Extract Summary
+8 ;; Display reminder compliance and finding totals for extract summary.
+9 ;; Also displays patient list with option to print Health Summary.
+10 ;;
+11 ;;ME Manual Extract
+12 ;; Initiate a new extract for a selected period with option to
+13 ;; transmit.
+14 ;;
+15 ;;MT Manual Transmission
+16 ;; Initiate a transmission or retransmission of an existing extract
+17 ;; summary.
+18 ;;
+19 ;;TH Transmission History
+20 ;; Display transmission history and HL7 message ID's for an
+21 ;; existing extract.
+22 ;;
+23 ;;QU Quit
+24 ;;**End Text**
+25 QUIT
+26 ;
+27 ;====================================================
TX3 ;Help text
+1 ;;The following actions are available:
+2 ;;
+3 ;;DPL Display Patient List
+4 ;; Display a patient list used to create extract summary with
+5 ;; option to print Health Summary.
+6 ;;
+7 ;;DSF Display/Suppress Finding Totals
+8 ;; Toggle between display with reminder compliance totals only and
+9 ;; display with both reminder compliance and finding totals.
+10 ;;
+11 ;;PL Print List
+12 ;; Print extract totals currently displayed.
+13 ;;
+14 ;;QU Quit
+15 ;;**End Text**
+16 QUIT
+17 ;
+18 ;====================================================
TX4 ;Help text
+1 ;;The following actions are available:
+2 ;;
+3 ;;CR Create Extract Definition
+4 ;;
+5 ;;DE Display/Edit Extract Definition
+6 ;;
+7 ;;QU Quit
+8 ;;**End Text**
+9 QUIT
+10 ;
+11 ;====================================================
TX5 ;Help text
+1 ;;The following actions are available:
+2 ;;
+3 ;;ED Edit Extract Definition
+4 ;;
+5 ;;QU Quit
+6 ;;**End Text**
+7 QUIT
+8 ;
+9 ;====================================================
TX6 ;Help text
+1 ;;The following actions are available:
+2 ;;
+3 ;;CR Create Extract Counting Rule
+4 ;;
+5 ;;DE Display/Edit Extract Counting Rule
+6 ;;
+7 ;;QU Quit
+8 ;;**End Text**
+9 QUIT
+10 ;
+11 ;====================================================
TX7 ;Help text
+1 ;;The following actions are available:
+2 ;;
+3 ;;ED Edit Extract Counting Rule
+4 ;;
+5 ;;CG Counting Groups
+6 ;;
+7 ;;QU Quit
+8 ;;**End Text**
+9 QUIT
+10 ;
+11 ;====================================================
TX8 ;Help text
+1 ;;The following actions are available:
+2 ;;
+3 ;;CR Create Extract Counting Group
+4 ;;
+5 ;;DE Display/Edit Extract Counting Group
+6 ;;
+7 ;;QU Quit
+8 ;;**End Text**
+9 QUIT
+10 ;
+11 ;====================================================
TX9 ;Help text
+1 ;;The following actions are available:
+2 ;;
+3 ;;ED Edit Extract Counting Group
+4 ;;
+5 ;;QU Quit
+6 ;;**End Text**
+7 QUIT
+8 ;
+9 ;====================================================
NOHLP ;Help text
+1 ;;
+2 ;;No Help Text Available
+3 ;;
+4 ;;**End Text**
+5 QUIT
+6 ;
