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

Package: Referred Care Information System

RCIS HCPCS/CPT CATEGORY(#90001.52)-->90001.5221

Sub-Field: 90001.5221


Information

Parent File Name Number Package
RCIS HCPCS/CPT CATEGORY(#90001.52) CODE RANGES 90001.5221 Referred Care Information System

Details

Field # Name Loc Type Details
.01 LOW CODE 0;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<5) X
  • LAST EDITED:  MAY 11, 2016
  • HELP-PROMPT:  Answer must be 5 characters in length.
  • TECHNICAL DESCR:  
    This field contains the low code in the hcpcs/cpt code range.
  • CROSS-REFERENCE:  90001.5221^B
    1)= S ^BMCTSVC(DA(1),21,"B",$E(X,1,30),DA)=""
    2)= K ^BMCTSVC(DA(1),21,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  90001.52^AC^MUMPS
    1)= S %=$P(^BMCTSVC(DA(1),21,DA,0),U,2) S:%'="" ^BMCTSVC("AC",X_" ",%_" ",DA(1))=""
    2)= S %=$P(^BMCTSVC(DA(1),21,DA,0),U,2) K:%'="" ^BMCTSVC("AC",X_" ",%_" ",DA(1))
    This xref creates a non-canonic cpt range xref 'low code,high code'.
.02 HIGH CODE 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<5) X
  • LAST EDITED:  MAY 11, 2016
  • HELP-PROMPT:  Answer must be 5 characters in length.
  • TECHNICAL DESCR:  
    This field contains the high code in the hcpcs/cpt code range.
  • CROSS-REFERENCE:  90001.52^AC2^MUMPS
    1)= S %=$P(^BMCTSVC(DA(1),21,DA,0),U) S:%'="" ^BMCTSVC("AC",%_" ",X_" ",DA(1))=""
    2)= S %=$P(^BMCTSVC(DA(1),21,DA,0),U) K:%'="" ^BMCTSVC("AC",%_" ",X_" ",DA(1))
    This cpt xref creates a non-canonic xref 'low code,high code'.
Info |  Details |  All