Changeset 70 for ccr/trunk/p/GPLCCR.m


Ignore:
Timestamp:
Jul 21, 2008, 3:54:56 PM (16 years ago)
Author:
Christopher Edwards
Message:

added placeholders in GPLMEDS.m for values
added comment in GPLCCR.m describing order of CCR Body
added processing of MEDS in GPLCCR.m (commented out)

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ccr/trunk/p/GPLCCR.m

    r60 r70  
    100100    ; TAB IS PASSED BY NAME
    101101    W "TAB= ",TAB,!
     102    ; ORDER FOR CCR IS PROBLEMS,FAMILYHISTORY,SOCIALHISTORY,MEDICATIONS,VITALSIGNS,RESULTS,HEALTHCAREPROVIDERS
    102103    D PUSH^GPLXPATH(TAB,"EXTRACT;GPLPROBS;//ContinuityOfCareRecord/Body/Problems;^TMP(""GPLCCR"",$J,DFN,""PROBLEMS"")")
     104    ;D PUSH^GPLXPATH(TAB,"EXTRACT;GPLMEDS;//ContinuityOfCareRecord/Body/Medications;^TMP(""GPLCCR"",$J,DFN,""MEDICATIONS"")")
    103105    D PUSH^GPLXPATH(TAB,"EXTRACT;GPLVITALS;//ContinuityOfCareRecord/Body/VitalSigns;^TMP(""GPLCCR"",$J,DFN,""VITALS"")")
    104106    Q
Note: See TracChangeset for help on using the changeset viewer.