Changeset 396 for ccr/trunk/p/C0CPROBS.m

Timestamp:

Mar 15, 2009, 8:14:48 PM (15 years ago)

Author:

Sam Habiel

Message:

Changed CCRUTIL to C0CUTIL

File:

• ccr/trunk/p/C0CPROBS.m (modified) (2 diffs)

ccr/trunk/p/C0CPROBS.m

@@ -54 +54 @@
  . S @VMAP@("PROBLEMCODINGVERSION")=""
  . S @VMAP@("PROBLEMCODEVALUE")=$P(PTMP,U,4)
- . S @VMAP@("PROBLEMDATEOFONSET")=$$FMDTOUTC^CCRUTIL($P(PTMP,U,5),"DT")
- . S @VMAP@("PROBLEMDATEMOD")=$$FMDTOUTC^CCRUTIL($P(PTMP,U,6),"DT")
+ . S @VMAP@("PROBLEMDATEOFONSET")=$$FMDTOUTC^C0CUTIL($P(PTMP,U,5),"DT")
+ . S @VMAP@("PROBLEMDATEMOD")=$$FMDTOUTC^C0CUTIL($P(PTMP,U,6),"DT")
  . S @VMAP@("PROBLEMSC")=$P(PTMP,U,7)
  . S @VMAP@("PROBLEMSE")=$P(PTMP,U,8)
@@ -66 +66 @@
  . S @VMAP@("PROBLEMSERVICE")=$P(PTMP,U,13)
  . S @VMAP@("PROBLEMHASCMT")=$P(PTMP,U,14)
- . S @VMAP@("PROBLEMDTREC")=$$FMDTOUTC^CCRUTIL($P(PTMP,U,15),"DT")
- . S @VMAP@("PROBLEMINACT")=$$FMDTOUTC^CCRUTIL($P(PTMP,U,16),"DT")
+ . S @VMAP@("PROBLEMDTREC")=$$FMDTOUTC^C0CUTIL($P(PTMP,U,15),"DT")
+ . S @VMAP@("PROBLEMINACT")=$$FMDTOUTC^C0CUTIL($P(PTMP,U,16),"DT")
  . S ARYTMP=$NA(@TARYTMP@(J))
  . ; W "ARYTMP= ",ARYTMP,!