CLASSIC
	COMMENT		Dim.SETRANGE(
	COMMENT		Dim1.SETRANGE(
	COMMENT		Dim2.SETRANGE(
	REPLACE
		FROM	Record 355;
		TO		Record 480;
	REPLACE
		FROM	Record 356;
		TO		Record 480;
	REPLACE
		FROM	Record 357;
		TO		Record 480;
	REPLACE
		FROM	Record 358;
		TO		Record 480;
	REPLACE
		FROM	Record 359;
		TO		Record 480;
	REPLACE
		FROM	Record 361;
		TO		Record 480;
	REPLACE
		FROM	DataItemTable=Table355;
		TO		DataItemTable=Table480;
	REPLACE
		FROM	DataItemTable=Table356;
		TO		DataItemTable=Table480;
	REPLACE
		FROM	DataItemTable=Table357;
		TO		DataItemTable=Table480;
	REPLACE
		FROM	DataItemTable=Table358;
		TO		DataItemTable=Table480;
	REPLACE
		FROM	DataItemTable=Table359;
		TO		DataItemTable=Table480;
	REPLACE
		FROM	DataItemTable=Table361;
		TO		DataItemTable=Table480;
	REPLACE
		FROM	IF NOT DimMgt.CheckJnlLineDimComb(JnlLineDim) THEN
		TO		IF NOT DimMgt.CheckDimIDComb("Dimension Set ID") THEN
	REPLACE
		FROM	IF NOT DimMgt.CheckJnlLineDimValuePosting(JnlLineDim,TableID,No) THEN
		TO		IF NOT DimMgt.CheckDimValuePosting(TableID,No,"Dimension Set ID") THEN
	REPLACE
		FROM	ChangeLogMgt.LogModification(RecRef,xRecRef);
		TO		ChangeLogMgt.LogModification(RecRef);
	REPLACE
		FROM	ExcelBuf.SetUseInfoSheed
		TO		ExcelBuf.SetUseInfoSheet
	REPLACE
		FROM	DataItemTable=Table2000000003;
		TO		DataItemTable=Table2000000120;
RDLC
	REPLACE 
		FROM    FirstLineHasBeenOutput := FALSE;
		TO	FirstLineHasBeenOutput := FALSE; ReportForNav.PageNo :=1;
	REPORT 1305,1306,1307,1308
		TABLE LinesTable
			ROWS 0,0,Line,Header
				ROWHEIGHT 0,1cm
			ROWS 1,1,Line,Body
			ROWS 2,2,Line,Body
			ROWS 3,3,ShipmentLine,Body
		TABLE VATSpec
			ROWS 0,1,VATCounter,Header
			ROWS 2,2,VATCounter, Body
			ROWS 3,3,VATCounter, Body
		TABLE Table_ShipToAdress
			ROWS 0,10,Header,Footer
		TABLE VATClauses
			ROWS 1,1,VATClauseLine,Header
				ROWHEIGHT 0,2cm
			ROWS 2,2,VATClauseLine,Body
			ROWS 3,3,VATClauseLine,Body