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

Package: Third Party Billing

3P FEE TABLE(#9002274.01)-->9002274.0132-->9002274.1321

Sub-Field: 9002274.1321


Information

Parent File Name Number Package
9002274.0132 EFFECTIVE DATE 9002274.1321 Third Party Billing

Details

Field # Name Loc Type Details
.01 EFFECTIVE DATE 0;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  JAN 21, 2010
  • HELP-PROMPT:  (No range limit on date)
  • CROSS-REFERENCE:  9002274.1321^B
    1)= S ^ABMDFEE(DA(2),32,DA(1),1,"B",$E(X,1,30),DA)=""
    2)= K ^ABMDFEE(DA(2),32,DA(1),1,"B",$E(X,1,30),DA)
.02 GLOBAL CHARGE 0;2 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999)!(X<0)!(X?.E1"."3.N) X
  • LAST EDITED:  JAN 22, 2010
  • HELP-PROMPT:  Type a Dollar amount between 0 and 999999, 2 Decimal Digits
.03 TECHNICAL CHARGE 0;3 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999)!(X<0)!(X?.E1"."3.N) X
  • LAST EDITED:  JAN 22, 2010
  • HELP-PROMPT:  Type a Dollar amount between 0 and 999999, 2 Decimal Digits
.04 PROFESSIONAL CHARGE 0;4 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999)!(X<0)!(X?.E1"."3.N) X
  • LAST EDITED:  JAN 22, 2010
  • HELP-PROMPT:  Type a Dollar amount between 0 and 999999, 2 Decimal Digits
.05 LAST UPDATED 0;5 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  JAN 22, 2010
  • HELP-PROMPT:  (No range limit on date)
.06 UPDATED BY 0;6 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JAN 22, 2010
Info |  Details |  All