>oSQL=CREATEOBJECT("rs_SQL","newcontrade",.f.) >oSQL.cSQL="exec sp_OBS_AddBatchAIG 2" >oSQL.lIdle=.f. >oSQL.CSQLCURSOR="vOBS_ReadyAbout" >IF oSQL.ExecuteSql() < 0 > oSQL.ReleaseConn() > RELEASE oSQL > oSQL=.null. > RETURN >ELSE > oSQL.ReleaseConn() > RELEASE oSQL > oSQL=.null. > INDEX on s_Contract_No TAG Contr > INDEX on s_Client_Surename TAG Clien > >*could next line work? > > =CURSORSETPROP("KeyFieldList","instr_id,x_batch",oSQL.CSQLCURSOR) > =CURSORSETPROP("Tables","tbl_OBS_AIG",oSQL.CSQLCURSOR) > =CURSORSETPROP("UpdatableFieldList","Gen,Low,Placement",oSQL.CSQLCURSOR) > =CURSORSETPROP("UpdateNameList","gen tbl_OBS_AIG.OBS_AIG_GenEnable, Low tbl_OBS_AIG.OBS_AIG_LowerEnable, Placement tbl_OBS_AIG.OBS_AIG_Placement",oSQL.CSQLCURSOR) > =CURSORSETPROP("SendUpdates",.T.,oSQL.CSQLCURSOR) >*--------- > >ENDIF>