Changeset 577 for ccr/trunk


Ignore:
Timestamp:
Oct 14, 2009, 11:58:34 AM (15 years ago)
Author:
Christopher Edwards
Message:

Fix for bug #6 & 4

Rearranged CCR template so it should pass schema validation

File:
1 edited

Legend:

Unmodified
Added
Removed
  • ccr/trunk/p/C0CCCR0.m

    r508 r577  
    1 C0CCCR0 ; CCDCCR/GPL - CCR TEMPLATE AND ACCESS ROUTINES; 5/31/08
    2  ;;1.0;C0C;;May 19, 2009;
     1C0CCCR0 ; CCDCCR/GPL - CCR TEMPLATE AND ACCESS ROUTINES; 5/31/08
     2 ;;1.0;C0C;;May 19, 2009;Build 32
    33 ;Copyright 2008,2009 George Lilly, University of Minnesota.
    44 ;Licensed under the terms of the GNU General Public License.
     
    2323 Q
    2424 ;
    25 ZT(ZARY,BAT,LINE)             ; private routine to add a line to the ZARY array
     25ZT(ZARY,BAT,LINE)       ; private routine to add a line to the ZARY array
    2626 ; ZARY IS PASSED BY NAME
    2727 ; BAT is a string identifying the section
     
    3838 Q
    3939 ;
    40 ZLOAD(ZARY,ROUTINE)          ; load tests into ZARY which is passed by reference
     40ZLOAD(ZARY,ROUTINE)      ; load tests into ZARY which is passed by reference
    4141 ; ZARY IS PASSED BY NAME
    4242 ; ZARY = name of the root, closed array format (e.g., "^TMP($J)")
     
    5858 Q
    5959 ;
    60 LOAD(ARY)             ; LOAD A CCR TEMPLATE INTO ARY PASSED BY NAME
     60LOAD(ARY)       ; LOAD A CCR TEMPLATE INTO ARY PASSED BY NAME
    6161 D ZLOAD(ARY,"C0CCCR0")
    6262 ; ZWR @ARY
     
    103103 ;;<Problem>
    104104 ;;<CCRDataObjectID>@@PROBLEMOBJECTID@@</CCRDataObjectID>
     105 ;;<DateTime>
     106 ;;<ExactDateTime>@@PROBLEMDATEMOD@@</ExactDateTime>
     107 ;;</DateTime>
    105108 ;;<Type>
    106109 ;;<Text>Problem</Text>
    107110 ;;</Type>
     111 ;;<Description>
     112 ;;<Text>@@PROBLEMDESCRIPTION@@</Text>
     113 ;;<Code>
     114 ;;<Value>@@PROBLEMCODEVALUE@@</Value>
     115 ;;<CodingSystem>ICD9CM</CodingSystem>
     116 ;;<Version>@@PROBLEMCODINGVERSION@@</Version>
     117 ;;</Code>
     118 ;;</Description>
    108119 ;;<Status>
    109120 ;;<Text>@@PROBLEMSTATUS@@</Text>
    110121 ;;</Status>
    111  ;;<Description>
    112  ;;<Text>@@PROBLEMDESCRIPTION@@</Text>
    113  ;;<Code>
    114  ;;<Value>@@PROBLEMCODEVALUE@@</Value>
    115  ;;<CodingSystem>ICD9CM</CodingSystem>
    116  ;;<Version>@@PROBLEMCODINGVERSION@@</Version>
    117  ;;</Code>
    118  ;;</Description>
    119  ;;<DateTime>
    120  ;;<ExactDateTime>@@PROBLEMDATEMOD@@</ExactDateTime>
    121  ;;</DateTime>
    122122 ;;<Source>
    123123 ;;<Actor>
     
    248248 ;;<Alert>
    249249 ;;<CCRDataObjectID>@@ALERTOBJECTID@@</CCRDataObjectID>
     250 ;;<DateTime>
     251 ;;<ExactDateTime>@@ALERTDATETIME@@</ExactDateTime>
     252 ;;</DateTime>
    250253 ;;<Type>
    251254 ;;<Text>@@ALERTTYPE@@</Text>
    252255 ;;</Type>
    253  ;;<Description>
    254  ;;<Text>@@ALERTDESCRIPTIONTEXT@@</Text>
    255  ;;<Code>
    256  ;;<Value>@@ALERTCODEVALUE@@</Value>
    257  ;;<CodingSystem>@@ALERTCODESYSTEM@@</CodingSystem>
    258  ;;</Code>
    259  ;;</Description>
    260256 ;;<Status>
    261257 ;;<Text>@@ALERTSTATUSTEXT@@</Text>
    262258 ;;</Status>
    263  ;;<DateTime>
    264  ;;<ExactDateTime>@@ALERTDATETIME@@</ExactDateTime>
    265  ;;</DateTime>
     259 ;;<Description>
     260 ;;<Text>@@ALERTDESCRIPTIONTEXT@@</Text>
     261 ;;<Code>
     262 ;;<Value>@@ALERTCODEVALUE@@</Value>
     263 ;;<CodingSystem>@@ALERTCODESYSTEM@@</CodingSystem>
     264 ;;</Code>
     265 ;;</Description>
    266266 ;;<Source>
    267267 ;;<Actor>
     
    275275 ;;<Source>
    276276 ;;<Actor>
    277  ;;<ActorID>@@ALERTAGENTPRODUCTSOURCEID@@</ActorID>
    278  ;;</Actor>
    279  ;;</Source>
     277 ;;<ActorID>@@ALERTSOURCEID@@</ActorID>
     278 ;;</Actor>
     279 ;;</Source>
     280 ;;<Product>
    280281 ;;<ProductName>
    281282 ;;<Text>@@ALERTAGENTPRODUCTNAMETEXT@@</Text>
     
    285286 ;;</Code>
    286287 ;;</ProductName>
     288 ;;</Product>
    287289 ;;</Product>
    288290 ;;</Products>
Note: See TracChangeset for help on using the changeset viewer.