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

Package: Third Party Billing

3P BILL(#9002274.4)-->9002274.4019

Sub-Field: 9002274.4019


Information

Parent File Name Number Package
3P BILL(#9002274.4) ICD Procedure 9002274.4019 Third Party Billing

Details

Field # Name Loc Type Details
.01 ICD Procedure 0;1 POINTER TO ICD OPERATION/PROCEDURE FILE (#80.1) ICD OPERATION/PROCEDURE(#80.1)

  • INPUT TRANSFORM:  S DINUM=X Q
  • LAST EDITED:  AUG 22, 1990
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.02 PRIORITY ORDER 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>10)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 17, 1990
  • HELP-PROMPT:  Type a Number between 1 and 10, 0 Decimal Digits
  • CROSS-REFERENCE:  9002274.4019^C
    1)= S ^ABMDBILL(DUZ(2),DA(1),19,"C",$E(X,1,30),DA)=""
    2)= K ^ABMDBILL(DUZ(2),DA(1),19,"C",$E(X,1,30),DA)
.03 DATE of SERVICE 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 19, 1990
.04 PROVIDER'S NARRATIVE 0;4 POINTER TO PROVIDER NARRATIVE FILE (#9999999.27)
************************REQUIRED FIELD************************
PROVIDER NARRATIVE(#9999999.27)

  • LAST EDITED:  MAY 22, 1990
.06 ICD INDICATOR 0;6 SET
  • '1' FOR ICD-10;

  • LAST EDITED:  MAR 18, 2014
.17 DATA SOURCE 0;17 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  DEC 13, 2005
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
11 SNOMED CT 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  APR 09, 2014
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
12 SNOMED CT PREFERRED TERM COMPUTED

  • MUMPS CODE:  I $D(^ROUTINE("AUPNVUTL")) S Y=$S($P($G(^ABMDBILL(DUZ(2),DA,19,D1,1)),U):$P(^(1),U),1:"") S X=Y,X=$$CONCPT^AUPNVUTL(X)
  • ALGORITHM:  I $D(^ROUTINE("AUPNVUTL")) S Y=$S($P($G(^ABMDBILL(DUZ(2),DA,19,D1,1)),U):$P(^(1),U),1:"") S X=Y,X=$$CONCPT^AUPNVUTL(X)
  • LAST EDITED:  APR 09, 2014
21 DUAL CODING ICD-9 PROCEDURE 2;1 POINTER TO ICD OPERATION/PROCEDURE FILE (#80.1) ICD OPERATION/PROCEDURE(#80.1)

  • LAST EDITED:  APR 20, 2015
22 DUAL CODING ICD-9 DX CODE 2;2 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • LAST EDITED:  APR 20, 2015
Info |  Details |  All