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.3045

Package: Third Party Billing

3P CLAIM DATA(#9002274.3)-->9002274.3045

Sub-Field: 9002274.3045


Information

Parent File Name Number Package
3P CLAIM DATA(#9002274.3) Charge Master 9002274.3045 Third Party Billing

Details

Field # Name Loc Type Details
.01 ITEM 0;1 POINTER TO 3P CHARGE MASTER FILE (#9002274.75) 3P CHARGE MASTER(#9002274.75)

  • LAST EDITED:  MAR 06, 1997
  • CROSS-REFERENCE:  9002274.3045^B
    1)= S ^ABMDCLM(DUZ(2),DA(1),45,"B",$E(X,1,30),DA)=""
    2)= K ^ABMDCLM(DUZ(2),DA(1),45,"B",$E(X,1,30),DA)
.02 CHARGE DATE 0;2 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 10, 1997
.03 QUANTITY 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 06, 1996
  • HELP-PROMPT:  Type a Number between 0 and 999, 0 Decimal Digits
.04 UNIT PRICE 0;4 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999)!(X<0) X
  • LAST EDITED:  DEC 09, 1996
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 99999, 2 Decimal Digits
.05 REVENUE CODE 0;5 POINTER TO REVENUE CODES FILE (#9999999.72) REVENUE CODES(#9999999.72)

  • LAST EDITED:  DEC 10, 1996
.06 CORRESPONDING DX 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>8!($L(X)<1) X
  • LAST EDITED:  DEC 10, 1996
  • HELP-PROMPT:  Answer must be 1-8 characters in length.
.07 HCPCS CODE 0;7 POINTER TO CPT FILE (#81) CPT(#81)

  • LAST EDITED:  DEC 19, 1996
.17 DATA SOURCE 0;17 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<1) X
  • LAST EDITED:  DEC 10, 1996
  • HELP-PROMPT:  Answer must be 1-12 characters in length.
.23 PRINT ORDER 0;23 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<1)!(X?.E1"."1.N) X
  • LAST EDITED:  SEP 15, 2017
  • HELP-PROMPT:  Type a number between 1 and 99999, 0 decimal digits.
  • CROSS-REFERENCE:  9002274.3^L^MUMPS
    1)= S ^ABMDCLM(DUZ(2),DA(1),"PO",X,45,DA)=""
    2)= K ^ABMDCLM(DUZ(2),DA(1),"PO",X,45,DA)
22 CPT NARRATIVE 2;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<3) X
  • LAST EDITED:  FEB 22, 2012
  • HELP-PROMPT:  Answer must be 3-80 characters in length
Info |  Details |  All