Changeset 533


Ignore:
Timestamp:
Jul 17, 2009, 9:06:16 PM (15 years ago)
Author:
George Lilly
Message:

update includes RPMS lab enhancements and CCR RPC

Location:
ccr/trunk/p
Files:
1 added
2 edited

Legend:

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

    r530 r533  
    1 C0CLA7DD        ;WV/JMC - CCD/CCR Post Install DD X-Ref Setup Routine; ;14 Jun 2009
     1C0CLA7DD        ;WV/JMC - CCD/CCR Post Install DD X-Ref Setup Routine; ;6 Jul 2009
    22        ;;1.0;C0C;;May 19, 2009;
    33        ;
     
    7575        S C0CXR("VAL",4,"SUBSCRIPT")=4
    7676        S C0CXR("VAL",4,"COLLATION")="F"
    77         D CREIXN^DDMOD(.C0CXR,COCFLAG,.C0CRES,"C0COUT")
     77        D CREIXN^DDMOD(.C0CXR,C0CFLAG,.C0CRES,"C0COUT")
    7878        ;
    7979        Q
  • ccr/trunk/p/C0CLA7Q.m

    r529 r533  
    1 C0CLA7Q ;WV/JMC - CCD/CCR Lab HL7 Query Utility ;May 31, 2009
     1C0CLA7Q ;WV/JMC - CCD/CCR Lab HL7 Query Utility ;Jul 6, 2009
    22        ;;1.0;C0C;;May 19, 2009;
    33        ;
     
    3737        I $T(SCLIST^LA7QRY2)'="" D
    3838        . N TMP
    39         . S LA7SCSRC=$G(C0CSC)
    40         . S TMP=$$SCLIST^LA7QRY2(LA7SCSRC)
     39        . S LA7SCRC=$G(C0CSC)
     40        . S TMP=$$SCLIST^LA7QRY2(LA7SCRC)
    4141        . S LA7SC=TMP
    4242        ;
Note: See TracChangeset for help on using the changeset viewer.