Changeset 1325 for ccr/branches/ohum/p/C0CEVC.m

Timestamp:

Dec 31, 2011, 12:08:05 AM (12 years ago)

Author:

George Lilly

Message:

latest ohum update

File:

• ccr/branches/ohum/p/C0CEVC.m (modified) (1 diff)

ccr/branches/ohum/p/C0CEVC.m

@@ -74 +74 @@
  N ZT,ZDFN
  S ZT=$$URLTOKEN^C0CEWD(sessid)
- ;S ^TMP("GPL")=ZT
- d trace^%zewdAPI("*********************ZT="_ZT)
+ S ^TMP("GPL")=ZT
  S ZDFN=$$PRSEORTK(ZT) ; PARSE THE TOKEN AND LOOK UP THE DFN
  S ^TMP("GPL","DFN")=ZDFN