iSharkFly-Open
/
VistA-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fixed date format

This commit is contained in:
george 2010-01-23 01:17:42 +00:00
parent e982868e75
commit 52c80759fc
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
p/C0CPROC.m
View File

@ -89,7 +89,7 @@ PRV(IARY) ; RETURNS THE PRIMARY PROVIDER FROM THE "PRV" ARRAY PASSED BY NAME
Q ZRTN Q ZRTN
; ;
DATE(ISTR) ; EXTRINSIC TO RETURN THE DATE IN CCR FORMAT DATE(ISTR) ; EXTRINSIC TO RETURN THE DATE IN CCR FORMAT
Q $$FMDTOUTC^C0CUTIL(ISTR,"D") Q $$FMDTOUTC^C0CUTIL(ISTR,"DT")
; ;
CPT(ISTR) ; EXTRINSIC THAT SEARCHES FOR CPT CODES AND RETURNS CPT(ISTR) ; EXTRINSIC THAT SEARCHES FOR CPT CODES AND RETURNS
; CPT^CATEGORY^TEXT ; CPT^CATEGORY^TEXT