PXRMDTX1 ; SLC/AGP - Reminder Dialog Taxonomy Field editor/List Manager ;Jun 22, 2021@08:09:50
;;2.0;CLINICAL REMINDERS;**65**;Feb 04, 2005;Build 438
;
HELP(HTEXT) ;
N CNT S CNT=1
S HTEXT(CNT)="Set the taxonomy pick list display for the codes marked to be used in a dialog."
S CNT=CNT+1,HTEXT(CNT)="\\\\ A: To display a pick list for all coding systems "
S CNT=CNT+1,HTEXT(CNT)="\\\\ D: To display a pick list for the diagnosis codes."
S CNT=CNT+1,HTEXT(CNT)="\\\\ Other coding system values will automatically be filed to the encounter."
S CNT=CNT+1,HTEXT(CNT)="\\\\ P: To display a pick list for the procedure codes."
S CNT=CNT+1,HTEXT(CNT)="\\\\ Other coding system values will automatically be filed to the encounter."
S CNT=CNT+1,HTEXT(CNT)="\\\\ S: To display a pick list for standard codes."
S CNT=CNT+1,HTEXT(CNT)="\\\\ Other coding system values will automatically be filed to the encounter."
S CNT=CNT+1,HTEXT(CNT)="\\\\ N: To not display a pick list all codes will automatically be filed to the encounter."
Q
;
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPXRMDTX1 1077 printed Sep 02, 2024@18:29:42 Page 2
PXRMDTX1 ; SLC/AGP - Reminder Dialog Taxonomy Field editor/List Manager ;Jun 22, 2021@08:09:50
+1 ;;2.0;CLINICAL REMINDERS;**65**;Feb 04, 2005;Build 438
+2 ;
HELP(HTEXT) ;
+1 NEW CNT
SET CNT=1
+2 SET HTEXT(CNT)="Set the taxonomy pick list display for the codes marked to be used in a dialog."
+3 SET CNT=CNT+1
SET HTEXT(CNT)="\\\\ A: To display a pick list for all coding systems "
+4 SET CNT=CNT+1
SET HTEXT(CNT)="\\\\ D: To display a pick list for the diagnosis codes."
+5 SET CNT=CNT+1
SET HTEXT(CNT)="\\\\ Other coding system values will automatically be filed to the encounter."
+6 SET CNT=CNT+1
SET HTEXT(CNT)="\\\\ P: To display a pick list for the procedure codes."
+7 SET CNT=CNT+1
SET HTEXT(CNT)="\\\\ Other coding system values will automatically be filed to the encounter."
+8 SET CNT=CNT+1
SET HTEXT(CNT)="\\\\ S: To display a pick list for standard codes."
+9 SET CNT=CNT+1
SET HTEXT(CNT)="\\\\ Other coding system values will automatically be filed to the encounter."
+10 SET CNT=CNT+1
SET HTEXT(CNT)="\\\\ N: To not display a pick list all codes will automatically be filed to the encounter."
+11 QUIT
+12 ;