XHDYP01 ; ; Oct 09, 2003@13:59:24
;;1.0;HEALTHEVET DESKTOP;;Jul 15, 2003
LOAD ; load data into ^TMP (expects ROOT to be defined)
S I=1 F S REF=$T(DATA+I) Q:REF="" S VAL=$T(DATA+I+1) D
. S I=I+2,REF=$P(REF,";",3,999),VAL=$P(VAL,";",3,999)
. S @(ROOT_REF)=VAL
Q
DATA ; parameter data
;;4448,"KEY")
;;XHD PRISM DEFAULT PERSPECTIVE^1
;;4448,"VAL")
;;clinicianDashboard
;;4449,"KEY")
;;XHD TEST WP PARAMETERS^1
;;4449,"VAL")
;;Test Word-Processing
;;4449,"VAL",1,0)
;;<?xml version="1.0" encoding="UTF-8"?>
;;4449,"VAL",2,0)
;;<configTree xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
;;4449,"VAL",3,0)
;;xsi:noNamespaceSchemaLocation="C:\reeng\main\modules\config\src\
;;4449,"VAL",4,0)
;;gov\va\med\hds\config\xml\configTree.xsd">
;;4449,"VAL",5,0)
;;<pluginParameterCategory>
;;4449,"VAL",6,0)
;;<id>1</id>
;;4449,"VAL",7,0)
;;<name>Dashboard</name>
;;4449,"VAL",8,0)
;;<preferencePage>gov.va.med.hds.dash.DBPrefPage</preferencePage>
;;4449,"VAL",9,0)
;;<parameters>
;;4449,"VAL",10,0)
;;<parameter>
;;4449,"VAL",11,0)
;;<name>Look and Feel</name>
;;4449,"VAL",12,0)
;;<key>Look and Feel^5000;DIC(4,^201^1</key>
;;4449,"VAL",13,0)
;;<value>Motif</value>
;;4449,"VAL",14,0)
;;</parameter>
;;4449,"VAL",15,0)
;;<parameter>
;;4449,"VAL",16,0)
;;<name>Selection Mode</name>
;;4449,"VAL",17,0)
;;<key>Selection Mode^0^4749^1</key>
;;4449,"VAL",18,0)
;;<value>Table-Navigator-Viewer</value>
;;4449,"VAL",19,0)
;;</parameter>
;;4449,"VAL",20,0)
;;<parameter>
;;4449,"VAL",21,0)
;;<name>Window Mode</name>
;;4449,"VAL",22,0)
;;<key>Window Mode^0^4750^1</key>
;;4449,"VAL",23,0)
;;<value>Single Document Interface</value>
;;4449,"VAL",24,0)
;;</parameter>
;;4449,"VAL",25,0)
;;</parameters>
;;4449,"VAL",26,0)
;;<children>
;;4449,"VAL",27,0)
;;<parameterCategory>
;;4449,"VAL",28,0)
;;<id>2</id>
;;4449,"VAL",29,0)
;;<name>Patient Selection</name>
;;4449,"VAL",30,0)
;;<preferencePage>gov.va.med.hds.dash.PtSelPrefPage</preferencePage>
;;4449,"VAL",31,0)
;;<parameters>
;;4449,"VAL",32,0)
;;<parameter>
;;4449,"VAL",33,0)
;;<name>Patient Selection Mode</name>
;;4449,"VAL",34,0)
;;<key>Patient Selection Mode^0^4751^1</key>
;;4449,"VAL",35,0)
;;<value>single click</value>
;;4449,"VAL",36,0)
;;</parameter>
;;4449,"VAL",37,0)
;;<parameter>
;;4449,"VAL",38,0)
;;<name>Default Patient List</name>
;;4449,"VAL",39,0)
;;<key>Default Patient List^375;DIC(9.4,^4752^1</key>
;;4449,"VAL",40,0)
;;<value>Patient List A</value>
;;4449,"VAL",41,0)
;;</parameter>
;;4449,"VAL",42,0)
;;</parameters>
;;4449,"VAL",43,0)
;;<children>
;;4449,"VAL",44,0)
;;</children>
;;4449,"VAL",45,0)
;;</parameterCategory>
;;4449,"VAL",46,0)
;;<parameterCategory>
;;4449,"VAL",47,0)
;;<id>3</id>
;;4449,"VAL",48,0)
;;<name>Lab Collection Times</name>
;;4449,"VAL",49,0)
;;<preferencePage>gov.va.med.hds.dash.LabPrefPage</preferencePage>
;;4449,"VAL",50,0)
;;<parameters>
;;4449,"VAL",51,0)
;;<parameter>
;;4449,"VAL",52,0)
;;<name>Lab Collection Times</name>
;;4449,"VAL",53,0)
;;<key>Lab Collection Times^5000;DIC(4,^21^28800</key>
;;4449,"VAL",54,0)
;;<value>0810</value>
;;4449,"VAL",55,0)
;;</parameter>
;;4449,"VAL",56,0)
;;<parameter>
;;4449,"VAL",57,0)
;;<name>Lab Collection Times</name>
;;4449,"VAL",58,0)
;;<key>Lab Collection Times^5000;DIC(4,^21^36000</key>
;;4449,"VAL",59,0)
;;<value>1030</value>
;;4449,"VAL",60,0)
;;</parameter>
;;4449,"VAL",61,0)
;;<parameter>
;;4449,"VAL",62,0)
;;<name>Lab Collection Times</name>
;;4449,"VAL",63,0)
;;<key>Lab Collection Times^5000;DIC(4,^21^39600</key>
;;4449,"VAL",64,0)
;;<value>1130</value>
;;4449,"VAL",65,0)
;;</parameter>
;;4449,"VAL",66,0)
;;<parameter>
;;4449,"VAL",67,0)
;;<name>Lab Collection Times</name>
;;4449,"VAL",68,0)
;;<key>Lab Collection Times^5000;DIC(4,^21^66600</key>
;;4449,"VAL",69,0)
;;<value>1900</value>
;;4449,"VAL",70,0)
;;</parameter>
;;4449,"VAL",71,0)
;;<parameter>
;;4449,"VAL",72,0)
;;<name>Lab Collection Times</name>
;;4449,"VAL",73,0)
;;<key>Lab Collection Times^5000;DIC(4,^21^73800</key>
;;4449,"VAL",74,0)
;;<value>2100</value>
;;4449,"VAL",75,0)
;;</parameter>
;;4449,"VAL",76,0)
;;<parameter>
;;4449,"VAL",77,0)
;;<name>Lab Collection Times</name>
;;4449,"VAL",78,0)
;;<key>Lab Collection Times^5000;DIC(4,^21^75000</key>
;;4449,"VAL",79,0)
;;<value>2350</value>
;;4449,"VAL",80,0)
;;</parameter>
;;4449,"VAL",81,0)
;;</parameters>
;;4449,"VAL",82,0)
;;<children>
;;4449,"VAL",83,0)
;;</children>
;;4449,"VAL",84,0)
;;</parameterCategory>
;;4449,"VAL",85,0)
;;</children>
;;4449,"VAL",86,0)
;;</pluginParameterCategory>
;;4449,"VAL",87,0)
;;</configTree>
;;4450,"KEY")
;;XHD TEST SCALAR PARAMETER^1
;;4450,"VAL")
;;99
;;4451,"KEY")
;;XHD PRISM ADA S508 NOTICE^1
;;4451,"VAL")
;;NO
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HXHDYP01 5041 printed Nov 22, 2024@17:07:34 Page 2
XHDYP01 ; ; Oct 09, 2003@13:59:24
+1 ;;1.0;HEALTHEVET DESKTOP;;Jul 15, 2003
LOAD ; load data into ^TMP (expects ROOT to be defined)
+1 SET I=1
FOR
SET REF=$TEXT(DATA+I)
if REF=""
QUIT
SET VAL=$TEXT(DATA+I+1)
Begin DoDot:1
+2 SET I=I+2
SET REF=$PIECE(REF,";",3,999)
SET VAL=$PIECE(VAL,";",3,999)
+3 SET @(ROOT_REF)=VAL
End DoDot:1
+4 QUIT
DATA ; parameter data
+1 ;;4448,"KEY")
+2 ;;XHD PRISM DEFAULT PERSPECTIVE^1
+3 ;;4448,"VAL")
+4 ;;clinicianDashboard
+5 ;;4449,"KEY")
+6 ;;XHD TEST WP PARAMETERS^1
+7 ;;4449,"VAL")
+8 ;;Test Word-Processing
+9 ;;4449,"VAL",1,0)
+10 ;;<?xml version="1.0" encoding="UTF-8"?>
+11 ;;4449,"VAL",2,0)
+12 ;;<configTree xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
+13 ;;4449,"VAL",3,0)
+14 ;;xsi:noNamespaceSchemaLocation="C:\reeng\main\modules\config\src\
+15 ;;4449,"VAL",4,0)
+16 ;;gov\va\med\hds\config\xml\configTree.xsd">
+17 ;;4449,"VAL",5,0)
+18 ;;<pluginParameterCategory>
+19 ;;4449,"VAL",6,0)
+20 ;;<id>1</id>
+21 ;;4449,"VAL",7,0)
+22 ;;<name>Dashboard</name>
+23 ;;4449,"VAL",8,0)
+24 ;;<preferencePage>gov.va.med.hds.dash.DBPrefPage</preferencePage>
+25 ;;4449,"VAL",9,0)
+26 ;;<parameters>
+27 ;;4449,"VAL",10,0)
+28 ;;<parameter>
+29 ;;4449,"VAL",11,0)
+30 ;;<name>Look and Feel</name>
+31 ;;4449,"VAL",12,0)
+32 ;;<key>Look and Feel^5000;DIC(4,^201^1</key>
+33 ;;4449,"VAL",13,0)
+34 ;;<value>Motif</value>
+35 ;;4449,"VAL",14,0)
+36 ;;</parameter>
+37 ;;4449,"VAL",15,0)
+38 ;;<parameter>
+39 ;;4449,"VAL",16,0)
+40 ;;<name>Selection Mode</name>
+41 ;;4449,"VAL",17,0)
+42 ;;<key>Selection Mode^0^4749^1</key>
+43 ;;4449,"VAL",18,0)
+44 ;;<value>Table-Navigator-Viewer</value>
+45 ;;4449,"VAL",19,0)
+46 ;;</parameter>
+47 ;;4449,"VAL",20,0)
+48 ;;<parameter>
+49 ;;4449,"VAL",21,0)
+50 ;;<name>Window Mode</name>
+51 ;;4449,"VAL",22,0)
+52 ;;<key>Window Mode^0^4750^1</key>
+53 ;;4449,"VAL",23,0)
+54 ;;<value>Single Document Interface</value>
+55 ;;4449,"VAL",24,0)
+56 ;;</parameter>
+57 ;;4449,"VAL",25,0)
+58 ;;</parameters>
+59 ;;4449,"VAL",26,0)
+60 ;;<children>
+61 ;;4449,"VAL",27,0)
+62 ;;<parameterCategory>
+63 ;;4449,"VAL",28,0)
+64 ;;<id>2</id>
+65 ;;4449,"VAL",29,0)
+66 ;;<name>Patient Selection</name>
+67 ;;4449,"VAL",30,0)
+68 ;;<preferencePage>gov.va.med.hds.dash.PtSelPrefPage</preferencePage>
+69 ;;4449,"VAL",31,0)
+70 ;;<parameters>
+71 ;;4449,"VAL",32,0)
+72 ;;<parameter>
+73 ;;4449,"VAL",33,0)
+74 ;;<name>Patient Selection Mode</name>
+75 ;;4449,"VAL",34,0)
+76 ;;<key>Patient Selection Mode^0^4751^1</key>
+77 ;;4449,"VAL",35,0)
+78 ;;<value>single click</value>
+79 ;;4449,"VAL",36,0)
+80 ;;</parameter>
+81 ;;4449,"VAL",37,0)
+82 ;;<parameter>
+83 ;;4449,"VAL",38,0)
+84 ;;<name>Default Patient List</name>
+85 ;;4449,"VAL",39,0)
+86 ;;<key>Default Patient List^375;DIC(9.4,^4752^1</key>
+87 ;;4449,"VAL",40,0)
+88 ;;<value>Patient List A</value>
+89 ;;4449,"VAL",41,0)
+90 ;;</parameter>
+91 ;;4449,"VAL",42,0)
+92 ;;</parameters>
+93 ;;4449,"VAL",43,0)
+94 ;;<children>
+95 ;;4449,"VAL",44,0)
+96 ;;</children>
+97 ;;4449,"VAL",45,0)
+98 ;;</parameterCategory>
+99 ;;4449,"VAL",46,0)
+100 ;;<parameterCategory>
+101 ;;4449,"VAL",47,0)
+102 ;;<id>3</id>
+103 ;;4449,"VAL",48,0)
+104 ;;<name>Lab Collection Times</name>
+105 ;;4449,"VAL",49,0)
+106 ;;<preferencePage>gov.va.med.hds.dash.LabPrefPage</preferencePage>
+107 ;;4449,"VAL",50,0)
+108 ;;<parameters>
+109 ;;4449,"VAL",51,0)
+110 ;;<parameter>
+111 ;;4449,"VAL",52,0)
+112 ;;<name>Lab Collection Times</name>
+113 ;;4449,"VAL",53,0)
+114 ;;<key>Lab Collection Times^5000;DIC(4,^21^28800</key>
+115 ;;4449,"VAL",54,0)
+116 ;;<value>0810</value>
+117 ;;4449,"VAL",55,0)
+118 ;;</parameter>
+119 ;;4449,"VAL",56,0)
+120 ;;<parameter>
+121 ;;4449,"VAL",57,0)
+122 ;;<name>Lab Collection Times</name>
+123 ;;4449,"VAL",58,0)
+124 ;;<key>Lab Collection Times^5000;DIC(4,^21^36000</key>
+125 ;;4449,"VAL",59,0)
+126 ;;<value>1030</value>
+127 ;;4449,"VAL",60,0)
+128 ;;</parameter>
+129 ;;4449,"VAL",61,0)
+130 ;;<parameter>
+131 ;;4449,"VAL",62,0)
+132 ;;<name>Lab Collection Times</name>
+133 ;;4449,"VAL",63,0)
+134 ;;<key>Lab Collection Times^5000;DIC(4,^21^39600</key>
+135 ;;4449,"VAL",64,0)
+136 ;;<value>1130</value>
+137 ;;4449,"VAL",65,0)
+138 ;;</parameter>
+139 ;;4449,"VAL",66,0)
+140 ;;<parameter>
+141 ;;4449,"VAL",67,0)
+142 ;;<name>Lab Collection Times</name>
+143 ;;4449,"VAL",68,0)
+144 ;;<key>Lab Collection Times^5000;DIC(4,^21^66600</key>
+145 ;;4449,"VAL",69,0)
+146 ;;<value>1900</value>
+147 ;;4449,"VAL",70,0)
+148 ;;</parameter>
+149 ;;4449,"VAL",71,0)
+150 ;;<parameter>
+151 ;;4449,"VAL",72,0)
+152 ;;<name>Lab Collection Times</name>
+153 ;;4449,"VAL",73,0)
+154 ;;<key>Lab Collection Times^5000;DIC(4,^21^73800</key>
+155 ;;4449,"VAL",74,0)
+156 ;;<value>2100</value>
+157 ;;4449,"VAL",75,0)
+158 ;;</parameter>
+159 ;;4449,"VAL",76,0)
+160 ;;<parameter>
+161 ;;4449,"VAL",77,0)
+162 ;;<name>Lab Collection Times</name>
+163 ;;4449,"VAL",78,0)
+164 ;;<key>Lab Collection Times^5000;DIC(4,^21^75000</key>
+165 ;;4449,"VAL",79,0)
+166 ;;<value>2350</value>
+167 ;;4449,"VAL",80,0)
+168 ;;</parameter>
+169 ;;4449,"VAL",81,0)
+170 ;;</parameters>
+171 ;;4449,"VAL",82,0)
+172 ;;<children>
+173 ;;4449,"VAL",83,0)
+174 ;;</children>
+175 ;;4449,"VAL",84,0)
+176 ;;</parameterCategory>
+177 ;;4449,"VAL",85,0)
+178 ;;</children>
+179 ;;4449,"VAL",86,0)
+180 ;;</pluginParameterCategory>
+181 ;;4449,"VAL",87,0)
+182 ;;</configTree>
+183 ;;4450,"KEY")
+184 ;;XHD TEST SCALAR PARAMETER^1
+185 ;;4450,"VAL")
+186 ;;99
+187 ;;4451,"KEY")
+188 ;;XHD PRISM ADA S508 NOTICE^1
+189 ;;4451,"VAL")
+190 ;;NO
