Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 430.02

Package: Accounts Receivable

ACCOUNTS RECEIVABLE(#430)-->430.02

Sub-Field: 430.02


Information

Parent File Name Number Package
ACCOUNTS RECEIVABLE(#430) DESCRIPTION 430.02 Accounts Receivable

Details

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

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 12, 1988
  • HELP-PROMPT:  Enter date charges were incurred.
  • DESCRIPTION:  
    This is the date that the charges were incurred.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  430.02^B
    1)= S ^PRCA(430,DA(1),101,"B",$E(X,1,30),DA)=""
    2)= K ^PRCA(430,DA(1),101,"B",$E(X,1,30),DA)
    This cross-reference is used for look-up and sorts for the Date of Charges.
2 DESCRIPTION OF CHARGES 1;0 WORD-PROCESSING #430.22

  • DESCRIPTION:  
    This is a description of the individual charges on the bill.
  • LAST EDITED:  JUL 31, 1987
  • HELP-PROMPT:  Enter a description of these charges.
  • DESCRIPTION:  
    This is a description of the individual charges on the bill.
3 QUANTITY (UNITS) 0;3 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>99999)!(X<0)!(X?.E1"."3N.N)!'X X
  • OUTPUT TRANSFORM:  S:Y?1".".N Y="0"_Y
  • LAST EDITED:  MAR 15, 1993
  • HELP-PROMPT:  Type a Number greater than 0 and less than or equal to 99999, 2 Decimal Digits
  • DESCRIPTION:  
    If the total amount of charges is computed using units of issue, then this is the number of units that are being billed.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  430.02^AC^MUMPS
    1)= I $P(^PRCA(430,DA(1),101,DA,0),U,4)]"" S Z0=($P(^(0),U,4)*X*100+.5\1/100),$P(^(0),U,6)=Z0 K Z0
    2)= Q
    This cross reference calculates and sets the Total Amount field 6.
4 UNIT COST 0;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."5N.N) X
  • LAST EDITED:  DEC 16, 2003
  • HELP-PROMPT:  Type a Number between 0 and 9999999, 4 Decimal Digits
  • DESCRIPTION:  
    This is the billing cost of a single unit of issue.
  • CROSS-REFERENCE:  430.02^AD^MUMPS
    1)= I $P(^PRCA(430,DA(1),101,DA,0),U,3)]"" S Z0=($P(^(0),U,3)*X*100+.5\1/100),$P(^(0),U,6)=Z0 K Z0
    2)= Q
    This cross-reference calculates and sets the Total Amount field 6.
5 UNIT 0;5 POINTER TO UNIT OF ISSUE FILE (#420.5) UNIT OF ISSUE(#420.5)

  • LAST EDITED:  JUL 31, 1987
  • HELP-PROMPT:  Enter unit of issue, 'EA' for Each, 'BX' for Box, etc.
  • DESCRIPTION:  
    This is the unit of issue -- EA, BX, DZ, etc.
6 TOTAL AMOUNT 0;6 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>999999999)!(X<0) X
  • LAST EDITED:  JUN 30, 2005
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 999999999, 2 Decimal Digits
  • DESCRIPTION:  
    This total is computed by multiplying the number of units by the cost per unit.
    UNEDITABLE
  • CROSS-REFERENCE:  430.02^AE^MUMPS
    1)= Q
    2)= Q
    Obsolete version 3.7 cross-reference.
7 ORDER NO. 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  JUL 31, 1987
  • HELP-PROMPT:  Enter optional Order No., 1 - 10 characters.
  • DESCRIPTION:  
    If the Service or Section has an order number associated with this bill it is entered here.
Info |  Details