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: 2.397

Package: Registration

PATIENT(#2)-->2.397

Sub-Field: 2.397


Information

Parent File Name Number Package
PATIENT(#2) CD STATUS PROCEDURES 2.397 Registration

Details

Field # Name Loc Type Details
.01 CD STATUS PROCEDURES 0;1 POINTER TO CATASTROPHIC DISABILITY REASONS FILE (#27.17) CATASTROPHIC DISABILITY REASONS(#27.17)

  • INPUT TRANSFORM:  S DIC("S")="I $$TYPE^DGENA5(Y)=""P"" I ($P(^DGEN(27.17,+Y,0),U,3)[""ICPT"")!($P(^DGEN(27.17,+Y,0),U,9)=$$ICDVER^DGENA5(""P""))" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
  • OUTPUT TRANSFORM:  S Y=$$DISP^DGENLCD1(Y)
  • LAST EDITED:  SEP 12, 2014
  • HELP-PROMPT:  Enter the status procedure code from the CD Reasons File (#27.17).
  • DESCRIPTION:  
    This is for storage of either CPT procedure or ICD procedure codes.  ICD codes must be for the correct coding system, as determined by procedure date and stored in file 27.17 piece 9.
  • SCREEN:  S DIC("S")="I $$TYPE^DGENA5(Y)=""P"" I ($P(^DGEN(27.17,+Y,0),U,3)[""ICPT"")!($P(^DGEN(27.17,+Y,0),U,9)=$$ICDVER^DGENA5(""P""))"
  • EXPLANATION:  Must specify a CD REASON that is a procedure. The code must be a CPT code or the procedure coding system must match the value stored in the CD Reasons file.
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  2.397^B
    1)= S ^DPT(DA(1),.397,"B",$E(X,1,30),DA)=""
    2)= K ^DPT(DA(1),.397,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  2.397^AENR01^MUMPS
    1)= D EVENT^IVMPLOG($G(DA(1)))
    2)= D EVENT^IVMPLOG($G(DA(1)))
    3)=  DO NOT DELETE
    This cross-reference is used to notify HEC of changes that may affect enrollment.
1 AFFECTED EXTREMITY 0;2 SET
************************REQUIRED FIELD************************
  • 'RUE' FOR Right Upper Extremity;
  • 'LUE' FOR Left Upper Extremity;
  • 'RLE' FOR Right Lower Extremity;
  • 'LLE' FOR Left Lower Extremity;
  • 'BLE' FOR Bilateral Lower Extremity;
  • 'BUE' FOR Bilateral Upper Extremity;

  • LAST EDITED:  SEP 10, 2014
  • HELP-PROMPT:  Choose the affected extremity.
  • DESCRIPTION:  
    This is the affected extremity for this procedure.
  • SCREEN:  S DIC("S")="I $$LSCREEN^DGENA5(Y)"
  • EXPLANATION:  Must select an affected extremity that is valid for the procedure.
    UNEDITABLE
  • CROSS-REFERENCE:  2.397^AENR1^MUMPS
    1)= D EVENT^IVMPLOG($G(DA(1)))
    2)= D EVENT^IVMPLOG($G(DA(1)))
    3)=  DO NOT DELETE
    This cross-reference is used to notify HEC of changes that may affect enrollment.
Info |  Details |  All