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

Package: Third Party Billing

3P BILL(#9002274.4)-->9002274.4025

Sub-Field: 9002274.4025


Information

Parent File Name Number Package
3P BILL(#9002274.4) Revenue Code 9002274.4025 Third Party Billing

Details

Field # Name Loc Type Details
.01 REVENUE CODE 0;1 POINTER TO REVENUE CODES FILE (#9999999.72) REVENUE CODES(#9999999.72)

  • INPUT TRANSFORM:  S DINUM=X Q
  • LAST EDITED:  SEP 13, 1996
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.02 UNITS 0;2 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUN 22, 1995
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
.03 UNIT CHARGE 0;3 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999)!(X<0) X
  • OUTPUT TRANSFORM:  S Y=$J(Y,4,2)
  • LAST EDITED:  JUN 22, 1995
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999, 2 Decimal Digits
.04 OR START DATE/TIME 0;4 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  JUL 31, 2006
  • HELP-PROMPT:  (No range limit on date)
.05 OR STOP TIME 0;5 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUN 22, 1995
.06 OR TIME CHARGE 0;6 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999)!(X<0) X
  • LAST EDITED:  JUN 22, 1995
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 99999, 2 Decimal Digits
.07 CPT CODE 0;7 POINTER TO CPT FILE (#81) CPT(#81)

  • LAST EDITED:  MAY 02, 2006
.17 DATA SOURCE 0;17 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<1) X
  • LAST EDITED:  DEC 13, 2005
  • 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 05, 2017
  • HELP-PROMPT:  Type a number between 1 and 99999, 0 decimal digits.
15 IMMUNIZATION LOT/BATCH NUMBER 1;15 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
  • LAST EDITED:  OCT 19, 2010
  • HELP-PROMPT:  Answer must be 1-50 characters in length
21 LINE ITEM CONTROL NUMBER 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>18!($L(X)<18) X
  • LAST EDITED:  FEB 01, 2011
  • HELP-PROMPT:  Answer must be 18 characters in length
  • TECHNICAL DESCR:  This field will be unique for each line item on every bill. The format being used is:
    Characters 1-12  = Bill IEN
    Characters 13-14 = Multiple #
    Characters 15-18 = Line item counter
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