The temporal metafile could not be created

[artu01]

Gente:
Ante todo que tenga un año 2012 lleno de exitos

Ultimamente en mi programa me aparece este error "The temporal metafile could not be created
Printer object Error"
Y no entiendo el por que? este error sale y quiero cerrar la vtna de este msje y no cierra tengo que hacer CTRL+ALT+DEL para
matar el proceso
Esto sucede solamente cuando va generar un preview con mas de 1 pag. (una sola hoja esta ok)
No entiendo la razon de ello si antes funcionaba bien asi sean fuese mas de 1 hoja ( el sist. lo tengo instalado en un servidor y desde todos los
terminales que accesan al sistema sale el mismo msje)
¿Sera que la dbf esta dañada?
He creado una tabla nueva y le hice un append from de mi dbf pero tampoco resulta sigue saliendo el mismo error
He copiado las dbfs con el exe a otra carpeta del servidor y al parecer el problema se resolvio
pero no entiendo el porque? ¿puede que la pista del servidor donde esta instalado mi sistema este defectuosa?
ALGUNO le ha pasado algo parecido

Gracias por sus comentarios

* uso FW Harbour for BCC - build June/2005

[hua]

Normally happens when oPrinter:Startpage() is not paired correctly with oPrinter:EndPage().

[artu01]

hua:
you are right

this was my code:

Code: Select all  Expand view

  nnumreg:=ADETCHET->(OrdKeycount())
   nFil := 52
   oPrn:oFont:=oFont

   DO WHILE !ADETCHET->( EOF() )
      *- inicio reporte
      IF (iif(nnumreg>13, mod(nnumreg,30)<>0,.t.))
         PAGE
         Cabecera()
      ENDIF
      Cuerpo()
      ENDPAGE
   ENDDO
 

This work ok while the variable nnumreg is different to 30, 60, 90, and all multiples of 30
but if nnumreg is equal to 30,60,90, etc produces the error: "metafile..."
because first execute ENDPAGE and after the command PAGE.

i resolve it this way:

Code: Select all  Expand view

  nnumreg:=ADETCHET->(OrdKeycount())
   nFil := 52
   oPrn:oFont:=oFont

   DO WHILE !ADETCHET->( EOF() )
      *- inicio reporte
      IF (iif(nnumreg>13, mod(nnumreg,30)<>0 .or. [color=#FF4040](nNumReg=(nNumreg/30)*30)[/color],.t.))
         PAGE
         Cabecera()
      ENDIF
      Cuerpo()
      ENDPAGE
   ENDDO
 

Now, it works perfect
Thanks so much

[hua]

Am glad was able to help