Error in (OLD) Report
Posted: Mon Oct 05, 2009 1:26 am
Hi friends,
I´ve a program that print a simple report. Follow my code bellow. This code is of the my FILE RPT.
I call this report with this code bellow:
It´s work fine, but when a execute this command bellow in other istance of my program:
And after try execute my report once again, i´ve this error:
Please see the picture in Attachment.
What happend? where my code is wrong?
I´m use HMG Version 2.9.5 (2009.09.30).
And HMG-IDE 2.9.4.
Windows XP SP/2 with default theme.
I thank´s any help.
With best regards,
I´ve a program that print a simple report. Follow my code bellow. This code is of the my FILE RPT.
Code: Select all
DEFINE REPORT TEMPLATE
TITLE "Cadastro de definições"
HEADERS {"",""},{"Código","Descrição"}
FIELDS {"ID","DESCRICAO"}
WIDTHS {7,65}
TOTALS {.f.,.f.}
NFORMATS {"999999",""}
WORKAREA DEFINICAO
LPP 50
CPL 80
LMARGIN 2
PREVIEW
SELECT
PAPERSIZE DMPAPER_A4
END REPORTCode: Select all
Function Def_REPTO()
DBUseArea(.T.,,DEFINICAO,DEFINICAO,.t.)
DO REPORT FORM DEFINICAO
DBCloseArea("DEFINICAO")
Return NilCode: Select all
Function Read_Logs(cArea)
DBUseArea(.T.,,cArea,cArea,.t.)
edit extended workarea &cArea
DBCloseArea(cArea)
Return NilPlease see the picture in Attachment.
What happend? where my code is wrong?
I´m use HMG Version 2.9.5 (2009.09.30).
And HMG-IDE 2.9.4.
Windows XP SP/2 with default theme.
I thank´s any help.
With best regards,