Ten artykuł dotyczy systemu Microsoft Dynamics NAV dla ustawień regionalnych języka w języku angielskim (en-gb).
Objawy
Nie można uruchomić raportu niezafakturowanych zapasów otrzymanych i raport zapasy wydane niezafakturowane z mocą wsteczną w Zjednoczonym Królestwie wersji systemu Microsoft Dynamics NAV 2009.
Ten problem występuje w następujących produktach:
-
Polska wersja dodatku Service Pack 1 dla systemu Microsoft Dynamics NAV 2009
-
Zjednoczonym Królestwie wersję systemu Microsoft Dynamics NAV 2009 R2
Rozwiązanie
Informacje o poprawce
Obsługiwana poprawka jest obecnie udostępniana przez firmę Microsoft. Jednak to jest przeznaczona tylko do usunięcia problemu opisanego w tym artykule. Zastosuj ją tylko w systemach, w których występuje ten problem. Ta poprawka może być wciąż w fazie testowania. Jeśli dany system nie jest poważnie narażony na ten problem, firma Microsoft zaleca, aby poczekać na następny dodatek service pack dla systemu Microsoft Dynamics NAV 2009 lub następną wersję systemu Microsoft Dynamics NAV, zawierający tę poprawkę.
Uwaga W wyjątkowych przypadkach opłaty, telefonujący do pomocy technicznej mogą zostać anulowane, jeśli pomocy technicznej dla systemu Microsoft Dynamics i produktów powiązanych Określa, że określonej aktualizacji, można rozwiązać swój problem. Koszty obsługi zwykłych zastosuje się do dodatkowych pytań i problemów, których nie można rozwiązać przy użyciu określonej aktualizacji.
Informacje dotyczące instalacji
Firma Microsoft podaje przykłady programowania wyłącznie, bez jakichkolwiek gwarancji wyrażonych wprost lub domyślnie. To obejmuje, ale nie jest ograniczona, ustawowej rękojmi co do przydatności handlowej lub przydatności do określonego celu. W tym artykule założono, że użytkownik zna demonstrowany język programowania oraz narzędzia, które są używane do tworzenia i debugowania procedur. Wykwalifikowani pracownicy pomocy technicznej firmy Microsoft mogą pomóc w wyjaśnieniu, jak działa określona procedura. Nie będą jednak modyfikować tych przykładów ani dodawać funkcjonalności i konstruować procedur w celu zaspokojenia określonych potrzeb użytkownika.
Uwaga Przed zainstalowaniem tej poprawki należy zweryfikować, że wszyscy użytkownicy klienta systemu Microsoft Dynamics NAV są wylogowani systemu. Obejmuje to usług systemu Microsoft Dynamics NAV aplikacji serwera (NAS). Powinny być użytkownika klienta, który jest zalogowany w momencie wdrożyć tę poprawkę.
Aby wdrożyć tę poprawkę, musi mieć licencję deweloperską.
Firma Microsoft zaleca, aby do konta użytkownika w oknie identyfikatorów logowania systemu Windows lub w oknie identyfikatorów logowania bazy danych być przypisany identyfikator roli "SUPER". Jeśli konto użytkownika nie można przypisać Identyfikatora roli "SUPER", należy sprawdzić, czy konto użytkownika ma następujące uprawnienia:
-
Uprawnienie Modyfikacja dla obiektu, który będzie zmieniany.
-
Uprawnienie Execute obiektu 5210 identyfikator obiektu systemu i 9015 identyfikator obiektu systemu
obiekt.
Uwaga Nie trzeba mieć prawa do magazynów danych, chyba że konieczne jest przeprowadzenie naprawy danych.
Zmiany kodu
Uwaga Zawsze test poprawki kodu w kontrolowanym środowisku przed zastosowaniem poprawki na komputerach produkcyjnych.
Aby rozwiązać ten problem, wykonaj następujące kroki:
-
Zmień kod w 1 numer elementu danych w magazynie odbiór niezafakturowane raportu (10540) w następujący sposób:
Istniejący kod...CurrReport.CREATETOTALS("Value Entry"."Cost Amount (Actual)","Value Entry"."Invoiced Quantity");
// GB1004.begin
// Delete the following lines.
TotalSum1 := 0;
TotalSum2 := 0;
TotalSum3 := 0;
TotalSum4 := 0;
TotalSum5 := 0;
// End of the deleted lines.
// GB1004.end
END;
...Kod zastępczy
...CurrReport.CREATETOTALS("Value Entry"."Cost Amount (Actual)","Value Entry"."Invoiced Quantity");
// GB1004.begin
// Add the following lines.
ItemReceivedQtyTotal := 0;
ItemInvoicedQtyTotal := 0;
ItemCostAmtExpectedTotal := 0;
ValueCostAmtActualTotal := 0;
ValueInvoicedQtyTotal := 0;
// End of the added lines.
// GB1004.end
END;
... -
Zmień kod w sekcjach 1 numer elementu danych w magazynie odbiór niezafakturowane raportu (10540) w następujący sposób:
Istniejący kod 1...SourceExpr=USERID;
DataSetFieldName=USERID }
// Delete the following lines.
{ 1040092;TextBox ;15000;1692 ;150 ;423 ;Name=Sum1;
Visible=No;
ForeColor=65535;
SourceExpr=Sum1;
DataSetFieldName=Sum1 }
{ 1040094;TextBox ;15600;1692 ;150 ;423 ;Name=Sum5;
Visible=No;
ForeColor=65535;
SourceExpr=Sum5;
DataSetFieldName=Sum5 }
{ 1040095;TextBox ;15450;1692 ;150 ;423 ;Name=Sum4;
Visible=No;
ForeColor=65535;
SourceExpr=Sum4;
DataSetFieldName=Sum4 }
{ 1040096;TextBox ;15150;1692 ;150 ;423 ;Name=Sum2;
Visible=No;
ForeColor=65535;
SourceExpr=Sum2;
DataSetFieldName=Sum2 }
{ 1040097;TextBox ;15300;1692 ;150 ;423 ;Name=Sum3;
Visible=No;
ForeColor=65535;
SourceExpr=Sum3;
DataSetFieldName=Sum3 }
// End of the deleted lines.
}
}
...Kod zastępczy 1
...SourceExpr=USERID;
DataSetFieldName=USERID }
// Add the following lines.
{ 1040092;TextBox ;15000;1692 ;150 ;423 ;Name=ItemReceivedQty;
Visible=No;
ForeColor=65535;
SourceExpr=ItemReceivedQty;
DataSetFieldName=ItemReceivedQty }
{ 1040094;TextBox ;15600;1692 ;150 ;423 ;Name=ValueInvoicedQty;
Visible=No;
ForeColor=65535;
SourceExpr=ValueInvoicedQty;
DataSetFieldName=ValueInvoicedQty }
{ 1040095;TextBox ;15450;1692 ;150 ;423 ;Name=ValueCostAmtActual;
Visible=No;
ForeColor=65535;
SourceExpr=ValueCostAmtActual;
DataSetFieldName=ValueCostAmtActual }
{ 1040096;TextBox ;15150;1692 ;150 ;423 ;Name=ItemInvoicedQty;
Visible=No;
ForeColor=65535;
SourceExpr=ItemInvoicedQty;
DataSetFieldName=ItemInvoicedQty }
{ 1040097;TextBox ;15300;1692 ;150 ;423 ;Name=ItemCostAmtExpected;
Visible=No;
ForeColor=65535;
SourceExpr=ItemCostAmtExpected;
DataSetFieldName=ItemCostAmtExpected }
// End of the added lines.
}
}Istniejący kod 2
...{ 1040046;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Delete the following line.
SourceExpr="Item Ledger Entry".Quantity - "Item Ledger Entry"."Invoiced Quantity";
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040033;TextBox ;9150 ;0 ;1800 ;423 ;FontBold=Yes;Kod zastępczy 2
...{ 1040046;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Add the following line.
SourceExpr="Item Ledger Entry".Quantity - "Value Entry"."Invoiced Quantity";
// End of the added line.
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040033;TextBox ;9150 ;0 ;1800 ;423 ;FontBold=Yes;
...Istniejący kod 3
...DataSetFieldName=Item_Ledger_Entry__Quantity }
{ 1040038;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Delete the following line.
SourceExpr="Item Ledger Entry"."Invoiced Quantity";
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040039;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Kod zastępczy 3
...DataSetFieldName=Item_Ledger_Entry__Quantity }
{ 1040038;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Add the following line.
SourceExpr="Value Entry"."Invoiced Quantity";
// End of the added line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040039;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Istniejący kod 4
...{ 1040059;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Delete the following line.
SourceExpr="Item Ledger Entry"."Cost Amount (Expected)";
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual__ }
{ 1040064;TextBox ;15000;0 ;1500 ;423 ;FontBold=Yes;
...Kod zastępczy 4
...{ 1040059;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Add the following line.
SourceExpr="Item Ledger Entry"."Cost Amount (Expected)" - "Value Entry"."Cost Amount (Actual)";
// End of the added line.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual__ }
{ 1040064;TextBox ;15000;0 ;1500 ;423 ;FontBold=Yes;
...Istniejący kod 5
...FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Delete the following line.
SourceExpr="Item Ledger Entry".Quantity - "Item Ledger Entry"."Invoiced Quantity";
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040065 }
{ 1040066;TextBox ;9150 ;423 ;1800 ;423 ;FontSize=7;
...Kod zastępczy 5
...FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Add the following line.
SourceExpr="Item Ledger Entry".Quantity - "Value Entry"."Invoiced Quantity";
// End of the added line.
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040065 }
{ 1040066;TextBox ;9150 ;423 ;1800 ;423 ;FontSize=7;
...Istniejący kod 6
...{ 1040067;TextBox ;11100;423 ;1800 ;423 ;FontSize=7;
FontBold=Yes;
// Delete the following line.
SourceExpr="Item Ledger Entry"."Invoiced Quantity";
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity__Control1040067 }
{ 1040068;TextBox ;13050;423 ;1800 ;423 ;FontSize=7;
...Kod zastępczy 6
...{ 1040067;TextBox ;11100;423 ;1800 ;423 ;FontSize=7;
FontBold=Yes;
// Add the following line.
SourceExpr="Value Entry"."Invoiced Quantity";
// End of the added line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity__Control1040067 }
{ 1040068;TextBox ;13050;423 ;1800 ;423 ;FontSize=7;
...Istniejący kod 7
...FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Delete the following line.
SourceExpr="Item Ledger Entry"."Cost Amount (Expected)";
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040069 }
{ 1040070;TextBox ;15000;423 ;1500 ;423 ;FontSize=7;
...Kod zastępczy 7
...FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Add the following line.
SourceExpr="Item Ledger Entry"."Cost Amount (Expected)" - "Value Entry"."Cost Amount (Actual)";
// End of the added line.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040069 }
{ 1040070;TextBox ;15000;423 ;1500 ;423 ;FontSize=7;
...Istniejący kod 8
...CaptionML=ENU=Total;
DataSetFieldName=TotalCaption }
// Delete the following lines.
{ 1040100;TextBox ;600 ;0 ;150 ;423 ;Name=TotalSum5;
Visible=No;
ForeColor=65535;
SourceExpr=TotalSum5;
DataSetFieldName=TotalSum5 }
{ 1040101;TextBox ;450 ;0 ;150 ;423 ;Name=TotalSum4;
Visible=No;
ForeColor=65535;
SourceExpr=TotalSum4;
DataSetFieldName=TotalSum4 }
{ 1040102;TextBox ;150 ;0 ;150 ;423 ;Name=TotalSum2;
Visible=No;
ForeColor=65535;
SourceExpr=TotalSum2;
DataSetFieldName=TotalSum2 }
{ 1040103;TextBox ;300 ;0 ;150 ;423 ;Name=TotalSum3;
Visible=No;
ForeColor=65535;
SourceExpr=TotalSum3;
DataSetFieldName=TotalSum3 }
{ 1040104;TextBox ;0 ;0 ;150 ;423 ;Name=TotalSum1;
Visible=No;
ForeColor=65535;
SourceExpr=TotalSum1;
DataSetFieldName=TotalSum1 }
// End of the deleted lines.
}
}
...Kod zastępczy 8
...CaptionML=ENU=Total;
DataSetFieldName=TotalCaption }
// Add the following lines.
{ 1040100;TextBox ;600 ;0 ;150 ;423 ;Name=ValueInvoicedQtyTotal;
Visible=No;
ForeColor=65535;
SourceExpr=ValueInvoicedQtyTotal;
DataSetFieldName=ValueInvoicedQtyTotal }
{ 1040101;TextBox ;450 ;0 ;150 ;423 ;Name=ValueCostAmtActualTotal;
Visible=No;
ForeColor=65535;
SourceExpr=ValueCostAmtActualTotal;
DataSetFieldName=ValueCostAmtActualTotal }
{ 1040102;TextBox ;150 ;0 ;150 ;423 ;Name=ItemInvoicedQtyTotal;
Visible=No;
ForeColor=65535;
SourceExpr=ItemInvoicedQtyTotal;
DataSetFieldName=ItemInvoicedQtyTotal }
{ 1040103;TextBox ;300 ;0 ;150 ;423 ;Name=ItemCostAmtExpectedTotal;
Visible=No;
ForeColor=65535;
SourceExpr=ItemCostAmtExpectedTotal;
DataSetFieldName=ItemCostAmtExpectedTotal }
{ 1040104;TextBox ;0 ;0 ;150 ;423 ;Name=ItemReceivedQtyTotal;
Visible=No;
ForeColor=65535;
SourceExpr=ItemReceivedQtyTotal;
DataSetFieldName=ItemReceivedQtyTotal }
// End of the added lines.
}
} -
Zmień kod w 2 numer elementu danych w magazynie odbiór niezafakturowane raportu (10540) w następujący sposób:
Istniejący kod 1...DataItemTable=Table32;
DataItemTableView=SORTING(Item No.,Positive,Completely Invoiced,Last Invoice Date,Location Code,Variant Code)
// Delete the following lines.
WHERE(Completely Invoiced=CONST(No),
Entry Type=CONST(Purchase));
// End of the deleted lines.
OnPreDataItem=BEGIN
IF EndDate <> 0D THEN
...Kod zastępczy 1
...DataItemTable=Table32;
DataItemTableView=SORTING(Item No.,Positive,Completely Invoiced,Last Invoice Date,Location Code,Variant Code)
// Add the following line.
WHERE(Entry Type=CONST(Purchase));
// End of the added line.
OnPreDataItem=BEGIN
IF EndDate <> 0D THEN
...Istniejący kod 2
...SETRANGE("Posting Date",0D,EndDate);
// GB1004.begin
// Delete the following lines.
Sum1 := 0;
Sum2 := 0;
Sum3 := 0;
Sum4 := 0;
Sum5 := 0;
// End of the deleted lines.
// GB1004.end
END;
...Kod zastępczy 2
...SETRANGE("Posting Date",0D,EndDate);
// GB1004.begin
// Add the following lines.
ItemReceivedQty := 0;
ItemInvoicedQty := 0;
ItemCostAmtExpected := 0;
ValueCostAmtActual := 0;
ValueInvoicedQty := 0;
// End of the added lines.
// GB1004.end
END;
...Istniejący kod 3
...CurrReport.CREATETOTALS("Value Entry"."Cost Amount (Actual)","Value Entry"."Invoiced Quantity");
// GB1004.begin
// Delete the following lines.
Sum1 += Quantity;
Sum2 += "Invoiced Quantity";
Sum3 += "Cost Amount (Expected)";
TotalSum1 += Quantity;
TotalSum2 += "Invoiced Quantity";
TotalSum3 += "Cost Amount (Expected)";
// End of the deleted lines.
// GB1004.end
END;
...Kod zastępczy 3
...CurrReport.CREATETOTALS("Value Entry"."Cost Amount (Actual)","Value Entry"."Invoiced Quantity");
// GB1004.begin
// Add the following lines.
ItemReceivedQty += Quantity;
ItemInvoicedQty += "Invoiced Quantity";
ItemCostAmtExpected += "Cost Amount (Expected)";
ItemReceivedQtyTotal += Quantity;
ItemInvoicedQtyTotal += "Invoiced Quantity";
ItemCostAmtExpectedTotal += "Cost Amount (Expected)";
// End of the added lines.
// GB1004.end
END;
... -
Zmień kod w sekcjach 2 numer elementu danych w magazynie odbiór niezafakturowane raportu (10540) w następujący sposób:
Istniejący kod 1...DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry__Quantity }
{ 1040075;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Delete the following line.
SourceExpr="Item Ledger Entry"."Invoiced Quantity";
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040076;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Kod zastępczy 1
...DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry__Quantity }
{ 1040075;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Add the following line.
SourceExpr="Value Entry"."Invoiced Quantity";
// End of the added line.
DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040076;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Istniejący kod 2
...{ 1040080;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Quantity;
// Delete the following lines.
SourceExpr="Item Ledger Entry".Quantity - "Item Ledger Entry"."Invoiced Quantity";
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040080 }
{ 1040081;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Cost;
SourceExpr="Item Ledger Entry"."Cost Amount (Expected)";
// End of the deleted lines.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040081 }
{ 1040078;TextBox ;18000;0 ;150 ;423 ;Name=NoOfItems;
...Kod zastępczy 2
...{ 1040080;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Quantity;
// Add the following lines.
SourceExpr="Item Ledger Entry".Quantity - "Value Entry"."Invoiced Quantity";
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040080 }
{ 1040081;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Cost;
SourceExpr="Item Ledger Entry"."Cost Amount (Expected)" - "Value Entry"."Cost Amount (Actual)";
// End of the added lines.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040081 }
{ 1040078;TextBox ;18000;0 ;150 ;423 ;Name=NoOfItems;
... -
Zmień kod w 3 numer elementu danych w magazynie odbiór niezafakturowane raportu (10540) w następujący sposób:
Istniejący kod 1...Expected Cost=CONST(No));
OnPreDataItem=BEGIN
CurrReport.CREATETOTALS("Cost Amount (Actual)","Invoiced Quantity");
END;
...Kod zastępczy 1
...Expected Cost=CONST(No));
OnPreDataItem=BEGIN
// Add the following lines.
IF EndDate <> 0D THEN
SETRANGE("Posting Date",0D,EndDate);
SETFILTER("Invoiced Quantity",'<>%1',0);
// End of the added lines.
CurrReport.CREATETOTALS("Cost Amount (Actual)","Invoiced Quantity");
END;
...Istniejący kod 2
...OnAfterGetRecord=BEGIN
// GB1004.begin
// Delete the following lines.
Sum4 += "Cost Amount (Actual)";
Sum5 += "Invoiced Quantity";
TotalSum4 += "Cost Amount (Actual)";
TotalSum5 += "Invoiced Quantity";
// End of the deleted lines.
// GB1004.end
END;
...Kod zastępczy 2
...OnAfterGetRecord=BEGIN
// GB1004.begin
// Add the following lines.
ValueCostAmtActual += "Cost Amount (Actual)";
ValueInvoicedQty += "Invoiced Quantity";
ValueCostAmtActualTotal += "Cost Amount (Actual)";
ValueInvoicedQtyTotal += "Invoiced Quantity";
// End of the added lines.
// GB1004.end
END;
... -
Zmień kod w sekcji 4 numeru elementu danych w magazynie odbiór niezafakturowane raportu (10540) w następujący sposób:
Istniejący kod 1...DataSetFieldName=Item_Ledger_Entry__Quantity_Control1040032 }
{ 1040034;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Delete the following line.
SourceExpr="Item Ledger Entry"."Invoiced Quantity";
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity__Control1040034 }
{ 1040035;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Kod zastępczy 1
...DataSetFieldName=Item_Ledger_Entry__Quantity_Control1040032 }
{ 1040034;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Add the following line.
SourceExpr="Value Entry"."Invoiced Quantity";
// End of the added line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity__Control1040034 }
{ 1040035;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Istniejący kod 2
...{ 1040040;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Quantity;
// Delete the following lines.
SourceExpr="Item Ledger Entry".Quantity - "Item Ledger Entry"."Invoiced Quantity";
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040040 }
{ 1040058;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Cost;
SourceExpr="Item Ledger Entry"."Cost Amount (Expected)";
// End of the deleted lines.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040058 }
{ 1040082;TextBox ;5400 ;0 ;150 ;423 ;Name=ItemTotal.Number;
...Kod zastępczy 2
...{ 1040040;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Quantity;
// Add the following lines.
SourceExpr="Item Ledger Entry".Quantity - "Value Entry"."Invoiced Quantity";
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040040 }
{ 1040058;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Cost;
SourceExpr="Item Ledger Entry"."Cost Amount (Expected)" - "Value Entry"."Cost Amount (Actual)";
// End of the added lines.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040058 }
{ 1040082;TextBox ;5400 ;0 ;150 ;423 ;Name=ItemTotal.Number;
... -
Zmień kod w zmiennych globalnych w magazynie odbiór niezafakturowane raportu (10540) w następujący sposób:
Istniejący kod 1...Text1040005@1040005 : TextConst 'ENU=Received not invoiced for item';
NoOfItems@1040006 : Integer;
// Delete the following lines.
Sum1@1040007 : Decimal;
Sum2@1040008 : Decimal;
Sum3@1040009 : Decimal;
Sum4@1040010 : Decimal;
Sum5@1040011 : Decimal;
TotalSum1@1040012 : Decimal;
TotalSum2@1040013 : Decimal;
TotalSum3@1040014 : Decimal;
TotalSum4@1040015 : Decimal;
TotalSum5@1040016 : Decimal;
// End of the deleted lines.
BEGIN
...Kod zastępczy 1
...Text1040005@1040005 : TextConst 'ENU=Received not invoiced for item';
NoOfItems@1040006 : Integer;
// Add the following lines.
ItemReceivedQty@1040007 : Decimal;
ItemInvoicedQty@1040008 : Decimal;
ItemCostAmtExpected@1040009 : Decimal;
ValueCostAmtActual@1040010 : Decimal;
ValueInvoicedQty@1040011 : Decimal;
ItemReceivedQtyTotal@1040012 : Decimal;
ItemInvoicedQtyTotal@1040013 : Decimal;
ItemCostAmtExpectedTotal@1040014 : Decimal;
ValueCostAmtActualTotal@1040015 : Decimal;
ValueInvoicedQtyTotal@1040016 : Decimal;
// End of the added lines.
BEGIN
...Istniejący kod 2
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!TotalSum1.Value) - Last(Fields!TotalSum2.Value)</Value>
// End of the deleted line.
<ZIndex>40</ZIndex>
</Textbox>
...Kod zastępczy 2
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemReceivedQtyTotal.Value) - Last(Fields!ValueInvoicedQtyTotal.Value)</Value>
// End of the added line.
<ZIndex>40</ZIndex>
</Textbox>
...Istniejący kod 3
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!TotalSum3.Value) - Last(Fields!TotalSum4.Value)</Value>
// End of the deleted line.
<ZIndex>39</ZIndex>
</Textbox>
...Kod zastępczy 3
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemCostAmtExpectedTotal.Value) - Last(Fields!ValueCostAmtActualTotal.Value)</Value>
// End of the added line.
<ZIndex>39</ZIndex>
</Textbox>
...Istniejący kod 4
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!TotalSum1.Value)</Value>
// End of the deleted line.
<ZIndex>38</ZIndex>
</Textbox>
...Kod zastępczy 4
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemReceivedQtyTotal.Value)</Value>
// End of the added line.
<ZIndex>38</ZIndex>
</Textbox>
...Istniejący kod 5
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!TotalSum2.Value)</Value>
// End of the deleted line.
<ZIndex>37</ZIndex>
</Textbox>
...Kod zastępczy 5
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ValueInvoicedQtyTotal.Value)</Value>
// End of the added line.
<ZIndex>37</ZIndex>
</Textbox>
...Istniejący kod 6
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!TotalSum3.Value)</Value>
// End of the deleted line.
<ZIndex>36</ZIndex>
</Textbox>
...Kod zastępczy 6
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemCostAmtExpectedTotal.Value)</Value>
// End of the added line.
<ZIndex>36</ZIndex>
</Textbox>
...Istniejący kod 7
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum1.Value) - Last(Fields!Sum2.Value)</Value>
// End of the deleted line.
<ZIndex>13</ZIndex>
</Textbox>
...Kod zastępczy 7
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemReceivedQty.Value) - Last(Fields!ValueInvoicedQty.Value)</Value>
// End of the added line.
<ZIndex>13</ZIndex>
</Textbox>
...Istniejący kod 8
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum3.Value) - Last(Fields!Sum4.Value)</Value>
// End of the deleted line.
<ZIndex>12</ZIndex>
</Textbox>
...Kod zastępczy 8
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemCostAmtExpected.Value) - Last(Fields!ValueCostAmtActual.Value)</Value>
// End of the added line.
<ZIndex>12</ZIndex>
</Textbox>
...Istniejący kod 9
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum1.Value)</Value>
// End of the deleted line.
<ZIndex>11</ZIndex>
</Textbox>
...Kod zastępczy 9
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemReceivedQty.Value)</Value>
// End of the added line.
<ZIndex>11</ZIndex>
</Textbox>
...Istniejący kod 10
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum2.Value)</Value>
// End of the deleted line.
<ZIndex>10</ZIndex>
</Textbox>
...Kod zastępczy 10
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ValueInvoicedQty.Value)</Value>
// End of the added line.
<ZIndex>10</ZIndex>
</Textbox>
...Istniejący kod 11
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum3.Value)</Value>
// End of the deleted line.
<ZIndex>9</ZIndex>
</Textbox>
...Kod zastępczy 11
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemCostAmtExpected.Value)</Value>
// End of the added line.
<ZIndex>9</ZIndex>
</Textbox>
...Istniejący kod 12
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum1.Value) - Last(Fields!Sum2.Value)</Value>
// End of the deleted line.
<ZIndex>21</ZIndex>
</Textbox>
...Kod zastępczy 12
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemReceivedQty.Value) - Last(Fields!ValueInvoicedQty.Value)</Value>
// End of the added line.
<ZIndex>21</ZIndex>
</Textbox>
...Istniejący kod 13
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum3.Value) - Last(Fields!Sum4.Value)</Value>
// End of the deleted line.
<ZIndex>20</ZIndex>
</Textbox>
...Kod zastępczy 13
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemCostAmtExpected.Value) - Last(Fields!ValueCostAmtActual.Value)</Value>
// End of the added line.
<ZIndex>20</ZIndex>
</Textbox>
...Istniejący kod 14
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum1.Value)</Value>
// End of the deleted line.
<ZIndex>19</ZIndex>
</Textbox>
...Kod zastępczy 14
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemReceivedQty.Value)</Value>
// End of the added line.
<ZIndex>19</ZIndex>
</Textbox>
...Istniejący kod 15
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum2.Value)</Value>
// End of the deleted line.
<ZIndex>18</ZIndex>
</Textbox>
...Kod zastępczy 15
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ValueInvoicedQty.Value)</Value>
// End of the added line.
<ZIndex>18</ZIndex>
</Textbox>
...Istniejący kod 16
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum3.Value)</Value>
// End of the deleted line.
<ZIndex>17</ZIndex>
</Textbox>
...Kod zastępczy 16
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemCostAmtExpected.Value)</Value>
// End of the added line.
<ZIndex>17</ZIndex>
</Textbox>
...Istniejący kod 17
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum1.Value) - Last(Fields!Sum2.Value)</Value>
// End of the deleted line.
<ZIndex>30</ZIndex>
</Textbox>
...Kod zastępczy 17
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemReceivedQty.Value) - Last(Fields!ValueInvoicedQty.Value)</Value>
// End of the added line.
<ZIndex>30</ZIndex>
</Textbox>
...Istniejący kod 18
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum3.Value) - Last(Fields!Sum4.Value)</Value>
// End of the deleted line.
<ZIndex>29</ZIndex>
</Textbox>
...Kod zastępczy 18
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemCostAmtExpected.Value) - Last(Fields!ValueCostAmtActual.Value)</Value>
// End of the added line.
<ZIndex>29</ZIndex>
</Textbox>
...Istniejący kod 19
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum1.Value)</Value>
// End of the deleted line.
<ZIndex>28</ZIndex>
</Textbox>
...Kod zastępczy 19
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemReceivedQty.Value)</Value>
// End of the added line.
<ZIndex>28</ZIndex>
</Textbox>
...Istniejący kod 20
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum2.Value)</Value>
// End of the deleted line.
<ZIndex>27</ZIndex>
</Textbox>
...Kod zastępczy 20
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ValueInvoicedQty.Value)</Value>
// End of the added line.
<ZIndex>27</ZIndex>
</Textbox>
...Istniejący kod 21
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Delete the following line.
<Value>=Last(Fields!Sum3.Value)</Value>
// End of the deleted line.
<ZIndex>26</ZIndex>
</Textbox>
...Kod zastępczy 21
...<VerticalAlign>Middle</VerticalAlign>
</Style>
// Add the following line.
<Value>=Last(Fields!ItemCostAmtExpected.Value)</Value>
// End of the added line.
<ZIndex>26</ZIndex>
</Textbox>
...Istniejący kod 22
...<DataField>USERID</DataField>
</Field>
// Delete the following lines.
<Field Name="Sum1">
<DataField>Sum1</DataField>
</Field>
<Field Name="Sum1Format">
<DataField>Sum1Format</DataField>
</Field>
<Field Name="Sum5">
<DataField>Sum5</DataField>
</Field>
<Field Name="Sum5Format">
<DataField>Sum5Format</DataField>
</Field>
<Field Name="Sum4">
<DataField>Sum4</DataField>
</Field>
<Field Name="Sum4Format">
<DataField>Sum4Format</DataField>
</Field>
<Field Name="Sum2">
<DataField>Sum2</DataField>
</Field>
<Field Name="Sum2Format">
<DataField>Sum2Format</DataField>
</Field>
<Field Name="Sum3">
<DataField>Sum3</DataField>
</Field>
<Field Name="Sum3Format">
<DataField>Sum3Format</DataField>
// End of the deleted lines.
</Field>
<Field Name="Totals__Rec__not_invoiced_Caption">
...Kod zastępczy 22
...<DataField>USERID</DataField>
</Field>
// Add the following lines.
<Field Name="ItemReceivedQty">
<DataField>ItemReceivedQty</DataField>
</Field>
<Field Name="ItemReceivedQtyFormat">
<DataField>ItemReceivedQtyFormat</DataField>
</Field>
<Field Name="ValueInvoicedQty">
<DataField>ValueInvoicedQty</DataField>
</Field>
<Field Name="ValueInvoicedQtyFormat">
<DataField>ValueInvoicedQtyFormat</DataField>
</Field>
<Field Name="ValueCostAmtActual">
<DataField>ValueCostAmtActual</DataField>
</Field>
<Field Name="ValueCostAmtActualFormat">
<DataField>ValueCostAmtActualFormat</DataField>
</Field>
<Field Name="ItemInvoicedQty">
<DataField>ItemInvoicedQty</DataField>
</Field>
<Field Name="ItemInvoicedQtyFormat">
<DataField>ItemInvoicedQtyFormat</DataField>
</Field>
<Field Name="ItemCostAmtExpected">
<DataField>ItemCostAmtExpected</DataField>
</Field>
<Field Name="ItemCostAmtExpectedFormat">
<DataField>ItemCostAmtExpectedFormat</DataField>
// End of the added lines.
</Field>
<Field Name="Totals__Rec__not_invoiced_Caption">
...Istniejący kod 23
...<DataField>TotalCaption</DataField>
</Field>
// Delete the following lines.
<Field Name="TotalSum5">
<DataField>TotalSum5</DataField>
</Field>
<Field Name="TotalSum5Format">
<DataField>TotalSum5Format</DataField>
</Field>
<Field Name="TotalSum4">
<DataField>TotalSum4</DataField>
</Field>
<Field Name="TotalSum4Format">
<DataField>TotalSum4Format</DataField>
</Field>
<Field Name="TotalSum2">
<DataField>TotalSum2</DataField>
</Field>
<Field Name="TotalSum2Format">
<DataField>TotalSum2Format</DataField>
</Field>
<Field Name="TotalSum3">
<DataField>TotalSum3</DataField>
</Field>
<Field Name="TotalSum3Format">
<DataField>TotalSum3Format</DataField>
</Field>
<Field Name="TotalSum1">
<DataField>TotalSum1</DataField>
</Field>
<Field Name="TotalSum1Format">
<DataField>TotalSum1Format</DataField>
// End of the deleted lines.
</Field>
<Field Name="Item_Ledger_Entry__Posting_Date_">
...Kod zastępczy 23
...<DataField>TotalCaption</DataField>
</Field>
// Add the following lines.
<Field Name="ValueInvoicedQtyTotal">
<DataField>ValueInvoicedQtyTotal</DataField>
</Field>
<Field Name="ValueInvoicedQtyTotalFormat">
<DataField>ValueInvoicedQtyTotalFormat</DataField>
</Field>
<Field Name="ValueCostAmtActualTotal">
<DataField>ValueCostAmtActualTotal</DataField>
</Field>
<Field Name="ValueCostAmtActualTotalFormat">
<DataField>ValueCostAmtActualTotalFormat</DataField>
</Field>
<Field Name="ItemInvoicedQtyTotal">
<DataField>ItemInvoicedQtyTotal</DataField>
</Field>
<Field Name="ItemInvoicedQtyTotalFormat">
<DataField>ItemInvoicedQtyTotalFormat</DataField>
</Field>
<Field Name="ItemCostAmtExpectedTotal">
<DataField>ItemCostAmtExpectedTotal</DataField>
</Field>
<Field Name="ItemCostAmtExpectedTotalFormat">
<DataField>ItemCostAmtExpectedTotalFormat</DataField>
</Field>
<Field Name="ItemReceivedQtyTotal">
<DataField>ItemReceivedQtyTotal</DataField>
</Field>
<Field Name="ItemReceivedQtyTotalFormat">
<DataField>ItemReceivedQtyTotalFormat</DataField>
// End of the added lines.
</Field>
<Field Name="Item_Ledger_Entry__Posting_Date_">
... -
Zmień kod w sekcji 1 numer elementu danych w magazynie wydane niezafakturowane raportu (10541) w następujący sposób:
Istniejący kod 1...{ 1040046;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Delete the following line.
SourceExpr=ItemQuantity;
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040033;TextBox ;9150 ;0 ;1800 ;423 ;FontBold=Yes;
...Kod zastępczy 1
...{ 1040046;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Add the following line.
SourceExpr=ItemShippedQty - ValueInvoicedQty;
// End of the added line.
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040033;TextBox ;9150 ;0 ;1800 ;423 ;FontBold=Yes;
...Istniejący kod 2
...DataSetFieldName=Item_Ledger_Entry__Quantity }
{ 1040038;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Delete the following line.
SourceExpr=ItemInvoicedQty;
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040039;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Kod zastępczy 2
...DataSetFieldName=Item_Ledger_Entry__Quantity }
{ 1040038;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Add the following line.
SourceExpr=ValueInvoicedQty;
// End of the added line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040039;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Istniejący kod 3
...{ 1040059;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Delete the following lines.
SourceExpr=ItemCostAmount;
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual__ }
{ 1040064;TextBox ;15000;0 ;1500 ;423 ;FontBold=Yes;
SourceExpr="Value Entry"."Invoiced Quantity";
// End of the deleted lines.
DataSetFieldName=Value_Entry___Invoiced_Quantity_ }
}Kod zastępczy 3
...{ 1040059;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Add the following lines.
SourceExpr=ItemCostAmtExpected - ValueCostAmtActual;
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual__ }
{ 1040064;TextBox ;15000;0 ;1500 ;423 ;FontBold=Yes;
SourceExpr=-"Value Entry"."Invoiced Quantity";
// End of the added lines.
DataSetFieldName=Value_Entry___Invoiced_Quantity_ }
}Istniejący kod 4
...FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Delete the following line.
SourceExpr=ItemQuantityTotal;
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040065 }
{ 1040066;TextBox ;9150 ;423 ;1800 ;423 ;FontSize=7;
...Kod zastępczy 4
...FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Add the following line.
SourceExpr=ItemShippedQtyTotal - ValueInvoicedQtyTotal;
// End of the added line.
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040065 }
{ 1040066;TextBox ;9150 ;423 ;1800 ;423 ;FontSize=7;
...Istniejący kod 5
...{ 1040067;TextBox ;11100;423 ;1800 ;423 ;FontSize=7;
FontBold=Yes;
// Delete the following line.
SourceExpr=ItemInvoicedQtyTotal;
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity__Control1040067 }
{ 1040068;TextBox ;13050;423 ;1800 ;423 ;FontSize=7;
...Kod zastępczy 5
...{ 1040067;TextBox ;11100;423 ;1800 ;423 ;FontSize=7;
FontBold=Yes;
// Add the following line.
SourceExpr=ValueInvoicedQtyTotal;
// End of the added line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity__Control1040067 }
{ 1040068;TextBox ;13050;423 ;1800 ;423 ;FontSize=7;
...Istniejący kod 6
...FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Delete the following lines.
SourceExpr=ItemCostAmountTotal;
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040069 }
{ 1040070;TextBox ;15000;423 ;1500 ;423 ;FontSize=7;
FontBold=Yes;
SourceExpr="Value Entry"."Invoiced Quantity";
// End of the deleted lines.
DataSetFieldName=Value_Entry___Invoiced_Quantity__Control1040070 }
{ 1040071;TextBox ;16650;423 ;1500 ;423 ;FontSize=7;
...Kod zastępczy 6
...FontBold=Yes;
CaptionML=ENU=Rec. not invoiced;
// Add the following lines.
SourceExpr=ItemCostAmtExpectedTotal - ValueCostAmtActualTotal;
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040069 }
{ 1040070;TextBox ;15000;423 ;1500 ;423 ;FontSize=7;
FontBold=Yes;
SourceExpr=-"Value Entry"."Invoiced Quantity";
// End of the added lines.
DataSetFieldName=Value_Entry___Invoiced_Quantity__Control1040070 }
{ 1040071;TextBox ;16650;423 ;1500 ;423 ;FontSize=7;
... -
Zmień kod w 2 numer elementu danych w magazynie wydane niezafakturowane raportu (10541) w następujący sposób:
Istniejący kod 1...DataItemTable=Table32;
DataItemTableView=SORTING(Item No.,Positive,Completely Invoiced,Last Invoice Date,Location Code,Variant Code)
// Delete the following lines.
WHERE(Completely Invoiced=CONST(No),
Entry Type=CONST(Sale));
// End of the deleted lines.
OnPreDataItem=BEGIN
// GB0004.begin
...Kod zastępczy 1
...DataItemTable=Table32;
DataItemTableView=SORTING(Item No.,Positive,Completely Invoiced,Last Invoice Date,Location Code,Variant Code)
// Add the following line.
WHERE(Entry Type=CONST(Sale));
// End of the added line.
OnPreDataItem=BEGIN
// GB0004.begin
...Istniejący kod 2
...// GB0004.end
// Delete the following line.
ItemQuantity := 0;
// End of the deleted line.
ItemCostAmount := 0;
ItemShippedQty := 0;
...Kod zastępczy 2
...// GB0004.end
ItemCostAmount := 0;
ItemShippedQty := 0;
...Istniejący kod 3
...ItemInvoicedQty := 0;
ItemCostAmtExpected := 0;
END;
...Kod zastępczy 3
...ItemInvoicedQty := 0;
ItemCostAmtExpected := 0;
// Add the following lines.
ValueInvoicedQty := 0;
ValueCostAmtActual := 0;
// End of the added lines.
END;
...Istniejący kod 4
...CurrReport.CREATETOTALS("Value Entry"."Cost Amount (Actual)","Value Entry"."Invoiced Quantity");
// Delete the following lines.
ItemQuantity += Quantity - "Invoiced Quantity";
ItemCostAmount += "Cost Amount (Expected)";
ItemShippedQty += Quantity;
ItemInvoicedQty += "Invoiced Quantity";
ItemCostAmtExpected += "Cost Amount (Expected)";
ItemQuantityTotal += Quantity - "Invoiced Quantity";
ItemCostAmountTotal += "Cost Amount (Expected)";
ItemShippedQtyTotal += Quantity;
ItemInvoicedQtyTotal += "Invoiced Quantity";
// End of the deleted lines.
ItemCostAmtExpectedTotal += "Cost Amount (Expected)";
END;
...Kod zastępczy 4
...CurrReport.CREATETOTALS("Value Entry"."Cost Amount (Actual)","Value Entry"."Invoiced Quantity");
// Add the following lines.
ItemCostAmount += "Cost Amount (Expected)";
ItemShippedQty += -Quantity;
ItemInvoicedQty += -"Invoiced Quantity";
ItemCostAmtExpected += "Cost Amount (Expected)";
ItemCostAmountTotal += "Cost Amount (Expected)";
ItemShippedQtyTotal += -Quantity;
ItemInvoicedQtyTotal += -"Invoiced Quantity";
// End of the added lines.
ItemCostAmtExpectedTotal += "Cost Amount (Expected)";
END;
... -
Zmień kod w sekcjach 2 numer elementu danych w magazynie wydane niezafakturowane raportu (10541) w następujący sposób:
Istniejący kod 1...DataSetFieldName=Item_Ledger_Entry_Description }
{ 1040019;TextBox ;9150 ;0 ;1800 ;423 ;CaptionML=ENU=Shipped Quantity;
// Delete the following lines.
SourceExpr=Quantity;
DataSetFieldName=Item_Ledger_Entry_Quantity }
{ 1040021;TextBox ;11100;0 ;1800 ;423 ;SourceExpr="Invoiced Quantity";
// End of the deleted lines.
DataSetFieldName=Item_Ledger_Entry__Invoiced_Quantity_ }
{ 1040023;TextBox ;1350 ;0 ;600 ;423 ;SourceExpr="Source Type";
...Kod zastępczy 1
...DataSetFieldName=Item_Ledger_Entry_Description }
{ 1040019;TextBox ;9150 ;0 ;1800 ;423 ;CaptionML=ENU=Shipped Quantity;
// Add the following lines.
SourceExpr=-Quantity;
DataSetFieldName=Item_Ledger_Entry_Quantity }
{ 1040021;TextBox ;11100;0 ;1800 ;423 ;CaptionML=ENU=Invoiced Quantity;
SourceExpr=-"Invoiced Quantity";
// End of the added lines.
DataSetFieldName=Item_Ledger_Entry__Invoiced_Quantity_ }
{ 1040023;TextBox ;1350 ;0 ;600 ;423 ;SourceExpr="Source Type";
...Istniejący kod 2
...DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry__Quantity }
{ 1040075;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Delete the following line.
SourceExpr=ItemInvoicedQty;
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040076;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Kod zastępczy 2
...DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry__Quantity }
{ 1040075;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Add the following line.
SourceExpr=ValueInvoicedQty;
// End of the added line.
DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry___Invoiced_Quantity_ }
{ 1040076;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Istniejący kod 3
...{ 1040080;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Quantity;
// Delete the following lines.
SourceExpr=ItemQuantity;
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040080 }
{ 1040081;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Cost;
SourceExpr=ItemCostAmount;
// End of the deleted lines.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040081 }
}
...Kod zastępczy 3
... { 1040080;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Quantity;
// Add the following lines.
SourceExpr=ItemShippedQty - ValueInvoicedQty;
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040080 }
{ 1040081;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Cost;
SourceExpr=ItemCostAmtExpected - ValueCostAmtActual;
// End of the added lines.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040081 }
}
... -
Zmień kod w 3 numer elementu danych w magazynie wydane niezafakturowane raportu (10541) w następujący sposób:
Istniejący kod...Expected Cost=CONST(No));
OnPreDataItem=BEGIN
// Delete the following lines.
CurrReport.CREATETOTALS("Cost Amount (Actual)","Invoiced Quantity");
END;
// End of the deleted lines.
DataItemLink=Item Ledger Entry No.=FIELD(Entry No.);
...Kod zastępczy
...Expected Cost=CONST(No));
OnPreDataItem=BEGIN
// Add the following lines.
IF EndDate <> 0D THEN
SETRANGE("Posting Date",0D,EndDate);
SETFILTER("Invoiced Quantity",'<>%1',0);
CurrReport.CREATETOTALS("Cost Amount (Actual)","Invoiced Quantity");
END;
OnAfterGetRecord=BEGIN
ValueInvoicedQty += -"Invoiced Quantity";
ValueCostAmtActual += "Cost Amount (Actual)";
ValueInvoicedQtyTotal += -"Invoiced Quantity";
ValueCostAmtActualTotal += "Cost Amount (Actual)";
END;
// End of the added lines.
DataItemLink=Item Ledger Entry No.=FIELD(Entry No.);
... -
Zmień kod w sekcji 3 numer elementu danych w magazynie wydane niezafakturowane raportu (10541) w następujący sposób:
Istniejący kod...{ 1040043;TextBox ;6600 ;0 ;2250 ;423 ;SourceExpr=Description;
DataSetFieldName=Value_Entry_Description }
// Delete the following line.
{ 1040025;TextBox ;15000;0 ;1500 ;423 ;SourceExpr="Invoiced Quantity";
// End of the deleted line.
DataSetFieldName=Value_Entry__Invoiced_Quantity_ }
{ 1040027;TextBox ;16650;0 ;1500 ;423 ;SourceExpr="Cost Amount (Actual)";
...Kod zastępczy
...{ 1040043;TextBox ;6600 ;0 ;2250 ;423 ;SourceExpr=Description;
DataSetFieldName=Value_Entry_Description }
// Add the following lines.
{ 1040025;TextBox ;15000;0 ;1500 ;423 ;CaptionML=ENU=Invoiced Quantity;
SourceExpr=-"Invoiced Quantity";
// End of the added lines.
DataSetFieldName=Value_Entry__Invoiced_Quantity_ }
{ 1040027;TextBox ;16650;0 ;1500 ;423 ;SourceExpr="Cost Amount (Actual)";
... -
Zmień kod w sekcji 4 numeru elementu danych w magazynie wydane niezafakturowane raportu (10541) w następujący sposób:
Istniejący kod 1...DataSetFieldName=Item_Ledger_Entry__Quantity_Control1040032 }
{ 1040034;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Delete the following line.
SourceExpr=ItemInvoicedQty;
// End of the deleted line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity__Control1040034 }
{ 1040035;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Kod zastępczy 1
...DataSetFieldName=Item_Ledger_Entry__Quantity_Control1040032 }
{ 1040034;TextBox ;11100;0 ;1800 ;423 ;FontBold=Yes;
// Add the following line.
SourceExpr=ValueInvoicedQty;
// End of the added line.
DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity__Control1040034 }
{ 1040035;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;
...Istniejący kod 2
...DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected___Control1040035 }
{ 1040036;TextBox ;15000;0 ;1500 ;423 ;FontBold=Yes;
// Delete the following line.
SourceExpr="Value Entry"."Invoiced Quantity";
// End of the deleted line.
DataSetFieldName=Value_Entry___Invoiced_Quantity__Control1040036 }
{ 1040044;TextBox ;16650;0 ;1500 ;423 ;FontBold=Yes;
...Kod zastępczy 2
...DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected___Control1040035 }
{ 1040036;TextBox ;15000;0 ;1500 ;423 ;FontBold=Yes;
// Add the following line.
SourceExpr=-"Value Entry"."Invoiced Quantity";
// End of the added line.
DataSetFieldName=Value_Entry___Invoiced_Quantity__Control1040036 }
{ 1040044;TextBox ;16650;0 ;1500 ;423 ;FontBold=Yes;
...Istniejący kod 3
...{ 1040040;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Quantity;
// Delete the following lines.
SourceExpr=ItemQuantity;
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040040 }
{ 1040058;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Cost;
SourceExpr=ItemCostAmount;
// End of the deleted lines.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040058 }
{ 1040078;TextBox ;18000;423 ;150 ;423 ;Name=NoOfItems;
...Kod zastępczy 3
...{ 1040040;TextBox ;5700 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Quantity;
// Add the following lines.
SourceExpr=ItemShippedQty - ValueInvoicedQty;
DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040040 }
{ 1040058;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
CaptionML=ENU=Cost;
SourceExpr=ItemCostAmtExpected - ValueCostAmtActual;
// End of the added lines.
DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040058 }
{ 1040078;TextBox ;18000;423 ;150 ;423 ;Name=NoOfItems;
... -
Zmień kod w zmiennych globalnych w magazynie wydane niezafakturowane raportu (10541) w następujący sposób:
Istniejący kod 1...Text1040005@1040005 : TextConst 'ENU=Shipped not invoiced for item';
NoOfItems@1040006 : Integer;
// Delete the following line.
ItemQuantity@1040007 : Decimal;
// End of the deleted line.
ItemCostAmount@1040008 : Decimal;
ItemShippedQty@1040009 : Decimal;
...Kod zastępczy 1
...Text1040005@1040005 : TextConst 'ENU=Shipped not invoiced for item';
NoOfItems@1040006 : Integer;
ItemCostAmount@1040008 : Decimal;
ItemShippedQty@1040009 : Decimal;
...Istniejący kod 2
...ItemInvoicedQty@1040010 : Decimal;
ItemCostAmtExpected@1040011 : Decimal;
// Delete the following line.
ItemQuantityTotal@1040012 : Decimal;
// End of the deleted line.
ItemCostAmountTotal@1040013 : Decimal;
ItemShippedQtyTotal@1040014 : Decimal;
...Kod zastępczy 2
...ItemInvoicedQty@1040010 : Decimal;
ItemCostAmtExpected@1040011 : Decimal;
// Add the following lines.
ValueInvoicedQty@1040017 : Decimal;
ValueCostAmtActual@1040018 : Decimal;
// End of the added lines.
ItemCostAmountTotal@1040013 : Decimal;
ItemShippedQtyTotal@1040014 : Decimal;
...Istniejący kod 3
...ItemInvoicedQtyTotal@1040015 : Decimal;
ItemCostAmtExpectedTotal@1040016 : Decimal;
BEGIN
...Kod zastępczy 3
...ItemInvoicedQtyTotal@1040015 : Decimal;
ItemCostAmtExpectedTotal@1040016 : Decimal;
// Add the following lines.
ValueInvoicedQtyTotal@1040019 : Decimal;
ValueCostAmtActualTotal@1040020 : Decimal;
// End of the added lines.
BEGIN
...
Wymagania wstępne
Musi mieć jedną z następujących produktów, w celu zastosowania tej poprawki:
-
Polska wersja dodatku Service Pack 1 dla systemu Microsoft Dynamics NAV 2009
-
Zjednoczonym Królestwie wersję systemu Microsoft Dynamics NAV 2009 R2
Informacje dotyczące usuwania
Nie można usunąć tej poprawki.
Stan
Firma Microsoft potwierdziła, że jest to problem występujący w produktach firmy Microsoft wymienionych w sekcji „Dotyczy”.
Uwaga Jest to artykuł " szybkiej publikacji" tworzony bezpośrednio przez organizację pomocy technicznej firmy Microsoft. Informacje zawarte w niniejszym dokumencie są dostarczane jako odpowiedź na pojawiające się problemy. W wyniku przyspieszonego udostępnienia, materiały te mogą zawierać błędy typograficzne i mogą być zmieniane w dowolnym czasie bez uprzedzenia. Zobacz Warunki użytkowaniadla innych względów.
