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

Package: IFCAP

REQUEST FOR QUOTATION(#444)-->444.024

Sub-Field: 444.024


Information

Parent File Name Number Package
REQUEST FOR QUOTATION(#444) QUOTES 444.024 IFCAP

Details

Field # Name Loc Type Details
.01 QUOTE VENDOR 0;1 VARIABLE POINTER VENDOR(#440)  RFQ VENDOR(#444.1)  

  • LAST EDITED:  NOV 22, 1995
  • HELP-PROMPT:  Enter the Vendor submitting the Quote
  • DESCRIPTION:  
    This is the vendor for this quote.
  • CROSS-REFERENCE:  444.024^B
    1)= S ^PRC(444,DA(1),8,"B",$E(X,1,30),DA)=""
    2)= K ^PRC(444,DA(1),8,"B",$E(X,1,30),DA)
    3)= Required Index for Variable Pointer
1 SELLER REFERENCE NBR 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  NOV 21, 1995
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    This is the seller's reference number.
2 EFFECTIVE DATE 0;3 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 21, 1995
  • HELP-PROMPT:  Enter the Date that the Quote was offered.
  • DESCRIPTION:  
    This is the date that the Quote was submitted, as contrast to the date received.
3 RECEIPT DATE/TIME 0;4 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 21, 1995
  • HELP-PROMPT:  Enter the time that the Quote was Filed in the database.
  • DESCRIPTION:  
    This is the date/time that the quote was filed in the database, as contrast to sent by the vendor.
3.5 FILE 423.6 ENTRY 1;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 15, 1996
  • HELP-PROMPT:  Type a Number between 1 and 999999999, 0 Decimal Digits
  • DESCRIPTION:  This is the internal number of the file 423.6 entry which is the holding file for a message sent from the vendor and imported into this quote in file 444. Note: this value is useful only for checking the import soon
    after completion, as the internal entry number could be reused after this entry is purged.
4 VENDOR CONTACT 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  NOV 21, 1995
  • HELP-PROMPT:  Enter the name of the contact name (1-30 chars)
  • DESCRIPTION:  
    This is the name of the Vendor's Contact associated with this Quote.
5 CONTACT PHONE 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>21!($L(X)<10) X
  • LAST EDITED:  NOV 21, 1995
  • HELP-PROMPT:  Enter the voice Telephone Number for the vendor's contact
  • DESCRIPTION:  
    This is the telephone number to direct questions concerning this quote.
6 FOB 1;1 SET
  • 'D' FOR DESTINATION;
  • 'O' FOR ORIGIN;

  • LAST EDITED:  NOV 22, 1995
  • HELP-PROMPT:  Enter 'D' if the price includes any applicable shipping, else 'O'
  • DESCRIPTION:  This field indicates whether prices include shipping. If Freight on Board (FOB) is Destination, there will be no additional shipping fees. If, in contrast, FOB is Origin, then price assumes that the buyer will pick up
    the items at the vendor's location, and shipping incurs additional charges.
7 EST. SHIPPING AND/OR HANDLING 1;2 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999.99)!(X<0) X
  • OUTPUT TRANSFORM:  S Y=$FN(Y,"",2)
  • LAST EDITED:  MAR 21, 1996
  • HELP-PROMPT:  Enter a Dollar Amount between 0 and 9999.99, 2 Decimal Digits
  • DESCRIPTION:  
    This is the estimate of shipping and handling costs.
8 TOTAL AMOUNT 1;3 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999.99)!(X<0) X
  • LAST EDITED:  NOV 24, 1995
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999.99, 2 Decimal Digits
  • DESCRIPTION:  
    This is the total cost from vendor's quote.
9 PROMPT PAYMENT TERMS 2;0 Multiple #444.025 444.025

  • DESCRIPTION:  
    These are the prompt payment terms.
10 GOVT CONTRACT NBR 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X D:$L($G(X))>19 EN^DDIOL("Warning - Contract # will have to be trimmed to 19 characters for PO")
  • LAST EDITED:  FEB 15, 1996
  • HELP-PROMPT:  Enter government contract # applicable to entire quote (1-30 chars)
  • DESCRIPTION:  
    This is the vendor's contract # which is applicable to all items on the quote. If individual line items fall under different contract numbers, then the contract number should be entered at the item level.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
11 ITEM 3;0 Multiple #444.026 444.026

  • DESCRIPTION:  
    This is the list of items for which the vendor has submitted quotes.
12 MANUALLY EDITED 1;4 SET

  • LAST EDITED:  FEB 16, 1996
  • HELP-PROMPT:  "Enter 'YES' if the last edit for this record was manual"
  • DESCRIPTION:  
    This flags a record as having been manually edited, either exclusively or after any electronic transmission.
13 LAST EDITOR 1;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  FEB 16, 1996
  • HELP-PROMPT:  Enter the name of the person doing the most recent edit.
  • DESCRIPTION:  
    This field identifies the last editor of this quote.
14 DATE/TIME LAST EDITED 1;6 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 27, 1996
  • HELP-PROMPT:  Enter the date and time that this quote was last edited.
  • DESCRIPTION:  
    This field records the date and time that this quote was last edited.
15 CALCULATED LINE TOTAL COMPUTED

  • MUMPS CODE:  X ^DD(444.024,15,9.3) S X=Y(444.024,15,103) S D0=Y(444.024,15,80) S D1=Y(444.024,15,81) S D2=Y(444.024,15,82)
    9.2 = S Y(444.024,15,80)=$S($D(D0):D0,1:""),Y(444.024,15,81)=$S($D(D1):D1,1:""),Y(444.024,15,82)=$S($D(D2):D2,1:""),Y(444.024,15,103)=""
    9.3 = X ^DD(444.024,15,9.2) X "F D2=0:0 S D2=$O(^PRC(444,D0,8,D1,3,D2)) Q:D2'>0 S Y(444.024,15,103)=Y(444.024,15,103)+$S($D(^(D2,1)):$P(^(1),U,7),1:"""")" S D(2)=D2
  • ALGORITHM:  TOTAL(#11:#18)
  • DESCRIPTION:  
    This field sums the net line amounts.
16 DUN # COMPUTED

  • MUMPS CODE:  S X=$$DUN^PRCHQ1B(8)
  • ALGORITHM:  S X=$$DUN^PRCHQ1B(8)
Info |  Details