KIDS Distribution saved on Feb 14, 2009@21:01:03 CCR ELEMENTS FILE **KIDS**:C0CE*1.0*1^ **INSTALL NAME** C0CE*1.0*1 "BLD",7148,0) C0CE*1.0*1^^0^3090214^y "BLD",7148,4,0) ^9.64PA^171.401^4 "BLD",7148,4,170,0) 170 "BLD",7148,4,170,222) y^y^f^^n^^y^o^n "BLD",7148,4,170.101,0) 170.101 "BLD",7148,4,170.101,222) y^y^f^^n^^y^o^n "BLD",7148,4,171.101,0) 171.101 "BLD",7148,4,171.101,222) y^y^f^^^^n "BLD",7148,4,171.401,0) 171.401 "BLD",7148,4,171.401,222) y^y^f^^^^n "BLD",7148,4,"B",170,170) "BLD",7148,4,"B",170.101,170.101) "BLD",7148,4,"B",171.101,171.101) "BLD",7148,4,"B",171.401,171.401) "BLD",7148,6.3) 1 "BLD",7148,"KRN",0) ^9.67PA^8989.52^19 "BLD",7148,"KRN",.4,0) .4 "BLD",7148,"KRN",.401,0) .401 "BLD",7148,"KRN",.402,0) .402 "BLD",7148,"KRN",.403,0) .403 "BLD",7148,"KRN",.5,0) .5 "BLD",7148,"KRN",.84,0) .84 "BLD",7148,"KRN",3.6,0) 3.6 "BLD",7148,"KRN",3.8,0) 3.8 "BLD",7148,"KRN",9.2,0) 9.2 "BLD",7148,"KRN",9.8,0) 9.8 "BLD",7148,"KRN",19,0) 19 "BLD",7148,"KRN",19.1,0) 19.1 "BLD",7148,"KRN",101,0) 101 "BLD",7148,"KRN",409.61,0) 409.61 "BLD",7148,"KRN",771,0) 771 "BLD",7148,"KRN",870,0) 870 "BLD",7148,"KRN",8989.51,0) 8989.51 "BLD",7148,"KRN",8989.52,0) 8989.52 "BLD",7148,"KRN",8994,0) 8994 "BLD",7148,"KRN","B",.4,.4) "BLD",7148,"KRN","B",.401,.401) "BLD",7148,"KRN","B",.402,.402) "BLD",7148,"KRN","B",.403,.403) "BLD",7148,"KRN","B",.5,.5) "BLD",7148,"KRN","B",.84,.84) "BLD",7148,"KRN","B",3.6,3.6) "BLD",7148,"KRN","B",3.8,3.8) "BLD",7148,"KRN","B",9.2,9.2) "BLD",7148,"KRN","B",9.8,9.8) "BLD",7148,"KRN","B",19,19) "BLD",7148,"KRN","B",19.1,19.1) "BLD",7148,"KRN","B",101,101) "BLD",7148,"KRN","B",409.61,409.61) "BLD",7148,"KRN","B",771,771) "BLD",7148,"KRN","B",870,870) "BLD",7148,"KRN","B",8989.51,8989.51) "BLD",7148,"KRN","B",8989.52,8989.52) "BLD",7148,"KRN","B",8994,8994) "DATA",170,1,0) DATETIME "DATA",170,1,1) //ContinuityOfCareRecord/DateTime/ExactDateTime "DATA",170,1,4) ^DT "DATA",170,1,7) N^HEADER^^1 "DATA",170,2,0) ACTORPATIENT "DATA",170,2,1) //ContinuityOfCareRecord/Patient/ActorID "DATA",170,2,4) ^ID "DATA",170,2,7) N^ACTORS^^6 "DATA",170,3,0) ACTORFROM "DATA",170,3,1) "DATA",170,3,4) ^ID "DATA",170,3,7) N^ACTORS^^6 "DATA",170,4,0) ACTORFROM2 "DATA",170,4,1) "DATA",170,4,4) ^ID "DATA",170,4,7) N^ACTORS^^6 "DATA",170,5,0) ACTORTO "DATA",170,5,1) //ContinuityOfCareRecord/To/ActorLink/ActorID "DATA",170,5,4) ^ID "DATA",170,5,7) N^ACTORS^^6 "DATA",170,6,0) ACTORTOTEXT "DATA",170,6,1) //ContinuityOfCareRecord/To/ActorLink/ActorRole/Text "DATA",170,6,4) ^V "DATA",170,6,7) N^ACTORS^^6 "DATA",170,7,0) PURPOSEDESCRIPTION "DATA",170,7,1) //ContinuityOfCareRecord/Purpose/Description/Text "DATA",170,7,4) ^V "DATA",170,7,7) N^HEADER^^1 "DATA",170,8,0) PROBLEMOBJECTID "DATA",170,8,1) //ContinuityOfCareRecord/Body/Problems/Problem/CCRDataObjectID "DATA",170,8,4) ^ID "DATA",170,8,7) N^PROBLEMS^PROBLEMS^5 "DATA",170,9,0) PROBLEMDESCRIPTION "DATA",170,9,1) //ContinuityOfCareRecord/Body/Problems/Problem/Description/Text "DATA",170,9,4) ^V "DATA",170,9,7) N^PROBLEMS^^5 "DATA",170,10,0) PROBLEMCODEVALUE "DATA",170,10,1) //ContinuityOfCareRecord/Body/Problems/Problem/Description/Code/Value "DATA",170,10,4) ^CD "DATA",170,10,6,0) ^170.08S^1^1 "DATA",170,10,6,1,0) ICD "DATA",170,10,6,1,1,0) ^^3^3^3081123^ "DATA",170,10,6,1,1,1,0) The ICD9 code for the problem is retrieved from the patient's record by a "DATA",170,10,6,1,1,2,0) call to LIST^ORQQPL3. It is piece 4 in the return array. "DATA",170,10,6,1,1,3,0) . S @VMAP@("PROBLEMCODEVALUE")=$P(PTMP,U,4) "DATA",170,10,7) N^PROBLEMS^^5 "DATA",170,11,0) PROBLEMCODINGVERSION "DATA",170,11,1) //ContinuityOfCareRecord/Body/Problems/Problem/Description/Code/Version "DATA",170,11,4) ^CV "DATA",170,11,6,0) ^170.08S^1^1 "DATA",170,11,6,1,0) ICD "DATA",170,11,6,1,1,0) ^170.81^5^5^3081123^^ "DATA",170,11,6,1,1,1,0) The ICD9 codes for problems are retrieved from the patient record by "DATA",170,11,6,1,1,2,0) using the remote procedure call LIST^ORQQPL3. The value is in the 4th "DATA",170,11,6,1,1,3,0) piece of the return array for the problem. "DATA",170,11,6,1,1,4,0) "DATA",170,11,6,1,1,5,0) . S @VMAP@("PROBLEMCODEVALUE")=$P(PTMP,U,4) "DATA",170,11,7) N^PROBLEMS^^5 "DATA",170,12,0) PROBLEMSOURCEACTORID "DATA",170,12,1) //ContinuityOfCareRecord/Body/Problems/Problem/Source/Actor/ActorID "DATA",170,12,4) ^ID "DATA",170,12,7) N^PROBLEMS^^5 "DATA",170,13,0) FAMILYHISTORYOBJECTID "DATA",170,13,1) //ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/CCRDataObjectID "DATA",170,13,4) ^ID "DATA",170,13,7) X^FAM^^12 "DATA",170,14,0) FAMILYHISTORYACTORID "DATA",170,14,1) //ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Source/Actor/ActorID "DATA",170,14,4) ^ID "DATA",170,14,7) X^FAM^^12 "DATA",170,15,0) FAMILYMEMBERACTORID "DATA",170,15,1) //ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/ActorID "DATA",170,15,4) ^ID "DATA",170,15,7) X^FAM^^12 "DATA",170,16,0) FAMILYMEMBERACTORROLETEXT "DATA",170,16,1) //ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/ActorRole/Text "DATA",170,16,4) ^V "DATA",170,16,7) X^FAM^^12 "DATA",170,17,0) FAMILYMEMBERSOURCACTORID "DATA",170,17,1) //ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/FamilyMember/Source/Actor/ActorID "DATA",170,17,4) ^ID "DATA",170,17,7) X^FAM^^12 "DATA",170,18,0) FAMILYMEMBERPROBLEMDESCRIPTION "DATA",170,18,1) //ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Text "DATA",170,18,7) X^FAM^^12 "DATA",170,19,0) FAMILYMEMBERPROBLEMCODE "DATA",170,19,1) //ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/Value "DATA",170,19,7) X^FAM^^12 "DATA",170,20,0) FAMILYMEMBERCODESYSTEM "DATA",170,20,1) //ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/CodingSystem "DATA",170,20,7) X^FAM^^12 "DATA",170,21,0) FAMILYMEMBERCODEVERSION "DATA",170,21,1) //ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Description/Code/Version "DATA",170,21,4) ^CV "DATA",170,21,7) X^FAM^^12 "DATA",170,22,0) FAMILYMEMBERPROBLEMSOURCEID "DATA",170,22,1) //ContinuityOfCareRecord/Body/FamilyHistory/FamilyProblemHistory/Problem/Source/Actor/ActorID "DATA",170,22,4) ^ID "DATA",170,22,7) X^FAM^^12 "DATA",170,23,0) SOCIALHISTORYOBJECTID "DATA",170,23,1) "DATA",170,23,4) ^ID "DATA",170,23,7) X^SOC^^13 "DATA",170,24,0) SOCIALHISTORYTYPETEXT "DATA",170,24,1) "DATA",170,24,7) X^SOC^^13 "DATA",170,25,0) SOCIALHISTORYDESCRIPTIONTEXT "DATA",170,25,1) "DATA",170,25,7) X^SOC^^13 "DATA",170,26,0) SOCIALHISTORYSOURCACTORID "DATA",170,26,1) "DATA",170,26,4) ^ID "DATA",170,26,7) X^SOC^^13 "DATA",170,27,0) ALERTOBJECTID "DATA",170,27,1) //ContinuityOfCareRecord/Body/Alerts/Alert/CCRDataObjectID "DATA",170,27,4) ^ID "DATA",170,27,5,0) ^^1^1^3081120^ "DATA",170,27,5,1,0) Unique (in the document) ObjectID for the Alert "DATA",170,27,7) N^ALERTS^ALERTS^4 "DATA",170,28,0) ALERTDESCRIPTIONTEXT "DATA",170,28,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Description/Text "DATA",170,28,4) ^V "DATA",170,28,5,0) ^170.01^6^6^3081122^^ "DATA",170,28,5,1,0) An instance of CodedDescriptionType that "DATA",170,28,5,2,0) supports a free text string, a structured text "DATA",170,28,5,3,0) string or strings, or a structured and coded "DATA",170,28,5,4,0) text string or strings. It is recommended "DATA",170,28,5,5,0) that, when possible, all instances of "DATA",170,28,5,6,0) be coded with SNOMED CT "DATA",170,28,6,0) ^170.08S^^ "DATA",170,28,7) I^ALERTS^^4 "DATA",170,29,0) ALERTCODEVALUE^6.06 "DATA",170,29,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Description/Code/Value "DATA",170,29,4) ^CD^Reaction Coded "DATA",170,29,5,0) ^^1^1^3081120^ "DATA",170,29,5,1,0) Code Value for the Alert Reaction "DATA",170,29,7) N^ALERTS^^4 "DATA",170,30,0) ALERTCODESYSTEM^6.06 "DATA",170,30,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Description/Code/CodingSystem "DATA",170,30,4) ^CS^Reaction Coded "DATA",170,30,5,0) ^170.01^1^1^3081120^^ "DATA",170,30,5,1,0) Coding System for the Alert Reaction Code "DATA",170,30,6,0) ^170.08S^1^1 "DATA",170,30,6,1,0) SNO "DATA",170,30,6,1,1,0) ^^17^17^3081121^ "DATA",170,30,6,1,1,1,0) The Alerts Reaction SNOMED CT code "DATA",170,30,6,1,1,2,0) is assigned by the extraction as one of two "DATA",170,30,6,1,1,3,0) values based on the MECHANISM field in the PATIENT ALLERGY file 120.8. "DATA",170,30,6,1,1,4,0) "DATA",170,30,6,1,1,5,0) The codes are "DATA",170,30,6,1,1,6,0) "DATA",170,30,6,1,1,7,0) 282100009 for Adverse Reaction to a Substance "DATA",170,30,6,1,1,8,0) 418634005 for Allergic Reaction to a substance "DATA",170,30,6,1,1,9,0) "DATA",170,30,6,1,1,10,0) . N A2 S A2=$$GET1^DIQ(120.8,ALTTMP,"MECHANISM","I") ; MECHANISM "DATA",170,30,6,1,1,11,0) "DATA",170,30,6,1,1,12,0) . S ADT=ADT_$S(A2="P":"ADVERSE",A2="A":"ALLERGIC",1:"UNKNOWN") "DATA",170,30,6,1,1,13,0) "DATA",170,30,6,1,1,14,0) . S ALTCDE=$S(A2="P":"282100009",A2="A":"418634005",1:"") ; "DATA",170,30,6,1,1,15,0) "DATA",170,30,6,1,1,16,0) In a future patch, it is planned to retrieve these codes from a C0CCODES "DATA",170,30,6,1,1,17,0) file for easier maintenance. "DATA",170,30,7) N^ALERTS^^4 "DATA",170,31,0) ALERTSTATUSTEXT "DATA",170,31,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Status/Text "DATA",170,31,7) N^ALERTS^^4 "DATA",170,32,0) ALERTSOURCEID "DATA",170,32,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Source/Actor/ActorID "DATA",170,32,4) ^ID "DATA",170,32,5,0) ^^1^1^3081120^ "DATA",170,32,5,1,0) Source Actor for the Alert "DATA",170,32,7) N^ALERTS^^4 "DATA",170,33,0) ALERTAGENTPRODUCTOBJECTID "DATA",170,33,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/CCRDataObjectID "DATA",170,33,4) ^ID "DATA",170,33,5,0) ^170.01^1^1^3081120^^ "DATA",170,33,5,1,0) Object ID for the Alert Agent Product "DATA",170,33,7) N^ALERTS^^4 "DATA",170,34,0) ALERTAGENTPRODUCTSOURCEID "DATA",170,34,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/Source/Actor/ActorID "DATA",170,34,4) ^ID "DATA",170,34,5,0) ^^1^1^3081120^ "DATA",170,34,5,1,0) Source Object ID for the Alert Agent Product "DATA",170,34,7) N^ALERTS^^4 "DATA",170,35,0) ALERTAGENTPRODUCTNAMETEXT^6.03 "DATA",170,35,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/ProductName/Text "DATA",170,35,4) ^V^Product Free-Text "DATA",170,35,7) N^ALERTS^^4 "DATA",170,36,0) ALERTAGENTPRODUCTCODEVALUE^6.04 "DATA",170,36,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/ProductName/Code/Value "DATA",170,36,4) ^CD^Product Coded "DATA",170,36,7) N^ALERTS^ALERTSCODE^4 "DATA",170,37,0) ALERTAGENTPRODUCTCODESYSTEM "DATA",170,37,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Agent/Products/Product/ProductName/Code/CodingSystem "DATA",170,37,6,0) ^170.08S^1^1 "DATA",170,37,6,1,0) VUI "DATA",170,37,6,1,1,0) ^^22^22^3081121^ "DATA",170,37,6,1,1,1,0) The VUID code for Alerts Agent Product (Reactant) is "DATA",170,37,6,1,1,2,0) retrieved from the PATIENT ALLERGY file where "DATA",170,37,6,1,1,3,0) it is found using a variable pointer to several files which have a VUID "DATA",170,37,6,1,1,4,0) index. "DATA",170,37,6,1,1,5,0) "DATA",170,37,6,1,1,6,0) . S ACGL1=$P(@ALTG@(ALTTMP),U,9) ; ADDRESS OF THE REACTANT XX;GLB(YY.Z, "DATA",170,37,6,1,1,7,0) . S ACGFI=$$PRSGLB($P(ACGL1,";",2)) ; FILE NUMBER "DATA",170,37,6,1,1,8,0) . S ACIEN=$P(ACGL1,";",1) ; IEN OF REACTANT "DATA",170,37,6,1,1,9,0) . S ACVUID=$$GET1^DIQ(ACGFI,ACIEN,"VUID") ; VUID OF THE REACTANT "DATA",170,37,6,1,1,10,0) "DATA",170,37,6,1,1,11,0) [the following is copied from the Technical Description of field 1 GMR "DATA",170,37,6,1,1,12,0) ALLERGY of the PATIENT ALLERGY file] "DATA",170,37,6,1,1,13,0) This field is a variable pointer to help relate this allergy to some "DATA",170,37,6,1,1,14,0) record in one of the files to which this field points. The files that are "DATA",170,37,6,1,1,15,0) pointed to are the GMR Allergies (120.82) file, National Drug (50.6) file, "DATA",170,37,6,1,1,16,0) Drug (50) file, Drug Ingredients (50.416) file and VA Drug Class "DATA",170,37,6,1,1,17,0) (50.605) file. "DATA",170,37,6,1,1,18,0) "DATA",170,37,6,1,1,19,0) In a future patch, the resulting VUID code will be used to retrieve a "DATA",170,37,6,1,1,20,0) RXNORM code from the C0CCODES file. The RXNORM mapping "DATA",170,37,6,1,1,21,0) has been done by the "DATA",170,37,6,1,1,22,0) VA for 10,449 VUID code values. "DATA",170,37,7) N^ALERTS^^4 "DATA",170,38,0) ALERTREACTIOINDESCRIPTIONTEXT^6.05 "DATA",170,38,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Text "DATA",170,38,4) ^V^Reaction Free-Text "DATA",170,38,5,0) ^170.01^1^1^3081122^^ "DATA",170,38,5,1,0) Alert Reaction Description Text - derived from the code "DATA",170,38,7) I^ALERTS^^4 "DATA",170,39,0) ALERTREACTIONCODEVALUE "DATA",170,39,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Code/Value "DATA",170,39,4) ^CD "DATA",170,39,7) N^ALERTS^^4 "DATA",170,40,0) ALERTREACTIONCODESYSTEM "DATA",170,40,1) //ContinuityOfCareRecord/Body/Alerts/Alert/Reaction/Description/Code/CodingSystem "DATA",170,40,7) N^ALERTS^^4 "DATA",170,41,0) MEDOBJECTID "DATA",170,41,1) //ContinuityOfCareRecord/Body/Medications/Medication/CCRDataObjectID "DATA",170,41,4) ^ID "DATA",170,41,7) N^MEDS^MEDS^7 "DATA",170,42,0) MEDISSUEDATETXT "DATA",170,42,1) "DATA",170,42,7) N "DATA",170,43,0) MEDISSUEDATE "DATA",170,43,1) "DATA",170,43,7) N "DATA",170,44,0) MEDLASTFILLDATETXT "DATA",170,44,1) "DATA",170,44,7) N "DATA",170,45,0) MEDLASTFILLDATE "DATA",170,45,1) "DATA",170,45,7) N "DATA",170,46,0) MEDRXNOTXT "DATA",170,46,1) //ContinuityOfCareRecord/Body/Medications/Medication/IDs/Type/Text "DATA",170,46,7) N^MEDS^^7 "DATA",170,47,0) MEDRXNO "DATA",170,47,1) //ContinuityOfCareRecord/Body/Medications/Medication/IDs/ID "DATA",170,47,7) N^MEDS^^7 "DATA",170,48,0) MEDTYPETEXT "DATA",170,48,1) //ContinuityOfCareRecord/Body/Medications/Medication/Type/Text "DATA",170,48,7) N^MEDS^^7 "DATA",170,49,0) MEDDETAILUNADORNED "DATA",170,49,1) //ContinuityOfCareRecord/Body/Medications/Medication/Description/Text "DATA",170,49,7) N^MEDS^^7 "DATA",170,50,0) MEDSTATUSTEXT "DATA",170,50,1) //ContinuityOfCareRecord/Body/Medications/Medication/Status/Text "DATA",170,50,7) N^MEDS^^7 "DATA",170,51,0) MEDSOURCEACTORID "DATA",170,51,1) //ContinuityOfCareRecord/Body/Medications/Medication/Source/Actor/ActorID "DATA",170,51,4) ^ID "DATA",170,51,7) N^MEDS^^7 "DATA",170,52,0) MEDPRODUCTNAMETEXT "DATA",170,52,1) //ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Text "DATA",170,52,7) N^MEDS^^7 "DATA",170,53,0) MEDPRODUCTNAMECODEVALUE "DATA",170,53,1) //ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/Value "DATA",170,53,4) ^CD "DATA",170,53,7) N^MEDS^MEDSCODE^7 "DATA",170,54,0) MEDPRODUCTNAMECODINGINGSYSTEM "DATA",170,54,1) //ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/CodingSystem "DATA",170,54,7) N^MEDS^^7 "DATA",170,55,0) MEDPRODUCTNAMECODEVERSION "DATA",170,55,1) //ContinuityOfCareRecord/Body/Medications/Medication/Product/ProductName/Code/Version "DATA",170,55,4) ^CV "DATA",170,55,7) N^MEDS^^7 "DATA",170,56,0) MEDBRANDNAMETEXT "DATA",170,56,1) //ContinuityOfCareRecord/Body/Medications/Medication/Product/BrandName/Text "DATA",170,56,7) N^MEDS^^7 "DATA",170,57,0) MEDSTRENGTHVALUE "DATA",170,57,1) //ContinuityOfCareRecord/Body/Medications/Medication/Product/Strength/Value "DATA",170,57,7) N^MEDS^^7 "DATA",170,58,0) MEDSTRENGTHUNIT "DATA",170,58,1) //ContinuityOfCareRecord/Body/Medications/Medication/Product/Strength/Units/Unit "DATA",170,58,7) N^MEDS^^7 "DATA",170,59,0) MEDFORMTEXT "DATA",170,59,1) //ContinuityOfCareRecord/Body/Medications/Medication/Product/Form/Text "DATA",170,59,7) N^MEDS^^7 "DATA",170,60,0) MEDCONCVALUE "DATA",170,60,1) //ContinuityOfCareRecord/Body/Medications/Medication/Product/Concentration/Value "DATA",170,60,7) N^MEDS^^7 "DATA",170,61,0) MEDCONCUNIT "DATA",170,61,1) //ContinuityOfCareRecord/Body/Medications/Medication/Product/Concentration/Units/Unit "DATA",170,61,7) N^MEDS^^7 "DATA",170,62,0) MEDSIZETEXT "DATA",170,62,1) //ContinuityOfCareRecord/Body/Medications/Medication/Product/Size/Text "DATA",170,62,7) N^MEDS^^7 "DATA",170,63,0) MEDQUANTITYVALUE "DATA",170,63,1) //ContinuityOfCareRecord/Body/Medications/Medication/Quantity/Value "DATA",170,63,7) N^MEDS^^7 "DATA",170,64,0) MEDQUANTITYUNIT "DATA",170,64,1) //ContinuityOfCareRecord/Body/Medications/Medication/Quantity/Units/Unit "DATA",170,64,7) N^MEDS^^7 "DATA",170,65,0) MEDDIRECTIONDESCRIPTIONTEXT "DATA",170,65,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Description/Text "DATA",170,65,7) N^DIR^^8 "DATA",170,66,0) MEDDOSEINDICATOR "DATA",170,66,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DoseIndicator/Text "DATA",170,66,7) N^DIR^^8 "DATA",170,67,0) MEDDELIVERYMETHOD "DATA",170,67,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DeliveryMethod/Text "DATA",170,67,7) N^DIR^^8 "DATA",170,68,0) MEDDOSEVALUE "DATA",170,68,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Value "DATA",170,68,7) N^DIR^^8 "DATA",170,69,0) MEDDOSEUNIT "DATA",170,69,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Units/Unit "DATA",170,69,7) N^DIR^^8 "DATA",170,70,0) MEDRATEVALUE "DATA",170,70,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Rate/Value "DATA",170,70,7) N^DIR^^8 "DATA",170,71,0) MEDRATEUNIT "DATA",170,71,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Dose/Rate/Units/Unit "DATA",170,71,7) N^DIR^^8 "DATA",170,72,0) MEDVEHICLETEXT "DATA",170,72,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Vehicle/Text "DATA",170,72,7) N^DIR^^8 "DATA",170,73,0) MEDDIRECTIONROUTETEXT "DATA",170,73,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Route/Text "DATA",170,73,7) N^DIR^^8 "DATA",170,74,0) MEDFREQUENCYVALUE "DATA",170,74,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Frequency/Value "DATA",170,74,7) N^DIR^^8 "DATA",170,75,0) MEDINTERVALVALUE "DATA",170,75,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Interval/Value "DATA",170,75,7) N^DIR^^8 "DATA",170,76,0) MEDINTERVALUNIT "DATA",170,76,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Interval/Units/Unit "DATA",170,76,7) N^DIR^^8 "DATA",170,77,0) MEDDURATIONVALUE "DATA",170,77,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Duration/Value "DATA",170,77,7) N^DIR^^8 "DATA",170,78,0) MEDDURATIONUNIT "DATA",170,78,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Duration/Units/Unit "DATA",170,78,7) N^DIR^^8 "DATA",170,79,0) MEDPRNFLAG "DATA",170,79,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/PRNFlag/Text "DATA",170,79,7) N^DIR^^8 "DATA",170,80,0) MEDPROBLEMOBJECTID "DATA",170,80,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/CCRDataObjectID "DATA",170,80,4) ^ID "DATA",170,80,7) N^DIR^^8 "DATA",170,81,0) MEDPROBLEMTYPETXT "DATA",170,81,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Type/Text "DATA",170,81,7) N^DIR^^8 "DATA",170,82,0) MEDPROBLEMDESCRIPTION "DATA",170,82,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Text "DATA",170,82,7) N^DIR^^8 "DATA",170,83,0) MEDPROBLEMCODEVALUE "DATA",170,83,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/Value "DATA",170,83,4) ^CD "DATA",170,83,7) N^DIR^^8 "DATA",170,84,0) MEDPROBLEMCODINGSYSTEM "DATA",170,84,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/CodingSystem "DATA",170,84,4) ^CS "DATA",170,84,7) N^DIR^^8 "DATA",170,85,0) MEDPROBLEMCODINGVERSION "DATA",170,85,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Description/Code/Version "DATA",170,85,7) N^DIR^^8 "DATA",170,86,0) MEDPROBLEMSOURCEACTORID "DATA",170,86,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/Indication/Problem/Source/Actor/ActorID "DATA",170,86,4) ^ID "DATA",170,86,7) N^DIR^^8 "DATA",170,87,0) MEDSTOPINDICATOR "DATA",170,87,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/StopIndicator/Text "DATA",170,87,7) N^DIR^^8 "DATA",170,88,0) MEDDIRSEQ "DATA",170,88,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/DirectionSequenceModifier "DATA",170,88,7) N^DIR^^8 "DATA",170,89,0) MEDMULDIRMOD "DATA",170,89,1) //ContinuityOfCareRecord/Body/Medications/Medication/Directions/Direction/MultipleDirectionModifier/Text "DATA",170,89,7) N^DIR^^8 "DATA",170,90,0) MEDPTINSTRUCTIONS "DATA",170,90,1) //ContinuityOfCareRecord/Body/Medications/Medication/PatientInstructions/Instruction "DATA",170,90,7) N^MEDS^^7 "DATA",170,91,0) MEDFULLFILLMENTINSTRUCTIONS "DATA",170,91,1) //ContinuityOfCareRecord/Body/Medications/Medication/FullfillmentInstructions/Text "DATA",170,91,7) N^MEDS^^7 "DATA",170,92,0) MEDRFNO "DATA",170,92,1) //ContinuityOfCareRecord/Body/Medications/Medication/Refills/Refill/Number "DATA",170,92,7) N^MEDS^^7 "DATA",170,93,0) VITALSIGNSDATAOBJECTID "DATA",170,93,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/CCRDataObjectID "DATA",170,93,4) ^ID "DATA",170,93,7) N^VITALS^VITALS^11 "DATA",170,94,0) VITALSIGNSDATETIMETYPETEXT "DATA",170,94,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/DateTime/Type/Text "DATA",170,94,4) ^DT "DATA",170,94,7) N^VITALS^^11 "DATA",170,95,0) VITALSIGNSEXACTDATETIME "DATA",170,95,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/DateTime/ExactDateTime "DATA",170,95,4) ^DT "DATA",170,95,7) N^VITALS^^11 "DATA",170,96,0) VITALSIGNSSOURCEACTORID "DATA",170,96,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/Source/Actor/ActorID "DATA",170,96,4) ^ID "DATA",170,96,7) N^VITALS^^11 "DATA",170,97,0) VITALSIGNSTESTOBJECTID "DATA",170,97,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/Test/CCRDataObjectID "DATA",170,97,4) ^ID "DATA",170,97,7) N^VITALS^^11 "DATA",170,98,0) VITALSIGNSTESTTYPETEXT "DATA",170,98,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Type/Text "DATA",170,98,7) N^VITALS^^11 "DATA",170,99,0) VITALSIGNSDESCRIPTIONTEXT "DATA",170,99,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Text "DATA",170,99,7) N^VITALS^^11 "DATA",170,100,0) VITALSIGNSDESCCODEVALUE "DATA",170,100,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/Value "DATA",170,100,4) ^CD "DATA",170,100,6,0) ^170.08S^1^1 "DATA",170,100,6,1,0) SNO "DATA",170,100,6,1,1,0) ^^26^26^3081121^ "DATA",170,100,6,1,1,1,0) The SNOMED CT codes for Vitals are assigned by the extraction according "DATA",170,100,6,1,1,2,0) to the vital signs supported in VistA as follows: "DATA",170,100,6,1,1,3,0) "DATA",170,100,6,1,1,4,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT" "DATA",170,100,6,1,1,5,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="248327008" "DATA",170,100,6,1,1,6,0) "DATA",170,100,6,1,1,7,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT" "DATA",170,100,6,1,1,8,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="107647005" "DATA",170,100,6,1,1,9,0) "DATA",170,100,6,1,1,10,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE" "DATA",170,100,6,1,1,11,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="392570002" "DATA",170,100,6,1,1,12,0) "DATA",170,100,6,1,1,13,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE" "DATA",170,100,6,1,1,14,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="309646008" "DATA",170,100,6,1,1,15,0) "DATA",170,100,6,1,1,16,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION" "DATA",170,100,6,1,1,17,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366147009" "DATA",170,100,6,1,1,18,0) "DATA",170,100,6,1,1,19,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE" "DATA",170,100,6,1,1,20,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366199006" "DATA",170,100,6,1,1,21,0) "DATA",170,100,6,1,1,22,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN" "DATA",170,100,6,1,1,23,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="22253000" "DATA",170,100,6,1,1,24,0) "DATA",170,100,6,1,1,25,0) It is planned that these codes be retrieved from a C0CCODES FILE in a "DATA",170,100,6,1,1,26,0) future patch for easier maintenance. "DATA",170,100,7) N^VITALS^^11 "DATA",170,101,0) VITALSIGNSDESCCODINGSYSTEM "DATA",170,101,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/CodingSystem "DATA",170,101,4) ^CS "DATA",170,101,6,0) ^170.08S^1^1 "DATA",170,101,6,1,0) SNO "DATA",170,101,6,1,1,0) ^^26^26^3081121^ "DATA",170,101,6,1,1,1,0) The SNOMED CT codes for Vitals are assigned by the extraction according "DATA",170,101,6,1,1,2,0) to the vital signs supported in VistA as follows: "DATA",170,101,6,1,1,3,0) "DATA",170,101,6,1,1,4,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT" "DATA",170,101,6,1,1,5,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="248327008" "DATA",170,101,6,1,1,6,0) "DATA",170,101,6,1,1,7,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT" "DATA",170,101,6,1,1,8,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="107647005" "DATA",170,101,6,1,1,9,0) "DATA",170,101,6,1,1,10,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE" "DATA",170,101,6,1,1,11,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="392570002" "DATA",170,101,6,1,1,12,0) "DATA",170,101,6,1,1,13,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE" "DATA",170,101,6,1,1,14,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="309646008" "DATA",170,101,6,1,1,15,0) "DATA",170,101,6,1,1,16,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION" "DATA",170,101,6,1,1,17,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366147009" "DATA",170,101,6,1,1,18,0) "DATA",170,101,6,1,1,19,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE" "DATA",170,101,6,1,1,20,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366199006" "DATA",170,101,6,1,1,21,0) "DATA",170,101,6,1,1,22,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN" "DATA",170,101,6,1,1,23,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="22253000" "DATA",170,101,6,1,1,24,0) "DATA",170,101,6,1,1,25,0) It is planned that these codes be retrieved from a C0CCODES FILE in a "DATA",170,101,6,1,1,26,0) future patch for easier maintenance. "DATA",170,101,7) I^VITALS^^11 "DATA",170,102,0) VITALSIGNSCODEVERSION "DATA",170,102,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Description/Code/Version "DATA",170,102,4) ^CV "DATA",170,102,6,0) ^170.08S^1^1 "DATA",170,102,6,1,0) SNO "DATA",170,102,6,1,1,0) ^^26^26^3081121^ "DATA",170,102,6,1,1,1,0) The SNOMED CT codes for Vitals are assigned by the extraction according "DATA",170,102,6,1,1,2,0) to the vital signs supported in VistA as follows: "DATA",170,102,6,1,1,3,0) "DATA",170,102,6,1,1,4,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="HEIGHT" "DATA",170,102,6,1,1,5,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="248327008" "DATA",170,102,6,1,1,6,0) "DATA",170,102,6,1,1,7,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="WEIGHT" "DATA",170,102,6,1,1,8,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="107647005" "DATA",170,102,6,1,1,9,0) "DATA",170,102,6,1,1,10,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="BLOOD PRESSURE" "DATA",170,102,6,1,1,11,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="392570002" "DATA",170,102,6,1,1,12,0) "DATA",170,102,6,1,1,13,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="TEMPERATURE" "DATA",170,102,6,1,1,14,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="309646008" "DATA",170,102,6,1,1,15,0) "DATA",170,102,6,1,1,16,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="RESPIRATION" "DATA",170,102,6,1,1,17,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366147009" "DATA",170,102,6,1,1,18,0) "DATA",170,102,6,1,1,19,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PULSE" "DATA",170,102,6,1,1,20,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="366199006" "DATA",170,102,6,1,1,21,0) "DATA",170,102,6,1,1,22,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONTEXT")="PAIN" "DATA",170,102,6,1,1,23,0) . . . S @VITVMAP@("VITALSIGNSDESCRIPTIONCODEVALUE")="22253000" "DATA",170,102,6,1,1,24,0) "DATA",170,102,6,1,1,25,0) It is planned that these codes be retrieved from a C0CCODES FILE in a "DATA",170,102,6,1,1,26,0) future patch for easier maintenance. "DATA",170,102,7) N^VITALS^^11 "DATA",170,103,0) VITALSIGNSTESTSOURCEACTORID "DATA",170,103,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/Test/Source/Actor/ActorID "DATA",170,103,4) ^ID "DATA",170,103,7) N^VITALS^^11 "DATA",170,104,0) VITALSIGNSTESTRESULTVALUE "DATA",170,104,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/Test/TestResult/Value "DATA",170,104,7) N^VITALS^^11 "DATA",170,105,0) VITALSIGNSTESTRESULTUNIT "DATA",170,105,1) //ContinuityOfCareRecord/Body/VitalSigns/Result/Test/TestResult/Units/Unit "DATA",170,105,7) N^VITALS^^11 "DATA",170,106,0) RESULTOBJECTID "DATA",170,106,1) //ContinuityOfCareRecord/Body/Results/Result/CCRDataObjectID "DATA",170,106,4) ^ID "DATA",170,106,7) N^LABS^RESULTS^14 "DATA",170,107,0) RESULTASSESSMENTDATETIME "DATA",170,107,1) //ContinuityOfCareRecord/Body/Results/Result/DateTime/ExactDateTime "DATA",170,107,3,0) ^^4^4^3081122^ "DATA",170,107,3,1,0) The result assessment time is pulled from OBR7 of the HL7 message for LABS "DATA",170,107,3,2,0) "DATA",170,107,3,3,0) S X("OBR","OBR7")="7^00241^Observation "DATA",170,107,3,4,0) Date/Time^RESULTASSESSMENTDATETIME" "DATA",170,107,4) ^DT "DATA",170,107,5,0) ^^4^4^3081122^ "DATA",170,107,5,1,0) The result assessment date is pulled from OB7 of the HL7 message for LABS. "DATA",170,107,5,2,0) "DATA",170,107,5,3,0) S X("OBR","OBR7")="7^00241^Observation "DATA",170,107,5,4,0) Date/Time^RESULTASSESSMENTDATETIME" "DATA",170,107,6,0) ^170.08S^^ "DATA",170,107,7) I^LABS^^14 "DATA",170,108,0) RESULTDESCRIPTIONTEXT "DATA",170,108,1) //ContinuityOfCareRecord/Body/Results/Result/Description/Text "DATA",170,108,7) N^LABS^^14 "DATA",170,109,0) RESULTCODE "DATA",170,109,1) //ContinuityOfCareRecord/Body/Results/Result/Description/Code/Value "DATA",170,109,3,0) ^^5^5^3081122^ "DATA",170,109,3,1,0) The result code is pulled from OBR4 piece 1 of the HL7 message for LABS. "DATA",170,109,3,2,0) "DATA",170,109,3,3,0) "DATA",170,109,3,4,0) S X("OBR","OBR4;LOINC")="4;1^00238^Universal Service ID - "DATA",170,109,3,5,0) LOINC^RESULTCODE" "DATA",170,109,4) ^CD "DATA",170,109,6,0) ^170.08S^1^1 "DATA",170,109,6,1,0) LN "DATA",170,109,6,1,1,0) ^170.81^4^4^3081122^^^ "DATA",170,109,6,1,1,1,0) The result code is a LOINC passed in OBR4 piece 1 of the HL7 message. "DATA",170,109,6,1,1,2,0) "DATA",170,109,6,1,1,3,0) S X("OBR","OBR4;LOINC")="4;1^00238^Universal Service ID - "DATA",170,109,6,1,1,4,0) LOINC^RESULTCODE" "DATA",170,109,7) I^LABS^^14 "DATA",170,110,0) RESULTCODINGSYSTEM "DATA",170,110,1) //ContinuityOfCareRecord/Body/Results/Result/Description/Code/CodingSystem "DATA",170,110,4) ^CS "DATA",170,110,7) N^LABS^^14 "DATA",170,111,0) RESULTSTATUS "DATA",170,111,1) //ContinuityOfCareRecord/Body/Results/Result/Status/Text "DATA",170,111,7) N^LABS^^14 "DATA",170,112,0) RESULTSOURCEACTORID "DATA",170,112,1) //ContinuityOfCareRecord/Body/Results/Result/Source/Actor/ActorID "DATA",170,112,4) ^ID "DATA",170,112,7) N^LABS^^14 "DATA",170,113,0) RESULTTESTOBJECTID "DATA",170,113,1) //ContinuityOfCareRecord/Body/Results/Result/Test/CCRDataObjectID "DATA",170,113,4) ^ID "DATA",170,113,7) N^TEST^^10 "DATA",170,114,0) RESULTTESTDATETIME "DATA",170,114,1) //ContinuityOfCareRecord/Body/Results/Result/Test/DateTime/ExactDateTime "DATA",170,114,4) ^DT "DATA",170,114,7) N^TEST^^10 "DATA",170,115,0) RESULTTESTDESCRIPTIONTEXT "DATA",170,115,1) //ContinuityOfCareRecord/Body/Results/Result/Test/Description/Text "DATA",170,115,7) N^TEST^^10 "DATA",170,116,0) RESULTTESTCODEVALUE "DATA",170,116,1) //ContinuityOfCareRecord/Body/Results/Result/Test/Description/Code/Value "DATA",170,116,4) ^CD "DATA",170,116,7) N^TEST^^10 "DATA",170,117,0) RESULTTESTCODINGSYSTEM "DATA",170,117,1) //ContinuityOfCareRecord/Body/Results/Result/Test/Description/Code/CodingSystem "DATA",170,117,4) ^CS "DATA",170,117,7) N^TEST^RESULTSLN^10 "DATA",170,118,0) RESULTTESTSTATUSTEXT "DATA",170,118,1) //ContinuityOfCareRecord/Body/Results/Result/Test/Status/Text "DATA",170,118,7) N^TEST^^10 "DATA",170,119,0) RESULTTESTSOURCEACTORID "DATA",170,119,1) //ContinuityOfCareRecord/Body/Results/Result/Test/Source/Actor/ActorID "DATA",170,119,4) ^ID "DATA",170,119,7) N^TEST^^10 "DATA",170,120,0) RESULTTESTVALUE "DATA",170,120,1) //ContinuityOfCareRecord/Body/Results/Result/Test/TestResult/Value "DATA",170,120,7) N^TEST^^10 "DATA",170,121,0) RESULTTESTUNITS "DATA",170,121,1) //ContinuityOfCareRecord/Body/Results/Result/Test/TestResult/Units/Unit "DATA",170,121,7) N^TEST^^10 "DATA",170,122,0) RESULTTESTNORMALDESCTEXT "DATA",170,122,1) //ContinuityOfCareRecord/Body/Results/Result/Test/NormalResult/Normal/Description/Text "DATA",170,122,7) N^TEST^^10 "DATA",170,123,0) RESULTTESTNORMALSOURCEACTORID "DATA",170,123,1) //ContinuityOfCareRecord/Body/Results/Result/Test/NormalResult/Normal/Source/Actor/ActorID "DATA",170,123,4) ^ID "DATA",170,123,7) N^TEST^^10 "DATA",170,124,0) RESULTTESTFLAG "DATA",170,124,1) //ContinuityOfCareRecord/Body/Results/Result/Test/Flag/Text "DATA",170,124,7) N^TEST^^10 "DATA",170,125,0) ACTORDATEOFBIRTH "DATA",170,125,1) //ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/DateOfBirth/ExactDateTime "DATA",170,125,7) N^ACTORS^^6 "DATA",170,126,0) ACTORGENDER "DATA",170,126,1) //ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Person/Gender/Code/Value "DATA",170,126,7) N^ACTORS^^6 "DATA",170,127,0) ACTORSSNTEXT "DATA",170,127,1) //ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/IDs/Type/Text "DATA",170,127,7) N^ACTORS^^6 "DATA",170,128,0) ACTORSSN "DATA",170,128,1) //ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/IDs/ID "DATA",170,128,7) N^ACTORS^^6 "DATA",170,129,0) ACTORSSNSOURCEID "DATA",170,129,1) //ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/IDs/Source/Actor/ActorID "DATA",170,129,4) ^ID "DATA",170,129,7) N^ACTORS^^6 "DATA",170,130,0) ACTORADDRESSLINE2 "DATA",170,130,1) //ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/Line2 "DATA",170,130,7) N^ACTORS^^6 "DATA",170,131,0) ACTORADDRESSZIPCODE "DATA",170,131,1) //ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Address/PostalCode "DATA",170,131,7) N^ACTORS^^6 "DATA",170,132,0) ACTORRESTEL "DATA",170,132,1) "DATA",170,132,7) N^ACTORS^^6 "DATA",170,133,0) ACTORRESTELTEXT "DATA",170,133,1) "DATA",170,133,7) N^ACTORS^^6 "DATA",170,134,0) ACTORWORKTEL "DATA",170,134,1) "DATA",170,134,7) N^ACTORS^^6 "DATA",170,135,0) ACTORWORKTELTEXT "DATA",170,135,1) "DATA",170,135,7) N^ACTORS^^6 "DATA",170,136,0) ACTORCELLTEL "DATA",170,136,1) "DATA",170,136,7) N^ACTORS^^6 "DATA",170,137,0) ACTORCELLTELTEXT "DATA",170,137,1) "DATA",170,137,7) N^ACTORS^^6 "DATA",170,138,0) ACTORADDRESSSOURCEID "DATA",170,138,1) //ContinuityOfCareRecord/Actors/ACTOR-PATIENT/Actor/Source/Actor/ActorID "DATA",170,138,4) ^ID "DATA",170,138,7) N^ACTORS^^6 "DATA",170,139,0) ACTORINFOSYSNAME "DATA",170,139,1) //ContinuityOfCareRecord/Actors/ACTOR-SYSTEM/Actor/InformationSystem/Name "DATA",170,139,7) N^ACTORS^^6 "DATA",170,140,0) ACTORINFOSYSVER "DATA",170,140,1) //ContinuityOfCareRecord/Actors/ACTOR-SYSTEM/Actor/InformationSystem/Version "DATA",170,140,7) N^ACTORS^^6 "DATA",170,141,0) ACTORINFOSYSSOURCEID "DATA",170,141,1) //ContinuityOfCareRecord/Actors/ACTOR-SYSTEM/Actor/Source/Actor/ActorID "DATA",170,141,4) ^ID "DATA",170,141,7) N^ACTORS^^6 "DATA",170,142,0) ACTORDISPLAYNAME "DATA",170,142,1) //ContinuityOfCareRecord/Actors/ACTOR-NOK/Actor/Person/Name/DisplayName "DATA",170,142,7) N^ACTORS^^6 "DATA",170,143,0) ACTORRELATION "DATA",170,143,1) //ContinuityOfCareRecord/Actors/ACTOR-NOK/Actor/Relation/Text "DATA",170,143,7) N^ACTORS^^6 "DATA",170,144,0) ACTORRELATIONSOURCEID "DATA",170,144,1) //ContinuityOfCareRecord/Actors/ACTOR-NOK/Actor/Source/Actor/ActorID "DATA",170,144,4) ^ID "DATA",170,144,7) N^ACTORS^^6 "DATA",170,145,0) ACTORGIVENNAME "DATA",170,145,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Given "DATA",170,145,7) N^ACTORS^^6 "DATA",170,146,0) ACTORMIDDLENAME "DATA",170,146,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Middle "DATA",170,146,7) N^ACTORS^^6 "DATA",170,147,0) ACTORFAMILYNAME "DATA",170,147,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Family "DATA",170,147,4) ^V "DATA",170,147,7) N^ACTORS^^6 "DATA",170,148,0) ACTORTITLE "DATA",170,148,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Person/Name/CurrentName/Title "DATA",170,148,7) N^ACTORS^^6 "DATA",170,149,0) IDTYPE "DATA",170,149,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/IDs/Type/Text "DATA",170,149,7) N "DATA",170,150,0) ID "DATA",170,150,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/IDs/ID "DATA",170,150,4) ^ID "DATA",170,150,7) N "DATA",170,151,0) IDDESC "DATA",170,151,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/IDs/IssuedBy/Description/Text "DATA",170,151,7) N "DATA",170,152,0) ACTORSPECIALITY "DATA",170,152,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Specialty/Text "DATA",170,152,7) N^ACTORS^^6 "DATA",170,153,0) ACTORADDRESSTYPE "DATA",170,153,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/Type/Text "DATA",170,153,7) N^ACTORS^^6 "DATA",170,154,0) ACTORADDRESSLINE1 "DATA",170,154,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/Line1 "DATA",170,154,7) N^ACTORS^^6 "DATA",170,155,0) ACTORADDRESSCITY "DATA",170,155,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/City "DATA",170,155,7) N^ACTORS^^6 "DATA",170,156,0) ACTORADDRESSSTATE "DATA",170,156,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/State "DATA",170,156,7) N^ACTORS^^6 "DATA",170,157,0) ACTORPOSTALCODE "DATA",170,157,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Address/PostalCode "DATA",170,157,7) N^ACTORS^^6 "DATA",170,158,0) ACTORTELEPHONE "DATA",170,158,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Telephone/Value "DATA",170,158,7) N^ACTORS^^6 "DATA",170,159,0) ACTORTELEPHONETYPE "DATA",170,159,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Telephone/Type/Text "DATA",170,159,7) N^ACTORS^^6 "DATA",170,160,0) ACTOREMAIL "DATA",170,160,1) //ContinuityOfCareRecord/Actors/ACTOR-PROVIDER/Actor/Email/Value "DATA",170,160,7) N^ACTORS^^6 "DATA",170,161,0) ACTOROBJECTID "DATA",170,161,1) //ContinuityOfCareRecord/Actors/ACTOR-ORG/Actor/ActorObjectID "DATA",170,161,4) ^ID "DATA",170,161,7) N^ACTORS^^6 "DATA",170,162,0) ORGANIZATIONNAME "DATA",170,162,1) //ContinuityOfCareRecord/Actors/ACTOR-ORG/Actor/Organization/Name "DATA",170,162,7) N "DATA",170,163,0) ACTORSOURCEID "DATA",170,163,1) //ContinuityOfCareRecord/Actors/ACTOR-ORG/Actor/Source/Actor/ActorID "DATA",170,163,4) ^ID "DATA",170,163,7) N^ACTORS^^6 "DATA",170,164,0) PROBLEMCONDITION "DATA",170,164,7) ^^^5 "DATA",170,165,0) PROBLEMDATEMOD "DATA",170,165,7) ^^^5 "DATA",170,166,0) PROBLEMDATEOFONSET "DATA",170,166,7) ^^^5 "DATA",170,167,0) PROBLEMDTREC "DATA",170,167,7) ^^^5 "DATA",170,168,0) PROBLEMHASCMT "DATA",170,168,7) ^^^5 "DATA",170,169,0) PROBLEMIEN "DATA",170,169,7) ^^^5 "DATA",170,170,0) PROBLEMINACT "DATA",170,170,7) ^^^5 "DATA",170,171,0) PROBLEMLOC "DATA",170,171,7) ^^^5 "DATA",170,172,0) PROBLEMLOCTYPE "DATA",170,172,7) ^^^5 "DATA",170,173,0) PROBLEMPROVIDER "DATA",170,173,7) ^^^5 "DATA",170,174,0) PROBLEMSC "DATA",170,174,7) ^^^5 "DATA",170,175,0) PROBLEMSE "DATA",170,175,7) ^^^5 "DATA",170,176,0) PROBLEMSERVICE "DATA",170,176,7) ^^^5 "DATA",170,177,0) PROBLEMSTATUS "DATA",170,177,7) ^^^5 "DATA",170,178,0) ALERTCODESYSTEMVERSION "DATA",170,178,7) ^^^4 "DATA",170,179,0) VITALSIGNSDESCRIPTIONCODEVALUE "DATA",170,179,7) ^^^11 "DATA",170,180,0) VITALSIGNSDESCODEVALUE "DATA",170,180,7) ^^^11 "DATA",170,181,0) IMMUNEDATETIME "DATA",170,181,7) ^^^15 "DATA",170,182,0) IMMUNEDATETIMETYPETEXT "DATA",170,182,7) ^^^15 "DATA",170,183,0) IMMUNEOBJECTID "DATA",170,183,7) ^^^15 "DATA",170,184,0) IMMUNEPRODUCTCODE "DATA",170,184,7) ^^^15 "DATA",170,185,0) IMMUNEPRODUCTCODESYSTEM "DATA",170,185,7) ^^^15 "DATA",170,186,0) IMMUNEPRODUCTNAMETEXT "DATA",170,186,7) ^^^15 "DATA",170,187,0) IMMUNESOURCEACTORID "DATA",170,187,7) ^^^15 "DATA",170,188,0) C1 "DATA",170,188,7) ^^^10 "DATA",170,189,0) C2 "DATA",170,189,7) ^^^10 "DATA",170,190,0) C3 "DATA",170,190,7) ^^^10 "DATA",170,191,0) C4 "DATA",170,191,7) ^^^10 "DATA",170,192,0) C5 "DATA",170,192,7) ^^^10 "DATA",170,193,0) C6 "DATA",170,193,7) ^^^10 "DATA",170.101,1,0) HEADER^2 "DATA",170.101,1,1,0) ^170.1012P^3^3 "DATA",170.101,1,1,1,0) 3 "DATA",170.101,1,1,2,0) 5 "DATA",170.101,1,1,3,0) 7 "DATA",170.101,2,0) ROOT "DATA",170.101,2,2,0) ^170.1013P^1^1 "DATA",170.101,2,2,1,0) 1 "DATA",170.101,3,0) BODY^2 "DATA",170.101,4,0) ALERTS^3 "DATA",170.101,4,1,0) ^170.1012P^3^3 "DATA",170.101,4,1,1,0) 37 "DATA",170.101,4,1,2,0) 35 "DATA",170.101,4,1,3,0) 36 "DATA",170.101,5,0) PROBLEMS^3 "DATA",170.101,5,1,0) ^170.1012P^4^4 "DATA",170.101,5,1,1,0) 10 "DATA",170.101,5,1,2,0) 11 "DATA",170.101,5,1,3,0) 9 "DATA",170.101,5,1,4,0) 8 "DATA",170.101,6,0) ACTORS^2 "DATA",170.101,6,1,0) ^170.1012P^1^1 "DATA",170.101,6,1,1,0) 155 "DATA",170.101,7,0) MEDS^3 "DATA",170.101,7,1,0) ^170.1012P^2^2 "DATA",170.101,7,1,1,0) 56 "DATA",170.101,7,1,2,0) 61 "DATA",170.101,7,2,0) ^170.1013P^1^1 "DATA",170.101,7,2,1,0) 8 "DATA",170.101,8,0) DIRECTIONS^7 "DATA",170.101,8,1,0) ^170.1012P^2^2 "DATA",170.101,8,1,1,0) 65 "DATA",170.101,8,1,2,0) 88 "DATA",170.101,9,0) RESULTS^3 "DATA",170.101,9,1,0) ^170.1012P^2^2 "DATA",170.101,9,1,1,0) 109 "DATA",170.101,9,1,2,0) 110 "DATA",170.101,9,2,0) ^170.1013P^1^1 "DATA",170.101,9,2,1,0) 10 "DATA",170.101,10,0) TEST^14 "DATA",170.101,10,1,0) ^170.1012P^1^1 "DATA",170.101,10,1,1,0) 116 "DATA",170.101,11,0) VITALS^3 "DATA",170.101,11,1,0) ^170.1012P^5^5 "DATA",170.101,11,1,1,0) 100 "DATA",170.101,11,1,2,0) 99 "DATA",170.101,11,1,3,0) 102 "DATA",170.101,11,1,4,0) 93 "DATA",170.101,11,1,5,0) 94 "DATA",170.101,12,0) FAM^3 "DATA",170.101,12,1,0) ^170.1012P^1^1 "DATA",170.101,12,1,1,0) 14 "DATA",170.101,13,0) SOC^3 "DATA",170.101,13,1,0) ^170.1012P^1^1 "DATA",170.101,13,1,1,0) 25 "DATA",170.101,14,0) LABS^3 "DATA",170.101,14,1,0) ^170.1012P^1^1 "DATA",170.101,14,1,1,0) 109 "DATA",170.101,14,2,0) ^170.1013P^1^1 "DATA",170.101,14,2,1,0) 10 "DATA",170.101,15,0) IMMUNE^3 "FIA",170) CCR DICTIONARY "FIA",170,0) ^C0CDIC(170, "FIA",170,0,0) 170 "FIA",170,0,1) y^y^f^^n^^y^o^n "FIA",170,0,10) "FIA",170,0,11) "FIA",170,0,"RLRO") "FIA",170,170) 0 "FIA",170,170.01) 0 "FIA",170,170.04) 0 "FIA",170,170.08) 0 "FIA",170,170.81) 0 "FIA",170.101) CCR NODE TYPE "FIA",170.101,0) ^C0CDIC(170.101, "FIA",170.101,0,0) 170.101 "FIA",170.101,0,1) y^y^f^^n^^y^o^n "FIA",170.101,0,10) "FIA",170.101,0,11) "FIA",170.101,0,"RLRO") "FIA",170.101,170.101) 0 "FIA",170.101,170.1012) 0 "FIA",170.101,170.1013) 0 "FIA",171.101) CCR E2 "FIA",171.101,0) ^C0CE( "FIA",171.101,0,0) 171.101P "FIA",171.101,0,1) y^y^f^^^^n "FIA",171.101,0,10) "FIA",171.101,0,11) "FIA",171.101,0,"RLRO") "FIA",171.101,171.101) 0 "FIA",171.101,171.111) 0 "FIA",171.101,171.121) 0 "FIA",171.101,171.131) 0 "FIA",171.101,171.1311) 0 "FIA",171.401) CCR SOURCE "FIA",171.401,0) ^C0C(171.401, "FIA",171.401,0,0) 171.401 "FIA",171.401,0,1) y^y^f^^^^n "FIA",171.401,0,10) "FIA",171.401,0,11) "FIA",171.401,0,"RLRO") "FIA",171.401,171.401) 0 "FIA",171.401,171.4011) 0 "FIA",171.401,171.4012) 0 "IX",170,170,"C",0) 170^C^A whole file cross reference of Variables by Coding System^R^^F^IR^W^170.08^^^^^LS "IX",170,170,"C",1) S ^C0CDIC(170,"C",X,DA(1),DA)="" "IX",170,170,"C",2) K ^C0CDIC(170,"C",X,DA(1),DA) "IX",170,170,"C",2.5) K ^C0CDIC(170,"C") "IX",170,170,"C",11.1,0) ^.114IA^1^1 "IX",170,170,"C",11.1,1,0) 1^F^170.08^.01^^1^F "IX",170,170,"D",0) 170^D^Regular whole file cross index by section^R^^F^IR^I^170^^^^^LS "IX",170,170,"D",1) S ^C0CDIC(170,"D",X,DA)="" "IX",170,170,"D",2) K ^C0CDIC(170,"D",X,DA) "IX",170,170,"D",2.5) K ^C0CDIC(170,"D") "IX",170,170,"D",11.1,0) ^.114IA^1^1 "IX",170,170,"D",11.1,1,0) 1^F^170^10^^1^F "IX",170,170,"D",11.1,1,3) "IX",170,170,"SECTION",0) 170^SECTION^Regular cross reference on the section field^R^^F^IR^I^170^^^^^LS "IX",170,170,"SECTION",1) S ^C0CDIC(170,"SECTION",X,DA)="" "IX",170,170,"SECTION",2) K ^C0CDIC(170,"SECTION",X,DA) "IX",170,170,"SECTION",2.5) K ^C0CDIC(170,"SECTION") "IX",170,170,"SECTION",11.1,0) ^.114IA^1^1 "IX",170,170,"SECTION",11.1,1,0) 1^F^170^12^^1^ "MBREQ") 0 "QUES","XPF1",0) Y "QUES","XPF1","??") ^D REP^XPDH "QUES","XPF1","A") Shall I write over your |FLAG| File "QUES","XPF1","B") YES "QUES","XPF1","M") D XPF1^XPDIQ "QUES","XPF2",0) Y "QUES","XPF2","??") ^D DTA^XPDH "QUES","XPF2","A") Want my data |FLAG| yours "QUES","XPF2","B") YES "QUES","XPF2","M") D XPF2^XPDIQ "QUES","XPI1",0) YO "QUES","XPI1","??") ^D INHIBIT^XPDH "QUES","XPI1","A") Want KIDS to INHIBIT LOGONs during the install "QUES","XPI1","B") YES "QUES","XPI1","M") D XPI1^XPDIQ "QUES","XPM1",0) PO^VA(200,:EM "QUES","XPM1","??") ^D MG^XPDH "QUES","XPM1","A") Enter the Coordinator for Mail Group '|FLAG|' "QUES","XPM1","B") "QUES","XPM1","M") D XPM1^XPDIQ "QUES","XPO1",0) Y "QUES","XPO1","??") ^D MENU^XPDH "QUES","XPO1","A") Want KIDS to Rebuild Menu Trees Upon Completion of Install "QUES","XPO1","B") YES "QUES","XPO1","M") D XPO1^XPDIQ "QUES","XPZ1",0) Y "QUES","XPZ1","??") ^D OPT^XPDH "QUES","XPZ1","A") Want to DISABLE Scheduled Options, Menu Options, and Protocols "QUES","XPZ1","B") YES "QUES","XPZ1","M") D XPZ1^XPDIQ "QUES","XPZ2",0) Y "QUES","XPZ2","??") ^D RTN^XPDH "QUES","XPZ2","A") Want to MOVE routines to other CPUs "QUES","XPZ2","B") NO "QUES","XPZ2","M") D XPZ2^XPDIQ "SEC","^DIC",170,170,0,"AUDIT") @ "SEC","^DIC",170,170,0,"DD") @ "SEC","^DIC",170,170,0,"DEL") @ "SEC","^DIC",170,170,0,"LAYGO") @ "SEC","^DIC",170,170,0,"RD") @ "SEC","^DIC",170,170,0,"WR") @ "SEC","^DIC",170.101,170.101,0,"AUDIT") @ "SEC","^DIC",170.101,170.101,0,"DD") @ "SEC","^DIC",170.101,170.101,0,"DEL") @ "SEC","^DIC",170.101,170.101,0,"LAYGO") @ "SEC","^DIC",170.101,170.101,0,"RD") @ "SEC","^DIC",170.101,170.101,0,"WR") @ "SEC","^DIC",171.101,171.101,0,"AUDIT") @ "SEC","^DIC",171.101,171.101,0,"DD") @ "SEC","^DIC",171.101,171.101,0,"DEL") @ "SEC","^DIC",171.101,171.101,0,"LAYGO") @ "SEC","^DIC",171.101,171.101,0,"RD") @ "SEC","^DIC",171.101,171.101,0,"WR") @ "SEC","^DIC",171.401,171.401,0,"AUDIT") @ "SEC","^DIC",171.401,171.401,0,"DD") @ "SEC","^DIC",171.401,171.401,0,"DEL") @ "SEC","^DIC",171.401,171.401,0,"LAYGO") @ "SEC","^DIC",171.401,171.401,0,"RD") @ "SEC","^DIC",171.401,171.401,0,"WR") @ "VER") 8.0^22.0 "^DD",170,170,0) FIELD^^12^12 "^DD",170,170,0,"DDA") N "^DD",170,170,0,"DT") 3090214 "^DD",170,170,0,"IX","B",170,.01) "^DD",170,170,0,"NM","CCR DICTIONARY") "^DD",170,170,0,"PT",170.1012,.01) "^DD",170,170,0,"PT",171.1311,.01) "^DD",170,170,0,"PT",171.2012,.01) "^DD",170,170,0,"PT",171.201221,.01) "^DD",170,170,.01,0) AVARIABLE^RF^^0;1^K:$L(X)>30!($L(X)<2)!'(X'?1P.E) X "^DD",170,170,.01,.1) CCR/CCD/RIM VARIABLE NAME "^DD",170,170,.01,1,0) ^.1 "^DD",170,170,.01,1,1,0) 170^B "^DD",170,170,.01,1,1,1) S ^C0CDIC(170,"B",$E(X,1,30),DA)="" "^DD",170,170,.01,1,1,2) K ^C0CDIC(170,"B",$E(X,1,30),DA) "^DD",170,170,.01,3) Answer must be 2-30 characters in length "^DD",170,170,.01,"DT") 3090214 "^DD",170,170,1,0) ID^NJ6,3^^0;2^K:+X'=X!(X>99)!(X<0)!(X?.E1"."4.N) X "^DD",170,170,1,.1) ELEMENT ID IN THE CCD C32 SPECIFICATION "^DD",170,170,1,3) Type a number between 0 and 99, 3 Decimal Digits "^DD",170,170,1,"DT") 3081120 "^DD",170,170,2,0) XPATH^F^^1;1^K:$L(X)>250!($L(X)<2) X "^DD",170,170,2,.1) XPATH INDEX INTO THE CCR "^DD",170,170,2,3) Answer must be 2-250 characters in length "^DD",170,170,2,"DT") 3081120 "^DD",170,170,3,0) DESCRIPTION^170.01^^5;0 "^DD",170,170,4,0) SOURCE^170.04^^3;0 "^DD",170,170,6,0) TYPE^S^DT:DATE/TIME UNIVERAL FORMAT;CD:CODE;CS:CODE SYSTEM;CV:CODE SYSTEM VERSION;ID:CCR/CCD/XML OBJECT ID;V:VALUE;^4;2^Q "^DD",170,170,6,.1) TYPE OF VARIABLE "^DD",170,170,6,"DT") 3081120 "^DD",170,170,7,0) DATA ELEMENT^F^^4;3^K:$L(X)>60!($L(X)<2) X "^DD",170,170,7,.1) CCR/CCD Data Element Name "^DD",170,170,7,3) Answer must be 2-60 characters in length "^DD",170,170,7,"DT") 3081120 "^DD",170,170,8,0) CODING^170.08S^^6;0 "^DD",170,170,9,0) STATUS^S^X:NOT IMPLEMENTED YET;I:INCOMPLETE ENTRIES;C:COMPLETE BUT NOT REVIEWD;R:REVIEWED BUT NOT VERIFIED;V:VERIFIED - DONE;N:NEEDS WORK;^7;1^Q "^DD",170,170,9,.1) STATUS OF THE DICTIONARY ENTRY FOR THIS VARIABLE "^DD",170,170,9,3) STATUS OF THIS DICTIONARY ENTRY "^DD",170,170,9,"DT") 3081121 "^DD",170,170,10,0) SECTION^S^HEADER:HEADER;PROBLEMS:PROBLEMS;VITALS:VITALS;ALERTS:ALERTS;MEDS:MEDICATIONS;LABS:RESULTS;ACTORS:ACTORS;SOC:SOCIAL HISTORY;FAM:FAMILY HISTORY;IMM:IMMUNIZATIONS;ENC:ENCOUNTERS;TEST:RESULTS TEST;DIR:MEDS DIRECTIONS;^7;2^Q "^DD",170,170,10,.1) SECTION OF THE CCR/CCD IN WHICH THIS VARIABLE IS USED "^DD",170,170,10,"DT") 3081206 "^DD",170,170,11,0) RIM COHERENCE^F^^7;3^K:$L(X)>30!($L(X)<2) X "^DD",170,170,11,.1) RIM Coherence attribute for this variable "^DD",170,170,11,3) Answer must be 2-30 characters in length "^DD",170,170,11,"DT") 3081216 "^DD",170,170,12,0) ELEMENT TYPE^P170.101^C0CDIC(170.101,^7;4^Q "^DD",170,170,12,.1) NODE TYPE OF THE VARIABLE "^DD",170,170,12,"DT") 3090208 "^DD",170,170.01,0) DESCRIPTION SUB-FIELD^^.01^1 "^DD",170,170.01,0,"DT") 3081120 "^DD",170,170.01,0,"NM","DESCRIPTION") "^DD",170,170.01,0,"UP") 170 "^DD",170,170.01,.01,0) DESCRIPTION^W^^0;1 "^DD",170,170.01,.01,3) Describe this Variable "^DD",170,170.01,.01,"DT") 3081120 "^DD",170,170.04,0) SOURCE SUB-FIELD^^.01^1 "^DD",170,170.04,0,"DT") 3081120 "^DD",170,170.04,0,"NM","SOURCE") "^DD",170,170.04,0,"UP") 170 "^DD",170,170.04,.01,0) SOURCE^W^^0;1 "^DD",170,170.04,.01,3) Source in VistA for this Variable "^DD",170,170.04,.01,"DT") 3081120 "^DD",170,170.08,0) CODING SUB-FIELD^^1^2 "^DD",170,170.08,0,"DT") 3081121 "^DD",170,170.08,0,"IX","B",170.08,.01) "^DD",170,170.08,0,"NM","CODING") "^DD",170,170.08,0,"UP") 170 "^DD",170,170.08,.01,0) CODING^MS^SNO:SNOMED CT;LN:LOINC;ICD:ICD9;VA:VA INTERNAL CODE;VUI:VUID VA CODE;RXN:RXNORM;NCD:NDC NATIONAL DRUG CODE;^0;1^Q "^DD",170,170.08,.01,.1) CODING SYSTEMS USED FOR THIS VARIABLE "^DD",170,170.08,.01,1,0) ^.1 "^DD",170,170.08,.01,1,1,0) 170.08^B "^DD",170,170.08,.01,1,1,1) S ^C0CDIC(170,DA(1),6,"B",$E(X,1,30),DA)="" "^DD",170,170.08,.01,1,1,2) K ^C0CDIC(170,DA(1),6,"B",$E(X,1,30),DA) "^DD",170,170.08,.01,"DT") 3081121 "^DD",170,170.08,1,0) MAPPING METHOD^170.81^^1;0 "^DD",170,170.81,0) MAPPING METHOD SUB-FIELD^^.01^1 "^DD",170,170.81,0,"DT") 3081121 "^DD",170,170.81,0,"NM","MAPPING METHOD") "^DD",170,170.81,0,"UP") 170.08 "^DD",170,170.81,.01,0) MAPPING METHOD^W^^0;1 "^DD",170,170.81,.01,3) HOW IS THIS CODE PRODUCED FOR THIS VARIABLE? "^DD",170,170.81,.01,"DT") 3081121 "^DD",170.101,170.101,0) FIELD^^3^4 "^DD",170.101,170.101,0,"DDA") N "^DD",170.101,170.101,0,"DT") 3090208 "^DD",170.101,170.101,0,"IX","B",170.101,.01) "^DD",170.101,170.101,0,"NM","CCR NODE TYPE") "^DD",170.101,170.101,0,"PT",170,12) "^DD",170.101,170.101,0,"PT",170.101,1) "^DD",170.101,170.101,0,"PT",170.1013,.01) "^DD",170.101,170.101,0,"PT",171.121,.01) "^DD",170.101,170.101,0,"PT",171.201,.03) "^DD",170.101,170.101,.01,0) NODE TYPE^RF^^0;1^K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X "^DD",170.101,170.101,.01,.1) CCR NODE TYPE "^DD",170.101,170.101,.01,1,0) ^.1 "^DD",170.101,170.101,.01,1,1,0) 170.101^B "^DD",170.101,170.101,.01,1,1,1) S ^C0CDIC(170.101,"B",$E(X,1,30),DA)="" "^DD",170.101,170.101,.01,1,1,2) K ^C0CDIC(170.101,"B",$E(X,1,30),DA) "^DD",170.101,170.101,.01,3) NODE TYPE "^DD",170.101,170.101,.01,"DT") 3090206 "^DD",170.101,170.101,1,0) PARENT^P170.101'^C0CDIC(170.101,^0;2^Q "^DD",170.101,170.101,1,.1) NODE TYPE PARENT "^DD",170.101,170.101,1,3) NODE TYPE PARENT "^DD",170.101,170.101,1,"DT") 3090206 "^DD",170.101,170.101,2,0) CONTENTS^170.1012P^^1;0 "^DD",170.101,170.101,3,0) CHILDREN^170.1013P^^2;0 "^DD",170.101,170.1012,0) CONTENTS SUB-FIELD^^.01^1 "^DD",170.101,170.1012,0,"DT") 3090208 "^DD",170.101,170.1012,0,"IX","B",170.1012,.01) "^DD",170.101,170.1012,0,"NM","CONTENTS") "^DD",170.101,170.1012,0,"UP") 170.101 "^DD",170.101,170.1012,.01,0) CONTENTS^P170'^C0CDIC(170,^0;1^Q "^DD",170.101,170.1012,.01,.1) CCR VARIABLES THAT THIS NODE CONTAINS "^DD",170.101,170.1012,.01,1,0) ^.1 "^DD",170.101,170.1012,.01,1,1,0) 170.1012^B "^DD",170.101,170.1012,.01,1,1,1) S ^C0CDIC(170.101,DA(1),1,"B",$E(X,1,30),DA)="" "^DD",170.101,170.1012,.01,1,1,2) K ^C0CDIC(170.101,DA(1),1,"B",$E(X,1,30),DA) "^DD",170.101,170.1012,.01,3) VARIABLES THAT THIS TYPE CONTAINS "^DD",170.101,170.1012,.01,"DT") 3090208 "^DD",170.101,170.1013,0) CHILDREN SUB-FIELD^^.01^1 "^DD",170.101,170.1013,0,"DT") 3090206 "^DD",170.101,170.1013,0,"IX","B",170.1013,.01) "^DD",170.101,170.1013,0,"NM","CHILDREN") "^DD",170.101,170.1013,0,"UP") 170.101 "^DD",170.101,170.1013,.01,0) CHILDREN^P170.101'^C0CDIC(170.101,^0;1^Q "^DD",170.101,170.1013,.01,.1) CHILDREN NODE TYPES "^DD",170.101,170.1013,.01,1,0) ^.1 "^DD",170.101,170.1013,.01,1,1,0) 170.1013^B "^DD",170.101,170.1013,.01,1,1,1) S ^C0CDIC(170.101,DA(1),2,"B",$E(X,1,30),DA)="" "^DD",170.101,170.1013,.01,1,1,2) K ^C0CDIC(170.101,DA(1),2,"B",$E(X,1,30),DA) "^DD",170.101,170.1013,.01,3) CHILDREN NODE TYPES "^DD",170.101,170.1013,.01,"DT") 3090206 "^DD",171.101,171.101,0) FIELD^^.02^2 "^DD",171.101,171.101,0,"DDA") N "^DD",171.101,171.101,0,"DT") 3090214 "^DD",171.101,171.101,0,"IX","B",171.101,.01) "^DD",171.101,171.101,0,"NM","CCR E2") "^DD",171.101,171.101,.01,0) PATIENT^RP2'^DPT(^0;1^Q "^DD",171.101,171.101,.01,.1) POINTER TO PATIENT FILE "^DD",171.101,171.101,.01,1,0) ^.1 "^DD",171.101,171.101,.01,1,1,0) 171.101^B "^DD",171.101,171.101,.01,1,1,1) S ^C0CE("B",$E(X,1,30),DA)="" "^DD",171.101,171.101,.01,1,1,2) K ^C0CE("B",$E(X,1,30),DA) "^DD",171.101,171.101,.01,3) PATIENT "^DD",171.101,171.101,.01,"DT") 3090214 "^DD",171.101,171.101,.02,0) CCR SOURCE^171.111P^^1;0 "^DD",171.101,171.111,0) CCR SOURCE SUB-FIELD^^.03^2 "^DD",171.101,171.111,0,"DT") 3090214 "^DD",171.101,171.111,0,"IX","B",171.111,.01) "^DD",171.101,171.111,0,"NM","CCR SOURCE") "^DD",171.101,171.111,0,"UP") 171.101 "^DD",171.101,171.111,.01,0) CCR SOURCE^P171.401^C0C(171.401,^0;1^Q "^DD",171.101,171.111,.01,.1) POINTER TO CCR SOURCE FILE "^DD",171.101,171.111,.01,1,0) ^.1 "^DD",171.101,171.111,.01,1,1,0) 171.111^B "^DD",171.101,171.111,.01,1,1,1) S ^C0CE(DA(1),1,"B",$E(X,1,30),DA)="" "^DD",171.101,171.111,.01,1,1,2) K ^C0CE(DA(1),1,"B",$E(X,1,30),DA) "^DD",171.101,171.111,.01,3) CCR SOURCE "^DD",171.101,171.111,.01,"DT") 3090214 "^DD",171.101,171.111,.03,0) ELEMENT TYPE^171.121P^^1;0 "^DD",171.101,171.121,0) ELEMENT TYPE SUB-FIELD^^.04^2 "^DD",171.101,171.121,0,"DT") 3090214 "^DD",171.101,171.121,0,"IX","B",171.121,.01) "^DD",171.101,171.121,0,"NM","ELEMENT TYPE") "^DD",171.101,171.121,0,"UP") 171.111 "^DD",171.101,171.121,.01,0) ELEMENT TYPE^MP170.101'^C0CDIC(170.101,^0;1^Q "^DD",171.101,171.121,.01,.1) POINTER TO CCR NODE TYPE FILE "^DD",171.101,171.121,.01,1,0) ^.1 "^DD",171.101,171.121,.01,1,1,0) 171.121^B "^DD",171.101,171.121,.01,1,1,1) S ^C0CE(DA(2),1,DA(1),1,"B",$E(X,1,30),DA)="" "^DD",171.101,171.121,.01,1,1,2) K ^C0CE(DA(2),1,DA(1),1,"B",$E(X,1,30),DA) "^DD",171.101,171.121,.01,3) CCR ELEMENT TYPE "^DD",171.101,171.121,.01,"DT") 3090214 "^DD",171.101,171.121,.04,0) OCCURANCE^171.131^^1;0 "^DD",171.101,171.131,0) OCCURANCE SUB-FIELD^^1^2 "^DD",171.101,171.131,0,"DT") 3090214 "^DD",171.101,171.131,0,"IX","B",171.131,.01) "^DD",171.101,171.131,0,"NM","OCCURANCE") "^DD",171.101,171.131,0,"UP") 171.121 "^DD",171.101,171.131,.01,0) OCCURANCE^MF^^0;1^K:$L(X)>30!($L(X)<1) X "^DD",171.101,171.131,.01,.1) OCCURANCE OF THIS ELEMENT TYPE " NN" WITH LEADING SPACE "^DD",171.101,171.131,.01,1,0) ^.1 "^DD",171.101,171.131,.01,1,1,0) 171.131^B "^DD",171.101,171.131,.01,1,1,1) S ^C0CE(DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)="" "^DD",171.101,171.131,.01,1,1,2) K ^C0CE(DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA) "^DD",171.101,171.131,.01,3) OCCURANCE OF THE ELEMENT TYPE " NN" WITH LEADING SPACE "^DD",171.101,171.131,.01,"DT") 3090214 "^DD",171.101,171.131,1,0) VARIABLE^171.1311P^^1;0 "^DD",171.101,171.1311,0) VARIABLE SUB-FIELD^^1^2 "^DD",171.101,171.1311,0,"DT") 3090214 "^DD",171.101,171.1311,0,"IX","B",171.1311,.01) "^DD",171.101,171.1311,0,"NM","VARIABLE") "^DD",171.101,171.1311,0,"UP") 171.131 "^DD",171.101,171.1311,.01,0) VARIABLE^MP170^C0CDIC(170,^0;1^Q "^DD",171.101,171.1311,.01,.1) POINTER TO CCR DICTIONARY "^DD",171.101,171.1311,.01,1,0) ^.1 "^DD",171.101,171.1311,.01,1,1,0) 171.1311^B "^DD",171.101,171.1311,.01,1,1,1) S ^C0CE(DA(4),1,DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA)="" "^DD",171.101,171.1311,.01,1,1,2) K ^C0CE(DA(4),1,DA(3),1,DA(2),1,DA(1),1,"B",$E(X,1,30),DA) "^DD",171.101,171.1311,.01,3) CCR VARIABLE "^DD",171.101,171.1311,.01,"DT") 3090214 "^DD",171.101,171.1311,1,0) VALUE^F^^0;2^K:$L(X)>200!($L(X)<1) X "^DD",171.101,171.1311,1,.1) VALUE OF THE VARIABLE "^DD",171.101,171.1311,1,3) VALUE OF THE VARIABLE "^DD",171.101,171.1311,1,"DT") 3090214 "^DD",171.401,171.401,0) FIELD^^2^3 "^DD",171.401,171.401,0,"DDA") N "^DD",171.401,171.401,0,"DT") 3090206 "^DD",171.401,171.401,0,"IX","B",171.401,.01) "^DD",171.401,171.401,0,"NM","CCR SOURCE") "^DD",171.401,171.401,0,"PT",171.111,.01) "^DD",171.401,171.401,0,"PT",171.201,.02) "^DD",171.401,171.401,.01,0) NAME^RF^^0;1^K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X "^DD",171.401,171.401,.01,1,0) ^.1 "^DD",171.401,171.401,.01,1,1,0) 171.401^B "^DD",171.401,171.401,.01,1,1,1) S ^C0C(171.401,"B",$E(X,1,30),DA)="" "^DD",171.401,171.401,.01,1,1,2) K ^C0C(171.401,"B",$E(X,1,30),DA) "^DD",171.401,171.401,.01,3) NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION "^DD",171.401,171.401,1,0) LOCAL SOURCE^171.4011P^^1;0 "^DD",171.401,171.401,2,0) NON LOCAL SOURCE^171.4012P^^2;0 "^DD",171.401,171.4011,0) LOCAL SOURCE SUB-FIELD^^.01^1 "^DD",171.401,171.4011,0,"DT") 3090206 "^DD",171.401,171.4011,0,"IX","B",171.4011,.01) "^DD",171.401,171.4011,0,"NM","LOCAL SOURCE") "^DD",171.401,171.4011,0,"UP") 171.401 "^DD",171.401,171.4011,.01,0) LOCAL SOURCE^P4'^DIC(4,^0;1^Q "^DD",171.401,171.4011,.01,.1) LOCALLY DEFINED INSTITUTION "^DD",171.401,171.4011,.01,1,0) ^.1 "^DD",171.401,171.4011,.01,1,1,0) 171.4011^B "^DD",171.401,171.4011,.01,1,1,1) S ^C0C(171.401,DA(1),1,"B",$E(X,1,30),DA)="" "^DD",171.401,171.4011,.01,1,1,2) K ^C0C(171.401,DA(1),1,"B",$E(X,1,30),DA) "^DD",171.401,171.4011,.01,3) DEFINED INSTITUTION "^DD",171.401,171.4011,.01,"DT") 3090206 "^DD",171.401,171.4012,0) NON LOCAL SOURCE SUB-FIELD^^.01^1 "^DD",171.401,171.4012,0,"DT") 3090206 "^DD",171.401,171.4012,0,"IX","B",171.4012,.01) "^DD",171.401,171.4012,0,"NM","NON LOCAL SOURCE") "^DD",171.401,171.4012,0,"UP") 171.401 "^DD",171.401,171.4012,.01,0) NON LOCAL SOURCE^P171.201'^C0C(171.201,^0;1^Q "^DD",171.401,171.4012,.01,.1) CCR NON LOCAL SOURCE "^DD",171.401,171.4012,.01,1,0) ^.1 "^DD",171.401,171.4012,.01,1,1,0) 171.4012^B "^DD",171.401,171.4012,.01,1,1,1) S ^C0C(171.401,DA(1),2,"B",$E(X,1,30),DA)="" "^DD",171.401,171.4012,.01,1,1,2) K ^C0C(171.401,DA(1),2,"B",$E(X,1,30),DA) "^DD",171.401,171.4012,.01,3) NON LOCAL SOURCE OF THE CCR "^DD",171.401,171.4012,.01,"DT") 3090206 "^DIC",170,170,0) CCR DICTIONARY^170 "^DIC",170,170,0,"GL") ^C0CDIC(170, "^DIC",170,"B","CCR DICTIONARY",170) "^DIC",170.101,170.101,0) CCR NODE TYPE^170.101 "^DIC",170.101,170.101,0,"GL") ^C0CDIC(170.101, "^DIC",170.101,"B","CCR NODE TYPE",170.101) "^DIC",171.101,171.101,0) CCR E2^171.101 "^DIC",171.101,171.101,0,"GL") ^C0CE( "^DIC",171.101,"B","CCR E2",171.101) "^DIC",171.401,171.401,0) CCR SOURCE^171.401 "^DIC",171.401,171.401,0,"GL") ^C0C(171.401, "^DIC",171.401,"B","CCR SOURCE",171.401) **END** **END**