Changeset 589 for ccr


Ignore:
Timestamp:
Oct 30, 2009, 8:56:46 AM (15 years ago)
Author:
Christopher Edwards
Message:

Added initial support for RPMS inactive problems

File:
1 edited

Legend:

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

    r586 r589  
    11C0CPROBS ; CCDCCR/GPL/CJE - CCR/CCD PROCESSING FOR PROBLEMS ; 6/6/08
    2  ;;1.0;C0C;;May 19, 2009;Build 32
     2 ;;1.0;C0C;;May 19, 2009;
    33 ;Copyright 2008,2009 George Lilly, University of Minnesota.
    44 ;Licensed under the terms of the GNU General Public License.
     
    5656 . S @VMAP@("PROBLEMOBJECTID")="PROBLEM"_J ; UNIQUE OBJID FOR PROBLEM
    5757 . S @VMAP@("PROBLEMIEN")=$P(PTMP,U,10)
    58  . S @VMAP@("PROBLEMSTATUS")=$S($P(PTMP,U,8)="A":"Active",1:"")
     58 . S @VMAP@("PROBLEMSTATUS")=$S($P(PTMP,U,8)="A":"Active",$P(PTMP,U,8)="I":"Inactive",1:"")
    5959 . S @VMAP@("PROBLEMDESCRIPTION")=$P(PTMP,U,6)
    6060 . S @VMAP@("PROBLEMCODINGVERSION")=""
Note: See TracChangeset for help on using the changeset viewer.