Break BY & BY
Publicado por Afrika (48 intervenciones) el 20/02/2008 16:23:47
De nuevo; Este es el codigo:
FOR EACH Nofulano where
Nofulano.xxxx = vsicocia and
Nofulano.xxxxx = vsicosuc and
............................... no-lock ,
EACH Nopersona where NoPersona.codigo = Nofulano.codigo NO-LOCK ,
EACH NoTiprec where NoTiprec.Cotiprec = INPUT vliCoTipRecibo NO-LOCK
Break by NoTiprec.Cotiprec
by Nofulano.Informapago
by Nofulano.Codivision :
Ya he preguntado al respecto y necesito su colaboración en esto. El amigo Miguel Angel me respondió, pero yo respondí a su respuesta y en esto quede:
Si yo hago lo que tu me indicaste Miguel Angel, en algun lugar del codigo tengo esto:
IF FIRST-OF(Nofulano.Informapago) THEN DO:
No lo puedo quitar porque lo necesito y ya no voy a ordenar por número de ficha. Solo ordenaré por nombre.
Si yo hago esto en el último EACH, como tu me lo indicaste:
EACH NoTiprec where ...... by Nopersona.nbapellido:
Donde meto los break by que estan al final de todos los each y que se utilizan mas abajo con IF FIRST-OF ...?????
FOR EACH Nofulano where
Nofulano.xxxx = vsicocia and
Nofulano.xxxxx = vsicosuc and
............................... no-lock ,
EACH Nopersona where NoPersona.codigo = Nofulano.codigo NO-LOCK ,
EACH NoTiprec where NoTiprec.Cotiprec = INPUT vliCoTipRecibo NO-LOCK
Break by NoTiprec.Cotiprec
by Nofulano.Informapago
by Nofulano.Codivision :
Ya he preguntado al respecto y necesito su colaboración en esto. El amigo Miguel Angel me respondió, pero yo respondí a su respuesta y en esto quede:
Si yo hago lo que tu me indicaste Miguel Angel, en algun lugar del codigo tengo esto:
IF FIRST-OF(Nofulano.Informapago) THEN DO:
No lo puedo quitar porque lo necesito y ya no voy a ordenar por número de ficha. Solo ordenaré por nombre.
Si yo hago esto en el último EACH, como tu me lo indicaste:
EACH NoTiprec where ...... by Nopersona.nbapellido:
Donde meto los break by que estan al final de todos los each y que se utilizan mas abajo con IF FIRST-OF ...?????
Valora esta pregunta
0