Error en MessageBox

40 views
Skip to first unread message

integral

unread,
May 14, 2014, 7:33:09 AM5/14/14
to publice...@googlegroups.com
Amigos nuevamente recurriendo a Ustedes :
 
Mi problema aparecio cuando al notar que mi rutina con el SCAN de validacion al terminar de recorrer todos los registros....
 
El MESSAGEBOX no muestra la cantidad total de errores tan solo muestra 15 registros y este ultimo el mensaje imcompleto...
 
A que puede deberse que el mensaje salga imcompleto. Ello me esta oblignado como slucion ha tratar de agregar al ultimo mensaje [...]
 
Les muestro el resultado adjunto....
 
Afradezco sus comentarios y sugerencias.
 
PD : A ALGUIEN LE HA SUCEDIDO ALGO SIMILAR
 
Saludos,
 
INTEGRAL
 
Error_Message.jpg

Fidel Charny

unread,
May 14, 2014, 8:31:25 AM5/14/14
to publice...@googlegroups.com
Messagebox() no es para escribir un libro. Igualmente, semejante mensaje es absolutamente inoperable. O creas una guía de reparación (ya que conoces donde faltan datos), o pones un mensaje que diga que faltan valores en tales campos. O simplemente que hay valores que no pueden estar vacíos y confías en las bondades de tu formulario y la inteligencia del operador.

Ariel D'Alfeo

unread,
May 14, 2014, 8:40:51 AM5/14/14
to publice...@googlegroups.com
Ademas no entiendo,¿porque no se verifica en el momento de la Carga del registro?, osea, si faltan datos no hay que dejar que inserte el registro. según lo que veo en el SuperMsgBox verifica los registros de la tabla. es muy tedioso eso para el usuario, tener que ir registro por registro agregando lo que le falto....


-- 
Ariel D'Alfeo
Córdoba, Argentina

Luis Salazar

unread,
May 14, 2014, 8:49:24 AM5/14/14
to publice...@googlegroups.com
Lo que Comentan aqui es cierto el MessageBox NO es para escribir tanto tiene sus limitaciones..
Bueno tenia un proceso similiar   mira como lo resolvi  a ver si te ayuda :

1) Genere un Cursor
    Ej       create cursor msgerrs ( numero_reg   n(5),;
                                                    mensaje         c(40),;
                                                   Observacion   c(40))

2) Creas un Form  que contiene un Grid de Tres Columnas
    donde asocias cada campo del cursor


3)  ejecuto la Validacion de cada registro y lleno el cursor
     con los errores en el Mensaje y la observacion de la accion a tomar
     ej   =      nreg = recno()
                   msg  = "Error en Fecha ..."
                  obs    = "Verificar la fecha de xxxx , No corresponde al mes de transaccionesss"
        insert into msgerrs (numero_reg,mensaje,observacio) values (nreg,msg,obs)

4) Al finalizar la validacion
    select msgerrs
    GO TOP
    if  !EOF()
         do form forma_de_errores
      else
         messagebox("Validacion  O.K,  proceso Sin errores",48,"Atencionn ...")
   endif
   select msgerrs
use
*****
Es mas  si no quieres crear un form  lo puedes enviar a EXCEL
pero ese cursor te aguanta cualquier cantidad de errores 
por que en un momento dado NO sabes cuantos errores se van a generar
Define el cursor de la forma mas conveniente para mostrar los mensajes

Espero te sirva esta idea ..





Antonio Meza

unread,
May 14, 2014, 12:08:42 PM5/14/14
to publice...@googlegroups.com
Integral, y no es mas fácil que verifiques el primer registro y muestres los campos que están vacíos? y luego que el usuario corrige, vuelves a verificar y si el segundo registro le faltan lo muestras y así sucesivamente!!!

saludos
Antonio Meza
Reply all
Reply to author
Forward
0 new messages