tengo un xBrowse para editar un array, su definición es como sigue:
- Code: Select all Expand view
REDEFINE XBROWSE oBrw ID 1001 OF oDlg ARRAY aNuevos CELL FASTEDIT;
HEADER {"ORIGEN","DESTINO"} COLUMNS {1,2} PICTURE "@!","@!" SIZES 205,205
oBrw:aCols[ 1 ]:lAutoSave := .F.
oBrw:aCols[ 2 ]:lAutoSave := .T.
oBrw:aCols[ 2 ]:nEditType := EDIT_GET
oBrw:aCols[ 2 ]:bEditValid := {|oGet| check_stock( oGet:cText) }
la función de validación es:
- Code: Select all Expand view
- //------------------------------------------------------------------------------
FUNCTION check_Stock( codigo )
//-------------------------- ----------------------------------------------------
LOCAL ret := .F.
nn++
? Codigo, nn
xBrowse( aStock )
RETURN .T.
Es muy RARO, si pueden apreciar estoy imprimiendo nn (una variable global de prueba) despues de incrementarla, el tema es que el xBrowse( aStock ) no se desplega hasta despues de imprimirse dos veces ? Codigo, nn, con valor 1, 2 respectivamente para nn, solo después de ello, aparece el xBrowse, también dos veces. No importa si devuelto .T. o .F. en la función, el comportamiento es el mismo
No tengo idea que puede ser, alguna ayuda?
saludos
Marcelo