Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 81.062

Package: CPT HCPCS Codes

CPT(#81)-->81.062

Sub-Field: 81.062


Information

Parent File Name Number Package
CPT(#81) DESCRIPTION (VERSIONED) 81.062 CPT HCPCS Codes

Details

Field # Name Loc Type Details
.01 VERSION DATE 0;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:2790101>X X
  • LAST EDITED:  MAR 19, 2004
  • HELP-PROMPT:  TYPE A DATE NOT EARLIER THAN JAN 01, 1979
  • DESCRIPTION:  
    This is the date the description was first used.
  • CROSS-REFERENCE:  81.062^B
    1)= S ^ICPT(DA(1),62,"B",$E(X,1,30),DA)=""
    2)= K ^ICPT(DA(1),62,"B",$E(X,1,30),DA)
    ^ICPT(IEN1,62,"B",EFF,IEN2) - Where IEN1 is the internal entry number in the CPT-4 Procedure file #81, EFF is the effective date for the description (long text), and IEN2 is the internal entry number in the DESCRIPTION
    (VERSIONED) multiple where the versioned procedure description is stored.
  • CROSS-REFERENCE:  81^ADS^MUMPS
    1)= S:$L($P($G(^ICPT(DA(1),0)),"^",1)) ^ICPT("ADS",($P($G(^ICPT(DA(1),0)),"^",1)_" "),+X,DA(1),DA)=""
    2)= K:$L($P($G(^ICPT(DA(1),0)),"^",1)) ^ICPT("ADS",($P($G(^ICPT(DA(1),0)),"^",1)_" "),+X,DA(1),DA)
    ^ICPT("ADS",(CODE_" "),EFF,IEN1,IEN2) - Where CODE is the CPT-4 Procedure Code, EFF is the effective date for the description (long text), IEN1 is the internal entry number in the CPT-4 Procedure file (#81) and IEN2 is
    the internal entry number in the DESCRIPTION (VERSIONED) multiple where the versioned long text is stored.
1 DESCRIPTION (VERSIONED) 1;0 Multiple #81.621 81.621

  • LAST EDITED:  MAR 19, 2004
  • DESCRIPTION:  
    This is the long description (multiple line).
Info |  Details