Need Help in Form already created in Template

[Stephanie53]

I am using Access 2010 - using Northwind Traders Template as this is very close to what I need to get this database going. But there is alot in this form that needs tweaking to get it to where we need it. So please if you can assist me with each part and we will take each one as we get each one to work the way I need it to work. I appreciate all your support and help in this part of the problems I am having

Here is my delima ..



When click on New Customer Order and after selecting Customer and then Product it will not allow me to Print/Email the Quote/Invoice to customer until have Shipping Information filled out. I want to disable this until another certain time when needed. So here is what the code looks now:

Order Form Code.zip

I need to disable the Ship To info until right before shipping. This is due to the fact that the customer will contact us later and advise us on who they want to use. Now we are going to put this part of the code later down in the line here of when I need that pop up to show up..but lets get thru this first part first

TIA Stephanie

[June7]

That's a lot of code to wade through.

Why is the Shipping information required - what in the code or table structures requires the shipping info? If you don't want it then remove it, whatever 'it' is.

[Stephanie53]

shipping information is required after the product is done with production. Our sales department forget half the time to get the info from customer but its not required to put in before clicking on Quote/Invoice before its needed. I want the part where it says its a requirement popup to stop. I am not sure which part in that code says that to remove it

[June7]

If shipping is only important after production is complete then modify the ValidateOrder procedure to validate shipping only if production is complete. What parameters indicate production is complete?

[Stephanie53]

After Order is complete its suppose to go to our Quality Control department. This is where they click on SHIP Order. That is when its suppose to Validate Shipping address. The reason being that we may start out making the product for the customer and they not sure which OIL Rig it would go to until its completed. Customer is then called back to verify if we are shipping it or if the customer has hired a shipping company to come pick it up. Some of the companies have their own shipping company to go pick up orders too.

[Missinglinq]

You can do conditional validation for insuring that your shipping address fields are populated, based on whether or not a given Field is populated. I'd use a Yes/No Field named ShippingAddressVerified, and then code in the Form_BeforeUpdate event:

Private Sub Form_BeforeUpdate(Cancel As Integer)

 If Me.ShippingAddressVerified = -1 Then
 
If Nz(Me.ShippingAddress1,"") = "" Then
   MsgBox "ShippingAddress1 Must Not Be Left Blank!"
   Cancel = True
   Control1.SetFocus
   Exit Sub
 End If
 
If Nz(Me.ShippingAddress2, "") = "" Then
   MsgBox "ShippingAddress2 Must Not Be Left Blank!"
   Cancel = True
   Control2.SetFocus
   Exit Sub
 End If

End If

End Sub

Linq ;0)>

[Stephanie53]

ok I think I understand this...but the problem I am having is WHERE do I put this in the code that is stated above in the zip file? I am not understanding the code for some reason on where it pertains to when I click on *PrintInvoice* button that it puts a stop to it because must have Shipping info first..I need for a popup to come up after production is complete and as quaility control takes over right before it gets shipped. here is the code that is in there now:


Function ValidateShipping() As Boolean
If IsNull(Me![Shipper ID]) Then Exit Function
If Nz(Me![Ship Name]) = "" Then Exit Function
If Nz(Me![Ship Address]) = "" Then Exit Function
If Nz(Me![Ship City]) = "" Then Exit Function
If Nz(Me![Ship State/Province]) = "" Then Exit Function
If Nz(Me![Ship ZIP/Postal Code]) = "" Then Exit Function

ValidateShipping = True
End Function

if you not sure where this is at please look at the zip file in post #1

TIA :-)

[June7]

Need a test to check for order status. The question to answer is "Is the order production complete?" What determines this? You said "they click on SHIP Order". Is there a field for 'SHIP Order'? Is it a Yes/No type? In what table? Use code to check the value of this field. Something like:

If DLookup("[SHIP Order]", "tablename", "OrderID=" & Me!OrderID) = True Then
'must have shipping info
If IsNull(...
End If

[Stephanie53]

Ok I dont know what happened as I havent made the changes to make it work but somehow ...ITS workling to what we need to do...lol Guess I got a little fairy on my side and when I came into work it was working :-)