> TEXT TO cSqlInsert NOSHOW > INSERT INTO STAFF > ( EMPLOYEE, EMPL_NAME, CLASS, ST_RATE, OT_RATE, ST_WAGE, OT_WAGE, ADDRESS1, ADDRESS2, >CITY, STATE, ZIP, PHONE, DATE_VIEW, DATE_HIRE, WAGE, SHOP, STATUS, DOB, >DT_RATE, DT_WAGE, ST_ACCOUNT, OT_ACCOUNT, DT_ACCOUNT, NOTES, SHOP_PK, PAGE_NO, EMPL_EMAIL, SITE_NO, REC_ID, VFP_EMPL_PK, CC_EMAIL ) > VALUES > ( ?STAFF.EMPLOYEE, ?STAFF.EMPL_NAME, ?STAFF.CLASS, ?STAFF.ST_RATE, ?STAFF.OT_RATE, ?STAFF.ST_WAGE, ?STAFF.OT_WAGE, ?STAFF.ADDRESS1, ?STAFF.ADDRESS2, >?STAFF.CITY, ?STAFF.STATE, ?STAFF.ZIP, ?STAFF.PHONE, ?EVL(STAFF.DATE_VIEW,NULL), ?EVL(STAFF.DATE_HIRE,NULL), ?STAFF.WAGE, ?cShopId, ?STAFF.STATUS, ?EVL(STAFF.DOB,NULL), >?STAFF.DT_RATE, ?STAFF.DT_WAGE, ?STAFF.ST_ACCOUNT, ?STAFF.OT_ACCOUNT, ?STAFF.DT_ACCOUNT, ?STAFF.NOTES, ?STAFF.SHOP_PK, ?STAFF.PAGE_NO, ?STAFF.EMPL_EMAIL, ?STAFF.SITE_NO, ?STAFF.REC_ID, ?STAFF.EMPL_PK, ?STAFF.CC_EMAIL ) > ENDTEXT > > SELECT STAFF > DO WHILE !EOF() > nResult = SQLEXEC(hCon, cSqlInsert) > > IF nResult < 1 > AERROR( aErrorInf ) > *-- do something with the error > endif > > skip > > ENDDO > >>