ICPTCOD ;ALB/DEK/KER - CPT CODE APIS ;11/29/2007
Source file <ICPTCOD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CPT(CODE,CDT,SRC,DFN) | ; returns basic info on CPT/HCPCS code
|
|
| CPTQ | ||
| CPTD(CODE,OUTARR,DFN,CDT) | ; Returns CPT description
|
|
| CPTDQ | ||
| CODM(CODE,OUTARR,SRC,CDT,DFN) | ; returns list of modifiers for a code
; ; Input: CODE CPT/HCPCS code, Internal or External Format (Required) ; ARY Array Name for list returned ; e.g. "ABC" or "ABC("TEST")" ; Default = ^TMP("ICPTM",$J) ; SRC Source Screen ; If 0 or Null, check Level I/II code/modifiers ; If >0, check Level I/II/III code/modifiers ; CDT Date (default = TODAY) ; DFN Not in use, future need ; ; Output: # Number of modifiers that apply ; ; OUTARR Array in the format: ; ; ARY(Mod) = Versioned Name^Mod IEN ; ; Where ; Mod is the .01 field) ; Versioned Name is 1 field of the 61 multiple ; ; or ; ; -1^Error Description ; ; ** NOTE - User must initialize ^TMP("ICPTM",$J) array if used ** |
|
| CODMQ | ||
| CODEN(CODE) | ; Rreturn the IEN of a CPT/HCPCS code
|
|
| CODEC(CODE) | ; Return the CPT/HCPCS Code
|
|
| VALCPT(CODE,CDT,SRC,DFN) | ;check if CPT code is valid for selection
|
|
| VALCPTQ | ||
| VST(IEN,VDATE,TYPE) | ||
| VSTCP(IEN,VDATE) | ; Versioned Short Text (CPT Procedure)
|
|
| VLTCP(IEN,VDATE,ARY) | ; Versioned Description - Long Text (CPT Procedure)
|
|
| TRIM(X) | ; Trim Spaces
|
