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
|