Ayuda con un error en xbrowse

[José Camilo]

Buenas tardes.
Estoy tratando de generar un xBrowse con datos de una DBF.
Necesito editar el contenido del campo DESDENEW y al hacerlo actulizar con una SUMA el campo HASTANEW.

Al querer generarlo da este error "Error BASE/1005 message not found: NIL:_NEDITTYPE

asi es como lo tengo definido:

DEFINE DIALOG oDlg FROM 1, 30 TO 650, 1050 FONT oFont TITLE 'Renumerción de Formularios' PIXEL

@ 4,5 XBROWSE oBrw ;
COLUMNS "Articulo", "ArtFor->Detalle", "ArtFor->Abrevia", "Cantidad", "Desde", "Hasta", "DesdeNew","HastaNew" ;
HEADERS "Cód.", "Detalle", "Abr.", "Cant", "Desde", "Hasta", "Nuevo D", "Nuevo H";
COLSIZES 50,150,45,80,55,55,55,55 OF oDlg ;
SIZE 500,283 PIXEL ;
JUSTIFY .T.,.f.,.f.,.t.,.t.,.t.,.t.,.t. ;
ALIAS cAlias AUTOSORT FOOTERS LINES CELL NOBORDER ;
BACKGROUND aGrad VERTICAL

oBrw:nStretchCol := 2
oBrw:nRowHeight := 30
oBrw:nMarqueeStyle := 4
// anulo el doble color d los registros
oBrw:lContrastClr := .f.

// quitar barra horizontal
oBrw:lHScroll := .f.
oBrw:bKeyDown:={|nKey,nFlag|iif(veo(@nApu,@oBrw,aBotones,nKey),eval(aBotones[nApu,4]),NIL)}

**** en esta linea se produce el error
oBrw:oCol( "DesdeNew" ):nEditType := 1


oBrw:oCol( "DesdeNew" ):bEditValue := { || 1*1 }
oBrw:aCols[ 7 ]:lAutoSave := .T.
oBrw:oCol( "DesdeNew" ):bOnChange := { || _DetComF->HastaNew:=oBrw:oCol( "DesdeNew" ):Value + (oBrw:oCol( "Cantidad" ):Value-1),oBrw:Refresh() }

oBrw:oCol( "HastaNew" ):bEditValue := { || oBrw:oCol( "DesdeNew" ):Value + ((oBrw:oCol( "Cantidad" ):Value)-1) }
oBrw:aCols[ 8 ]:lAutoSave := .T.




los nombres de los campos son correctos.
No entiendo por que da el error, lo compare con otra funcion similar y no veo diferencia.

Gracias

José Camilo

[cmsoft]

Jose Camilo:
Y si cambias los oCol por aCol con su subindice?

Code: Select all  Expand view

//1) "Articulo", 2)"ArtFor->Detalle", 3)"ArtFor->Abrevia", 4)"Cantidad", 5)"Desde", 6)"Hasta", 7)"DesdeNew",8)"HastaNew" ;
oBrw:aCols[ 7 ]:nEditType := 1
oBrw:aCols[ 7 ]:bEditValue := { || 1*1 }
oBrw:aCols[ 7 ]:lAutoSave := .T.
oBrw:aCols[ 7 ]:bOnChange := { || _DetComF->HastaNew:=oBrw:aCols[ 7 ]:Value + (aCols[ 4 ]:Value-1),oBrw:Refresh() }

oBrw:aCols[ 8 ]:bEditValue := { || oBrw:aCols[ 7 ]Value + ((oBrw:aCols[ 4 ]:Value)-1) }
oBrw:aCols[ 8 ]:lAutoSave := .T.
 

[José Camilo]

Muchisimas gracias Cesar!!! funcionó perfecto!!!

Gracias por tu tiempo.