PXRMEXMH.m

PXRMEXMH ; SLC/PKR - Clinical Reminder Exchange main help. ;12/20/2013

 ;;2.0;CLINICAL REMINDERS;**26**;Feb 04, 2005;Build 404

 ;======================================================================

LOAD ;If necessary load the help text into the ^TMP array.

 ;Check if the help text has already been loaded.

 I $D(^TMP("PXRMEXMH",$J,"VALMCNT")) D  Q

 . S VALMCNT=^TMP("PXRMEXMH",$J,"VALMCNT")

 ;

 N DONE,IND,TEXT

 S DONE=0

 S VALMCNT=0

 F IND=1:1 Q:DONE  D

 . S TEXT=$P($T(TEXT+IND),";",3)

 . I TEXT="**End Text**" S DONE=1 Q

 . S VALMCNT=VALMCNT+1

 . S ^TMP("PXRMEXMH",$J,VALMCNT,0)=TEXT

 S ^TMP("PXRMEXMH",$J,"VALMCNT")=VALMCNT

 Q

 ;

 ;======================================================================

TEXT ;Help text

 ;;The following actions are available:

 ;;

 ;;CFE Create Exchange File Entry

 ;;    Create an entry in the Exchange File; this is also called

 ;;    a packed reminder definition. When you select this action

 ;;    you will be prompted for a reminder definition. All the

 ;;    components used in the definition will be "packed" up and

 ;;    included in the packed definition.

 ;;

 ;;CHF Create Host File

 ;;    Create a host file containing selected entries from the

 ;;    Exchange File.

 ;;

 ;;CMM Create MailMan Message

 ;;    Create a MailMan message containing selected entries from

 ;;    the Exchange File.

 ;;

 ;;DFE Delete Exchange File Entry

 ;;    Delete selected entries from the Exchange File.

 ;;

 ;;IFE Install Exchange File Entry

 ;;    Install selected Exchange File entries. Once an entry has

 ;;    been selected you will have the option of installing all

 ;;    the components in the packed reminder or selected

 ;;    components.

 ;;

 ;;IH  Installation History

 ;;    Show the installation history of selected Exchange File

 ;;    entries.

 ;;

 ;;LHF Load Host File

 ;;    Load a host file containing packed reminder definitions

 ;;    into the Exchange File.

 ;;

 ;;LMM Load MailMan Message

 ;;    Load a MailMan message containing packed reminders

 ;;    into the Exchange File.

 ;;

 ;;LWH Load Web Host File

 ;;    Load a host file containing packed reminder definitions

 ;;    from a web site into the Exchange File.

 ;;

 ;;LR  List Reminder Definitions

 ;;    Display a list of all the reminders that are defined in the

 ;;    current UCI.

 ;;

 ;;RI  Reminder Definition Inquiry

 ;;    Display the reminder definition for the selected reminder.

 ;;

 ;;QU  Quit

 ;;

 ;;**End Text**

 Q

 ;

PXRMEXMH  ; SLC/PKR - Clinical Reminder Exchange main help. ;12/20/2013

 +1       ;;2.0;CLINICAL REMINDERS;**26**;Feb 04, 2005;Build 404

 +2       ;======================================================================

LOAD      ;If necessary load the help text into the ^TMP array.

 +1       ;Check if the help text has already been loaded.

 +2        IF $DATA(^TMP("PXRMEXMH",$JOB,"VALMCNT"))

               Begin DoDot:1

 +3                SET VALMCNT=^TMP("PXRMEXMH",$JOB,"VALMCNT")

               End DoDot:1

               QUIT 

 +4       ;

 +5        NEW DONE,IND,TEXT

 +6        SET DONE=0

 +7        SET VALMCNT=0

 +8        FOR IND=1:1

               IF DONE

                   QUIT 

               Begin DoDot:1

 +9                SET TEXT=$PIECE($TEXT(TEXT+IND),";",3)

 +10               IF TEXT="**End Text**"

                       SET DONE=1

                       QUIT 

 +11               SET VALMCNT=VALMCNT+1

 +12               SET ^TMP("PXRMEXMH",$JOB,VALMCNT,0)=TEXT

               End DoDot:1

 +13       SET ^TMP("PXRMEXMH",$JOB,"VALMCNT")=VALMCNT

 +14       QUIT 

 +15      ;

 +16      ;======================================================================

TEXT      ;Help text

 +1       ;;The following actions are available:

 +2       ;;

 +3       ;;CFE Create Exchange File Entry

 +4       ;;    Create an entry in the Exchange File; this is also called

 +5       ;;    a packed reminder definition. When you select this action

 +6       ;;    you will be prompted for a reminder definition. All the

 +7       ;;    components used in the definition will be "packed" up and

 +8       ;;    included in the packed definition.

 +9       ;;

 +10      ;;CHF Create Host File

 +11      ;;    Create a host file containing selected entries from the

 +12      ;;    Exchange File.

 +13      ;;

 +14      ;;CMM Create MailMan Message

 +15      ;;    Create a MailMan message containing selected entries from

 +16      ;;    the Exchange File.

 +17      ;;

 +18      ;;DFE Delete Exchange File Entry

 +19      ;;    Delete selected entries from the Exchange File.

 +20      ;;

 +21      ;;IFE Install Exchange File Entry

 +22      ;;    Install selected Exchange File entries. Once an entry has

 +23      ;;    been selected you will have the option of installing all

 +24      ;;    the components in the packed reminder or selected

 +25      ;;    components.

 +26      ;;

 +27      ;;IH  Installation History

 +28      ;;    Show the installation history of selected Exchange File

 +29      ;;    entries.

 +30      ;;

 +31      ;;LHF Load Host File

 +32      ;;    Load a host file containing packed reminder definitions

 +33      ;;    into the Exchange File.

 +34      ;;

 +35      ;;LMM Load MailMan Message

 +36      ;;    Load a MailMan message containing packed reminders

 +37      ;;    into the Exchange File.

 +38      ;;

 +39      ;;LWH Load Web Host File

 +40      ;;    Load a host file containing packed reminder definitions

 +41      ;;    from a web site into the Exchange File.

 +42      ;;

 +43      ;;LR  List Reminder Definitions

 +44      ;;    Display a list of all the reminders that are defined in the

 +45      ;;    current UCI.

 +46      ;;

 +47      ;;RI  Reminder Definition Inquiry

 +48      ;;    Display the reminder definition for the selected reminder.

 +49      ;;

 +50      ;;QU  Quit

 +51      ;;

 +52      ;;**End Text**

 +53       QUIT 

 +54      ;