Hi Ray,

The lines below are suppose to create another record in the CUSTOMERANDACCOUNTS form of my current database.  It is still not working.  What am I missing?


** I added a WriteLn(RSHandle) and the result was -1 **

The sample checks that RSHandle must be greater than -1.

IF vTERMS = "Layaway" AND @ADD AND GUIDE = "" THEN {            #include "sbasic_include.sbas"
                                               vRSHandle = @XResultSetNew(@FN, "CUSTOMERANDACCOUNTS")
                                               XResultSetCreateNewRecord(vRSHandle)
                                               XResultSetValue(vRSHandle,"FNAME0",FNAME)
                                               XResultSetValue(vRSHandle, "LNAME0", LNAME)
                                                 XResultSetValue(vRSHandle, "STREET0", STREET)
                                               XResultSetValue(vRSHandle, "CITY1", CITY)
                                               XResultSetValue(vRSHandle, "POSTAL CODE0", POSTAL CODE)
                                               XResultSetValue(vRSHandle, "DATE0", DATE10)
                                               XResultSetValue(vRSHandle, "CATEGORY", TERMS0)
                                               XResultSetValue(vRSHandle, "BALANCE", ANEWBAL)
                                               XResultSetValue(vRSHandle, "PHONE10", PHONE1)      
                                               XResultSetClose(vRSHandle)
                                               GUIDE = @XLU(@FN,PHONE1,"CUSTOMERANDACCOUNTS!PHONE10","BALANCE")
                                                                 FormCommit("")}

Hi Ray,

Just tried it out.

This is what I get.

Inside the If Statement
Failed to get a ResultSet
Inside the If Statement
Failed to get a ResultSet


Cavel

The name of the form.

I thought that's what I had to use since I used @FN before it.


I ran the Document Application and it lists Database 1 - Customer
                                                              Database 7 - CUSTOMERANDACCOUNTS

Which is the one I want to create the new record and fill in with information from the Customer database.

I tried a different approach to see what would happen.
Instead of creating a record in the same application, I redid it to post to a new application so I didn't use @FN.

I made a new database  "DATA\LAY.DB"
The only form was called "ACCOUNTS"
The Fields were the basic ones.


IF vTERMS = "Layaway" AND @ADD AND GUIDE = "" THEN
{
     Writeln("Inside the If Statement")
     vRSHandle = @XResultSetNew("DATA\LAY.DB", "ACCOUNTS")
     if(vRSHandle > -1)
     {
           Writeln("Got a ResultSet")
           XResultSetCreateNewRecord(vRSHandle)
           XResultSetValue(vRSHandle, "FNAME",FNAME)
           XResultSetValue(vRSHandle, "LNAME", LNAME)
           XResultSetValue(vRSHandle, "STREET", STREET)
           XResultSetValue(vRSHandle, "CITY", CITY)
           XResultSetValue(vRSHandle, "PCODE", POSTAL CODE)
           XResultSetValue(vRSHandle, "CATEGORY", TERMS0)
           XResultSetValue(vRSHandle, "BALANCE", ANEWBAL)
           XResultSetValue(vRSHandle, "PHONE", PHONE1)
           XResultSetClose(vRSHandle)
           GUIDE = @XLU("DATA\LAY.DB", PHONE1, "ACCOUNTS!PHONE", "BALANCE")
     }

The account was created, but for some reason created 4 times.
Inside the If Statement
Got a ResultSet
Inside the If Statement
Got a ResultSet
Inside the If Statement
Got a ResultSet
Inside the If Statement
Got a ResultSet


I tried to revert back to the other database, but still no luck.

    

Hi Ray,

View Settings For: Database


Database Name CUSTOMERANDACCOUNTS


The database with the programming (the invoice)  is a sub database of this one.

Database Name CUSTOMERANDACCOUNTS!CUSTOMER