FiveTech Software tech support forums

... C.ID < 101
ENDTEXT
//
oRs := oCn:RowSet( cSql )
if oRs != nil

// In this Rowset, fields ID and STATEMANE are readonly
// Please build your TDataRow Edit code here
// reproduing the error

oRs:Close()

endif
oCn:Close()

return nil

and test it at your end
I will also test at my end.
Then ...

Dear Rao Sir ,

I apologize resuming to this topic very late. May I request you to help on this.

Thanks
Shridhar

Yes..! , Both Function are working fine
TDataRow method Edit() automatically creates Gets for all datas and that is working fine.
Are you able to see the Get for the data itemgrp_name also?

This method automatically recognizes if a data is readonly and then creates the Get suitably.
When these ...

... Function are working fine. I had overlooked. I tried to change GET with READONLY. But still the error is exists.


oItemRs:Edit() is same as TDataRow():New( oItemRs ):Edit()

TDataRow():New( oItemRs ):Edit()


Error :

Application
===========
Path and name: G:\vimcosoft\V9ACC\v9acc.exe (32 ...

In this code
@ nGetRow, 150 SAY ":" GET aoGETRO[ 5 ] VAR oItemRec:main_uom_name SIZE 200, C_GETH PIXEL OF oWnd ;
WHEN (.F.) NOBORDER FONT oApp:oFontGet UPDATE

Please do not use WHEN clause. Use READONLY clause
Like this:

@ nGetRow, 150 SAY ":" GET aoGETRO[ 5 ] VAR oItemRec:main_uom_name ...

oItemRs:Edit() is same as TDataRow():New( oItemRs ):Edit()

Please try and let us know.

... Sir ,

Sorry for the late replying...!!


Is oItemRs:Edit() not working in FWH24.04? What is the error you are getting?


oItemRs:Edit() is working fine in both FWH 23.10 and FWH24.04 version. THE TDATAROW IS NOT WORKING IN VERSION FWH 24.04 BUT IT IS WORKING FINE IN FWH 23.10.

Thanks
Shridhar

I have tested in FWH 23.10 and it is working FINE. But NOT working in FWH 24.04

Is oItemRs:Edit() not working in FWH24.04? What is the error you are getting?

Dear Rao Sir ,

oItemRs:Edit() is working fine. But after that as usual same error occurs.

I have tested in FWH 23.10 and it is working FINE. But NOT working in FWH 24.04
Thanks
Shridhar

T_VITEM_REF_COLS_BY_ID( pnItemId )

What does this function Return?

Meanwhile please do this small test:
Immediately after opening the rowset, execute: and let us know what happens.

Dear Rao Sir ,

It is GET Var as shown below , as TDATAROW added underscore "_" prefix ( _MAIN_UOM_NAME ).

The RowSet Query returns a record.



oItemRs := oApp:oDBConn:RowSet( T_VITEM_REF_COLS_BY_ID( pnItemId ) )
oItemRec := TDataRow():New( oItemRs )

....

@ nGetRow, 150 SAY ":" GET aoGETRO[ 5 ...

What is this?
_MAIN_UOM_NAME

Dear Rao Sir ,

I am getting the error Error BASE/39 Write not allowed: TDATAROW:main_uom_name. I am not able to understand this error. Could you please help me on this.



Application
===========
Path and name: G:\vimcosoft\V9ACC\v9acc.exe (32 bits)
Size: 5,547,520 bytes
Compiler version ...

Maurizio, I do not use tDataRow(), but it works for me:
Wouldn't that be missing?

Regards.

... método Record( cTable, [cWhere] ) --> Record Object
utilizando la nueva clase FWMariaRecord (source\classes\mariarec.prg) derivada de la clase TDataRow.

Esto permite editar un único registro existente o un nuevo registro y guardar en una tabla sin tener
que abrir el objeto RowSet, lo que ...