I am working on the Invoice example from the March and April InsideSesame. I have an error that I can't figure out. I will list the error and then the code.
Error while parsing module "Find (0)": Symbol expected [}], symbol found [Identifier]. Line 86, position 9: [Identifier: Invoicedate] Invoicedate = @date ^
** PROGRAMMING SECTION: [Find] [On Element Entry] ** var vAllCustomers as String var vAllCustNos as String var vCompany as String var vCompanies as String var vCnt as Int If Cust# <> "" Then { If @XLookup(@Fn, Cust#, "Customers!Customer #", "Customer #") <> "" Then { vCompany = @XLookup(@Fn, Cust#, "Customers!Customer #", "Company") vCompanies = vCompanies + vCompany + ";" vCnt += 1 } Else { vAllCustomers = @XListValues(@Fn, "Customers!Company") While @Len(vAllCustomers) > 0 { vCompany = Split(vAllCustomers, ";") If @Left(vCompany, @Len(Cust#)) = Cust# Then { vCompanies = vCompanies + vCompany + ";" vCnt += 1 } } } If vCnt > 0 Then { vCompanies = @Repllas(vCompanies, ";", "") Company = @PopUpMenu(vCompanies,"SELECT CUSTOMER" + @NewLine() + "FOR THIS INVOICE") If Company <> "" Then { Cust# = @XLookup(@Fn, Company, "Customers! Company", "Customer #") Name = @XLookup(@Fn, Company, "Customers! Company", "Name") Address = @XLookup(@Fn, Company, "Customers! Company", "Address") City = @XLookup(@Fn, Company, "Customers! Company", "City") State = @XLookup(@Fn, Company, "Customers! Company", "State") Zip = @XLookup(@Fn, Company, "Customers! Company", "Zip") } } Else { @Msgbox("No companies found that begin with ‘" + Cust# + "‘","","") } } If Cust# = "" Then { vAllCustomers = @XListValues(@Fn, "Customers! Company") Company = @PopupMenu(vAllCustomers, "SELECT CUSTOMER" + @NewLine() + "FOR THIS INVOICE") If Company <> "" Then { Cust# = @XLookup(@Fn, Company, "Customers! Company", "Customer #") Name = @XLookup(@Fn, Company, "Customers! Company", "Name") Address = @XLookup(@Fn, Company, "Customers! Company", "Address") City = @XLookup(@Fn, Company, "Customers! Company", "City") State = @XLookup(@Fn, Company, "Customers! Company", "State") Zip = @XLookup(@Fn, Company, "Customers! Company", "Zip") } }
If Company <> "" Then If Invoice# = "" Then
{
Invoice# = @Number Invoicedate = @Date
}
What am I missing?
|