source: FOIAVistA/trunk/r/CLINICAL_REMINDERS-PXRM/PXRMEXDH.m@ 1764

Last change on this file since 1764 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version

File size: 1.5 KB
Line 
1PXRMEXDH ; SLC/PJH - Reminder Exchange Dialog help. ;01/25/2001
2 ;;2.0;CLINICAL REMINDERS;;Feb 04, 2005
3 ;
4 ; Entry action for list PXRM EX DIALOG HELP
5 ;
6LOAD N DONE,IND,TEXT
7 S DONE=0
8 K ^TMP("PXRMEXDH",$J)
9 S VALMCNT=0
10 F IND=1:1 Q:DONE D
11 . S TEXT=$P($T(@PXRMTAG+IND),";",3)
12 . I TEXT="**End Text**" S DONE=1 Q
13 . S VALMCNT=VALMCNT+1
14 . S ^TMP("PXRMEXDH",$J,VALMCNT,0)=TEXT
15 S ^TMP("PXRMEXDH",$J,"VALMCNT")=VALMCNT
16 Q
17 ;
18DLG ;Dialog Help text
19 ;;The following actions are available:
20 ;;
21 ;;DD Dialog Details
22 ;; Display all dialog component names for this reminder dialog.
23 ;; (Include PXRM type additional prompts and forced values.)
24 ;;
25 ;;DF Dialog Findings
26 ;; Display the finding items associated with the dialog and
27 ;; show if the finding already exists.
28 ;;
29 ;;DS Dialog Summary (default)
30 ;; Display dialog component names for this reminder dialog.
31 ;; (Exclude PXRM type additional prompts and forced values.)
32 ;;
33 ;;DT Dialog Text
34 ;; Display the dialog text as it should appear in CPRS.
35 ;;
36 ;;DU Dialog Usage
37 ;; If components of the reminder dialog already exists display
38 ;; any other reminder dialogs and groups also use these components.
39 ;;
40 ;;IA Install All
41 ;; Install the reminder dialog and all its components. The reminder
42 ;; dialog may also be selected by entering the item number '1'.
43 ;;
44 ;;IS Install Selected
45 ;; Install selected components from this reminder dialog. The
46 ;; individual components may also be selected by entering an
47 ;; item number.
48 ;;
49 ;;QU Quit
50 ;;**End Text**
Note: See TracBrowser for help on using the repository browser.