guvoaII : Mensaje: editfocuschange

Colegas:

Este control lo tengo realizado en el editfocuschange.

Cuando ingreso el numero de comprobante mNumero controlo si existe en la base. Si existe me larga el cartel correspondiente, si pongo que no funciona correctamente, si pongo que si la ingreso igual no puedo cortar el proceso de control me sigue diciendo que esta cargada y no me hace el setfocus al siguiente campo mTasa. Que me esta faltado para que no me controle si digo que la paso igualmente.

Espero que me entienda la pregunta (muchas gracias)

LOCAL oControl AS Control
LOCAL lGotFocus AS LOGIC
LOCAL oTextbox AS textbox

oControl := IIf(oEditFocusChangeEvent == NULL_OBJECT, NULL_OBJECT, oEditFocusChangeEvent:Control)
lGotFocus := IIf(oEditFocusChangeEvent == NULL_OBJECT, FALSE, oEditFocusChangeEvent:GotFocus)
SUPER:EditFocusChange(oEditFocusChangeEvent)
//Put your changes here

IF oControl:NameSym == #mNumero .AND. !lGotFocus

SELF:oVentas:SetOrder(3)

IF oVentas:Seek(Str(mClie,11)+mComp+mLetras+Str(mpunto,8)+Str(mNumero,15))

     oTextBox := TextBox{ SELF, "Comprobante Cargado",;
  "Cuidado, Carga igualmente el Comprobante " }
     oTextBox:Type := BUTTONYESNO + BOXICONQUESTIONMARK

     IF ( oTextBox:Show() <> BOXREPLYYES )

         SELF:oDCmPUNTO:Value := 0
         SELF:oDCmNUMERO:Value := 0
         SELF:oDCmComp:SetFocus()

        ELSE

         SELF:oDCmTasa:SetFocus()
         RETURN FALSE

ENDI

Muchas gracias

Luengo Sergio
General Pico
La Pampa
Analista de Sistemas

Desplegar mensajes

Autor

Ordenar por fecha

Colegas: Este control lo tengo realizado en el editfocuschange. Cuando ingreso el numero de comprobante mNumero controlo si existe en la base. Si existe me...

Adesistemas
adessistemas

2 de Sep, 2008
11:26 am

Colegas: Este control lo tengo realizado en el editfocuschange. Cuando ingreso el numero de comprobante mNumero controlo si existe en la base. Si existe me...

Adesistemas
adessistemas

3 de Sep, 2008
11:14 am

A ver.. Creo que es un problema de lÃ³gica negativa. Si respondo YESâ€¦. Se queda donde estÃ¡. Pero RETURN (FALSE) hace que el evento de cambio de foco se...

Claudio Torrillo
clipsupp

3 de Sep, 2008
4:45 pm

Sergio, Que complicado que sos para redactar !!! Sinceramente lei 3 veces lo que pusiste y no entiendo tu problema, no pones ni a que clase corresponde el...

Pablo J. Pereyra
pjpereyra

3 de Sep, 2008
2:29 pm

Sacale el SELF Gerardo J. Biagiotti Analista de Sistemas De: guvoaII@... [mailto:guvoaII@...] En nombre de Pablo J. Pereyra ...

Gerardo J. Biagiotti
gjbiagiotti

3 de Sep, 2008
2:49 pm

Claudio: De hacer pruebas me quedo la logica dada vuelta. Este es el ejempo real. IF oControl:NameSym == #mNumero .AND. !lGotFocus // .AND. SELF:mNumero=0 ...

Adesistemas
adessistemas

3 de Sep, 2008
5:44 pm

Quitale el RETURN FALSE Claudio _____ De: guvoaII@... [mailto:guvoaII@...] En nombre de Adesistemas Enviado el: MiÃ©rcoles, 03 de...

Claudio Torrillo
clipsupp

4 de Sep, 2008
1:52 am

Consejos

¿Sabías que...?

Mensajes