Una volta registrata, tecnicamente lo standard Navision, non ti permette di ristampare il report.
Ti allego un report che dovrebbe fare questo mestiere.
OBJECT Report 51011 VAT Calculation / Reprint
{
OBJECT-PROPERTIES
{
Date=28/09/06;
Time=11.39.50;
Modified=Yes;
Version List=Report;
}
PROPERTIES
{
Permissions=TableData 254=imd;
CaptionML=[ENU=VAT Calculation - Reprint;
ITA=Liquidazione IVA - Ristampa];
TopMargin=1200;
BottomMargin=1000;
LeftMargin=1000;
OnInitReport=BEGIN
IQPaginaPartenza := 1;
END;
OnPreReport=BEGIN
IF SetupCG.GET THEN;
IF RichDataFine = 0D THEN
ERROR(Text1000000000);
IF DataInizialeInserita > RichDataFine THEN
ERROR(Text1000000001);
IF DataInizialeInserita = 0D THEN
MovimentiIVA.SETFILTER(“Operation Occured Date”,’…%1’,RichDataFine)
ELSE
MovimentiIVA.SETRANGE(“Operation Occured Date”,DataInizialeInserita,RichDataFine);
FiltroDataIVA := MovimentiIVA.GETFILTER(“Operation Occured Date”);
PeriodoIVA := FORMAT(DATE2DMY(RichDataFine,3)) + ‘/’ + CONVERTSTR(FORMAT(DATE2DMY(RichDataFine, 2),2),’ ',‘0’);
InfoSocieta.GET;
InformazioniSocieta[1] := InfoSocieta.Name;
InformazioniSocieta[2] := InfoSocieta.Address;
InformazioniSocieta[3] := InfoSocieta.“Post Code”;
InformazioniSocieta[4] := InfoSocieta.City;
InformazioniSocieta[5] := InfoSocieta.County;
InformazioniSocieta[6] := InfoSocieta.“Fiscal Code”;
InformazioniSocieta[7] := InfoSocieta.“VAT Registration No.”;
COMPRESSARRAY(InformazioniSocieta);
END;
Orientation=Landscape;
PaperSize=A4 210 x 297 mm;
DeviceFontName=Draft 10cpi;
}
DATAITEMS
{
{ PROPERTIES
{
DataItemTable=Table12147;
DataItemTableView=SORTING(Code)
ORDER(Ascending);
PrintOnlyIfDetail=Yes;
OnPreDataItem=BEGIN
IQImportoVKTotale:=0;
IQImportoAcqTotale:=0;
END;
}
SECTIONS
{
{ PROPERTIES
{
SectionType=Header;
PrintOnEveryPage=Yes;
SectionWidth=27000;
SectionHeight=2961;
}
CONTROLS
{
{ 11 ;TextBox ;24150;423 ;2850 ;423 ;FontSize=8;
SourceExpr=InformazioniSocieta[6] }
{ 13 ;Label ;22500;423 ;1500 ;423 ;HorzAlign=Right;
CaptionML=[ENU=VAT Reg. No.:;
ITA=Partita IVA:] }
{ 14 ;TextBox ;18600;423 ;3450 ;423 ;FontSize=8;
SourceExpr=InformazioniSocieta[6] }
{ 15 ;Label ;16650;423 ;1800 ;423 ;HorzAlign=Right;
CaptionML=[ENU=Fiscal Code:;
ITA=Codice Fiscale:] }
{ 16 ;TextBox ;0 ;423 ;16200;423 ;FontSize=7;
SourceExpr=InformazioniSocieta[1]+’, ‘+InformazioniSocieta[2]+’, ‘+InformazioniSocieta[3]+’ ‘+InformazioniSocieta[4]+’ (’+InformazioniSocieta[5]+’)’ }
{ 17 ;TextBox ;4050 ;0 ;8550 ;423 ;FontSize=10;
FontBold=Yes;
SourceExpr=STRSUBSTNO(Text1000000008,FiltroDataIVA) }
{ 18 ;Label ;0 ;0 ;3900 ;423 ;FontSize=10;
FontBold=Yes;
CaptionML=[ENU=Calc. and Post VAT Settlement;
ITA=Liquidazione IVA] }
{ 19 ;Shape ;0 ;1573 ;27000;423 ;ShapeStyle=HorzLine }
{ 96 ;Label ;25050;1692 ;1950 ;846 ;HorzAlign=Right;
VertAlign=Bottom;
FontBold=Yes;
MultiLine=Yes;
CaptionML=[ENU=Rem. Unreal. Amount;
ITA=Importo in Sosp.] }
{ 97 ;Label ;22350;1692 ;2250 ;846 ;HorzAlign=Right;
VertAlign=Bottom;
FontBold=Yes;
MultiLine=Yes;
CaptionML=[ENU=Rem. Unreal. Base;
ITA=Imponibile in Sosp.] }
{ 98 ;Label ;20250;1692 ;1800 ;846 ;HorzAlign=Right;
VertAlign=Bottom;
FontBold=Yes;
MultiLine=Yes;
CaptionML=[ENU=Undeductable Amount;
ITA=Importo Indetraibile] }
{ 99 ;Label ;16950;1692 ;2550 ;846 ;HorzAlign=Right;
VertAlign=Bottom;
FontBold=Yes;
MultiLine=Yes;
CaptionML=[ENU=Undeductable Base;
ITA=Imponibile Indetraibile] }
{ 100 ;Label ;14250;1692 ;2550 ;846 ;HorzAlign=Right;
VertAlign=Bottom;
FontBold=Yes;
MultiLine=Yes;
CaptionML=[ENU=Amount;
ITA=Importo] }
{ 101 ;Label ;11550;1692 ;2603 ;846 ;HorzAlign=Right;
VertAlign=Bottom;
FontBold=Yes;
MultiLine=Yes;
CaptionML=[ENU=Base;
ITA=Imponibile] }
{ 103 ;Shape ;0 ;2538 ;27000;423 ;ShapeStyle=HorzLine }
{ 106 ;Label ;3600 ;1692 ;5700 ;846 ;HorzAlign=Left;
VertAlign=Bottom;
FontBold=Yes;
MultiLine=Yes;
CaptionML=[ENU=VAT Identifier Description;
ITA=Descrizione Cod. IVA] }
{ 107 ;Label ;9450 ;1692 ;750 ;846 ;HorzAlign=Right;
VertAlign=Bottom;
FontBold=Yes;
MultiLine=Yes;
CaptionML=[ENU=VAT %;
ITA=% IVA] }
{ 108 ;Label ;10500;1692 ;937 ;846 ;HorzAlign=Right;
VertAlign=Bottom;
FontBold=Yes;
MultiLine=Yes;
CaptionML=[ENU=Ded. %;
ITA=% detr.] }
{ 109 ;Label ;300 ;1692 ;1818 ;846 ;HorzAlign=Left;
VertAlign=Bottom;
FontBold=Yes;