FiveTech Software tech support forums

oDATA:=oServer:Query( "SELECT * FROM DATPER ORDER BY CODIGO FOR UPDATE")oData:oServer:BeginTransaction() ///<----  Do While !oDATA:Eof()      Vacacion() //Obtengo los valores  ...

I love ADS. I can use SQL interface/client and straight DBF access on the same data at the same time. They even have an oData client for use with mobile connectivity.

REDEFINE XBROWSE oData ID 120 OF oDlg3 AUTOSORT

You should also add here "DATASOURCE <yourdatasource> COLUMNS <fieldnames>"

I added seek to my project-browser and used REDEFINE XBROWSE oData ID 120 OF oDlg3 AUTOSORT and REDEFINE SAY oData:oSeek PROMPT oData:cSeek ID 145 OF oDlg3 FONT oFont1 oData:oSeek:Setcolor( 255, 16772313 ) for the xBrowse. Seek is working, but only with ...

Hakan,

Yes, you are right, the problem is that <oData> exists so the entire clause is NOT optional.

In such case, yes, the above posted working solution is the right one

Hakan, Yes, I missed the first line, sorry You can make it entirely optional too: [ <oData>:= <oPtype>:Clone() ;] ; Hi Antonio I tried your suggested solution and It does not work. ppo result is below. ooTb_Temp:=:Clone(); ooTb_Temp:D_AC(,, ...

Hakan,

Yes, I missed the first line, sorry

You can make it entirely optional too:

[ <oData>:= <oPtype>:Clone() ;] ;

Espero que te ajude: oQry := oServer:Query( "SELECT * FROM clientes ORDER BY nome" ) oData := oQry REDEFINE XBROWSE oBrw OBJECT oData ID 4000 OF oDlg lines AUTOCOLS AUTOSORT obrw:lAutoSort := .t. with object oBrw:oCol(1) :cHeader := 'Código' :cEditPicture := ...

Mr Lucas Let me try to make it simple for you. #1. If you want to change the image with a new image file : ACTION ( oData:foto := <newfilename>, oImage:LoadBmp( oData:foto ) ) #2. If you want to clear image ACTION ( oData:foto := "", ClearImage( oImage ) ) I shall ...

...                                       FILENAME oData:FOTO  ;                                      ...

As already mentioned, you can use OData ... http://scn.sap.com/community/developer-center/mobility-platform/blog/2013/06/12/odata-support-in-sql-anywhere-16 OData is quickly becoming the Lingua Franca for data exchange over the web. The OData ...

... either with the native client for each of these languages or simply use web-service calls. They have implemented the xml structure with the oData standards. SAP will provide you with a free 2 user server version good for development. There is a also a free training "Summit" every ...

... TDataRow class for adhoc data. aData := { ; { "Name", Space( 30 ) }, ; { "Age", 0 }, ; { "City", Space( 20 ) } } oData := TDataRow():New( aData ) oData:Edit() and we have the modified data in aData now.

... ::SetBookMark() RETURN TObjDb():New( Self, .F. ) //----------------------------------------------------------------------------// METHOD SaveObj( oData ) CLASS TDb ::GetBookMark() ::aBuffer := AClone( oData:aBuffer ) IF oData:lNuevo ::Append() ENDIF ::Save() RETURN NIL //----------------------------------------------------------------------------// ...

Hice lo siguiente y funciona [code local oSay etc etc REDEFINE CHECKBOX oChex[7] VAR oData:lexporta id 500 of oFold:adialogs[1] update; ON CHANGE (iif( oData:lexporta ,oSay:settext("País"),oSay:settext("Localidad")),oSay:refresh()) REDEFINE Say ...