Invoices Dates and Due Dates by Report

[Guest]

I print invoices by way of reports, on the invoice i have the invoice date .I
want
to create a field that i can place next to it, a date due field. how do i do
it so as
it automatically adds 30 days to the invoice date if the terms are net 30,show
the same day as the invoice date,if the terms are COD, and shows 10th day of
the following month, if the terms is Net 10 EOM and is shipped up to the
first 20
days of the month of the invoice, and after 20th to show 10th day of the
following next month.

 

[Wayne Morgan]

The following equation used in the Control Source of a textbox should print
the correct date.

=IIf([Terms] = "Net 30", [InvoiceDate] + 30, IIf([Terms] = "COD",
[InvoiceDate], IIf([Terms] = "Net 10 EOM" And Day([ShipDate])<=20,
Format(SerialDate(Year([InvoiceDate]), Month([InvoiceDate])+1, 10)),
Format(SerialDate(Year([InvoiceDate]), Month([InvoiceDate])+2, 10)))))

The above equation assumes that there aren't any options that you haven't
mentioned. The equation will be wrapped by the newsreader, it should all be
on one line.

 

[Guest]

Thanks so much....

The following equation used in the Control Source of a textbox should print
the correct date.

=IIf([Terms] = "Net 30", [InvoiceDate] + 30, IIf([Terms] = "COD",
[InvoiceDate], IIf([Terms] = "Net 10 EOM" And Day([ShipDate])<=20,
Format(SerialDate(Year([InvoiceDate]), Month([InvoiceDate])+1, 10)),
Format(SerialDate(Year([InvoiceDate]), Month([InvoiceDate])+2, 10)))))

The above equation assumes that there aren't any options that you haven't
mentioned. The equation will be wrapped by the newsreader, it should all be
on one line.

--
Wayne Morgan
MS Access MVP

I print invoices by way of reports, on the invoice i have the invoice date
.I
want
to create a field that i can place next to it, a date due field. how do i
do
it so as
it automatically adds 30 days to the invoice date if the terms are net
30,show
the same day as the invoice date,if the terms are COD, and shows 10th day
of
the following month, if the terms is Net 10 EOM and is shipped up to the
first 20
days of the month of the invoice, and after 20th to show 10th day of the
following next month.

 

[Wayne Morgan]

You're welcome, but in the Format statements, I forgot to say what to format
as.

=IIf([Terms] = "Net 30", [InvoiceDate] + 30, IIf([Terms] = "COD",
[InvoiceDate], IIf([Terms] = "Net 10 EOM" And Day([ShipDate])<=20,
Format(SerialDate(Year([InvoiceDate]), Month([InvoiceDate])+1, 10), "Short
Date"),
Format(SerialDate(Year([InvoiceDate]), Month([InvoiceDate])+2, 10), "Short
Date"))))

--
Wayne Morgan
MS Access MVP

Thanks so much....

The following equation used in the Control Source of a textbox should
print
the correct date.

=IIf([Terms] = "Net 30", [InvoiceDate] + 30, IIf([Terms] = "COD",
[InvoiceDate], IIf([Terms] = "Net 10 EOM" And Day([ShipDate])<=20,
Format(SerialDate(Year([InvoiceDate]), Month([InvoiceDate])+1, 10)),
Format(SerialDate(Year([InvoiceDate]), Month([InvoiceDate])+2, 10)))))

The above equation assumes that there aren't any options that you haven't
mentioned. The equation will be wrapped by the newsreader, it should all
be
on one line.

--
Wayne Morgan
MS Access MVP

I print invoices by way of reports, on the invoice i have the invoice
date
.I
want
to create a field that i can place next to it, a date due field. how do
i
do
it so as
it automatically adds 30 days to the invoice date if the terms are net
30,show
the same day as the invoice date,if the terms are COD, and shows 10th
day
of
the following month, if the terms is Net 10 EOM and is shipped up to
the
first 20
days of the month of the invoice, and after 20th to show 10th day of
the
following next month.