FiveTech Software tech support forums

We recommend not to edit directly oRs:Fields. This is our recommendation when editing /appending records when not in XBrowse. For editing current record: oRs:Edit() For appending Record : oRs:Edit( .t. ) By default, this will display FWH default dialog. Obviously, ...

... is internally used and not to be directly used in the application program. I agree we used it in mariainv.prg sample. We will revise it. For appending a row, please do one of the two: 1. oRs:Append() < fill field data > oRs:Save() 2. oRec := oRs:Record( .t. ) // .t. for new recor <fill ...

... is .T. ( default) nil : Any other case. Typically, a programmer would like to insert a new row only if nKey != nil and is not already appending bPastEof would look like this: Code: :bPastEof := { |o,k| If( lAppending .or. k == nil, nil, ( oBrw:oRs:AddNew(), lAppending := .t., oBrw:Refresh() ...

... is .T. ( default)nil    : Any other case.  Typically, a programmer would like to insert a new row only if nKey != nil and is not already appending bPastEof would look like this: :bPastEof         := { |o,k| If( lAppending .or. k == nil, nil, ( oBrw:oRs:AddNew(), lAppending ...

Mr Reinaldo

If you still have sources of Clipper 5.3, see the sources of DBU and SAMPLE\BROWSE.PRG.
There you find the logic to create fantom record, without actually appending a record. Once user modifies any field, you can then insert the new record.

I see that Xbrowse show a blanco line for appending and editing a new record, but when you don't put any data into the row, it is not appended to the database and not shown also into the browse. I've seen in in combination with : oRs:lAutoAppend ...

... want to [**CAN NOT**] append a blank record to a table to be edited. I would like to append a blank record to the xbrowse for editing without appending the blank record to the table. I can take care of appending the new record after modifications to the table at another event. If you are wondering... ...

... "+" and "=" are always readonly - New METHOD FieldDefault( cnFld, [uDefault], [lRO] ) --> uDefault Set default values while appending new records. - New METHOD FieldPic( cnFld, [cPic] ) --> cPic - New METHOD FieldChoice( cnFld, [aList] ) --> aList List to be used in ...

This sample demonstrates usage of the following features of TDatabase 1. Using constructor Create() 2. Appending multiple rows of data with single call to :Append() 3. Setting default value for some fields 4. Setting Readonly flag for some fields 5. Using :bValidRow to ensure ...

... for this column 33. FieldDefault( nFld/cFldName, [uDefault], [lRO] ) --> uDefault Sets/Queries default value to be used for the field while appending new data. Default values are first saved to DBF before saving data in aBuffer( FWH 17.08) 34. FieldGet( nPos/FieldName ) --> uValue 1. ...

... contain many fields, programmers often consider it expedient to read and browse only limited number of columns. But for the purpose of editing/appending all or more fields need to be edited in the dialog. There may be more than one dialog and these dialogs can be quite complex. Rowset provides ...

... in FWHMARIA. I have a big xbrowse routine which captures key strokes, functions keys and a personalized popup menu that calls functions for appending, modifying, deleting, listing etc. I have a large clients table, but in a xbrowse I just show 4 fields out of 20+, in tDolphin, I have an ...

... There can be two cases. Case-1: Programs using the recommended built-in methods to edit / append / delete records, i.e, oBrw:EditSource( .t. ) for appending new records oBrw:EditSource() for Edit oBrw:Delete() for deletion of records. When these methods are used to add/edit/delete operations, the ...

... retotalled without any extra code from the programmer. If the programmer does not use built-in datarow but uses his own way of editing or appending data then: Appending: Call oBrw:SaveTots( .t. ) // .t. before appending Append data Call oBrw:ReCalcTotals() // faster than make totals Modifying/Editing: ...

... "states" )oRs:bEdit := { |oRec| EditStatesDialog( oRec ) }oRs:Edit() // or oRs:Edit( .t. ) for appending  This is the tempate for the EditDialog function EditDialog( oRec )   local lNew  := ( oRec:RecNo == 0 )   local oDlg   local ...