Costul incorecte se afișează în rapoarte 10540 și 10541 în UK localizarea Microsoft Dynamics NAV 2009

Șablon: CPR - Navision cod Fix șablon

Număr eroare: 204163 (întreținere conținut)

Acest articol descrie o problemă atunci când imprimați rapoarte nu stoc primit facturată şi nu stoc livrat facturată în Marea Britanie localizarea Microsoft Dynamics NAV 2009. Această problemă survine în continuare după implementarea KB 2882942.

Urmați pașii din secțiunea modificări de cod pentru a rezolva această problemă. Această problemă se produce în următoarele produse:

  • Localizarea Marea Britanie Microsoft Dynamics NAV 2009 R2

  • Localizarea Marea Britanie Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)

Rezolvare

Informații despre remedierea rapidă

Un hotfix acceptat este acum disponibil de la Microsoft. Cu toate acestea, acesta este destinat numai corectării problemei descrise în acest articol. Aplicați-o numai pe sistemele care întâmpină această problemă anume. Această remediere rapidă poate să necesite testare suplimentară. De aceea, dacă nu sunteți grav afectat de această problemă, vă recomandăm să așteptați următorul pachet service pack Microsoft Dynamics NAV 2009 sau versiunea Microsoft Dynamics NAV următoare, care conține această remediere rapidă.

Notă În cazuri speciale, costurile implicate de obicei pentru asistență apeluri pot fi anulate dacă un specialist în asistență tehnică pentru Microsoft Dynamics și produse asociate stabilește că o anumită actualizare va rezolva problema. Se vor aplica costurile uzuale de asistenţă pentru întrebări suplimentare de asistenţă şi pentru probleme ce nu fac obiectul actualizării în cauză.

Dacă această remediere rapidă nu este publicată pentru descărcare publică (ceea ce înseamnă că un URL public pentru această remediere rapidă nu este furnizat în acest articol), distribuția necesită aprobarea manager, membru din echipa de implementare sau conducerii tehnice și se aplică următoarele informații:

  • Pentru a primi această remediere rapidă, clienții trebuie să se confrunte cu eroarea menționată în secțiunea "simptome".

  • Trebuie să urmăriți clienții să trimiteți și să le furnizați următorul pachet service pack când acesta va fi disponibil (dacă se lansează un pachet service pack).

Această remediere rapidă nu este planificată să fie inclusă într-o Microsoft Dynamics NAV Service Pack.

Informaţii despre instalare

Microsoft furnizează exemple de programare scop ilustrativ, fără nicio garanţie explicită sau implicită. Aceasta include, dar nu se limitează la, garanţiile implicite de vandabilitate sau de potrivire pentru un anumit scop. Acest articol presupune că sunteţi familiarizat cu limbajul de programare care este prezentat şi cu instrumentele utilizate pentru a crea şi a depana proceduri. Specialiștii în asistență Microsoft pot ajuta la explicarea funcționalității unei anumite proceduri. Cu toate acestea, nu vor modifica aceste exemple pentru a furniza funcționalitate suplimentară construi proceduri pentru a răspunde cerințelor dvs. specifice.

Notă Înainte de a instala această remediere rapidă, verificați dacă toți utilizatorii de client Microsoft Dynamics NAV sunt log off sistemul. Aceasta include servicii Microsoft Dynamics NAV Application Server (NAS). Ar trebui să fie singurul client utilizatorului care este conectat când implementați această remediere rapidă.

Pentru a implementa această remediere rapidă, trebuie să aveți o licență de dezvoltare.

Vă recomandăm că contul de utilizator în fereastra Conectări Windows sau în fereastra Conectări bază de date se atribuie "SUPER" rolul ID-ul. În cazul în care contul de utilizator nu poate fi atribuit ID-ul "SUPER" rolul, trebuie să verificați că contul de utilizator are următoarele permisiuni:

  • Modify permisiunea pentru obiectul care se va schimba.

  • Permisiunea de executare pentru obiectul sistem obiect ID 5210 și sistem obiect ID 9015

    obiect.

Notă Nu trebuie să aveți drepturi de la magazine de date decât dacă trebuie să efectuați o reparare de date.

Modificări de cod

Notă Întotdeauna test cod remediază într-un mediu controlat înainte de a aplica remedieri pentru computerele de producție.

Pentru a rezolva această problemă, urmați acești pași:

  1. Modificare cod în Data elementul numărul 1 secțiuni în stoc primit facturată nu raport (10540) după cum urmează:
    Cod existent 1

    ...VertAlign=Bottom;
    FontBold=Yes;
    MultiLine=Yes;
    DataSetFieldName=Item_Ledger_Entry__Cost_Amount__Expected__Caption }
    { 1040042;Label ;5700 ;0 ;1550 ;846 ;ParentControl=1040040;
    VertAlign=Bottom;
    ...

    Înlocuirea cod 1

    ...VertAlign=Bottom;
    FontBold=Yes;
    MultiLine=Yes;

    // Adding the following line.
    CaptionML=ENU=Cost Amount (Expected);
    // End of the added line.

    DataSetFieldName=Item_Ledger_Entry__Cost_Amount__Expected__Caption }
    { 1040042;Label ;5700 ;0 ;1550 ;846 ;ParentControl=1040040;
    VertAlign=Bottom;
    ...

    Cod existent 2

    ...SourceExpr="Value Entry"."Invoiced Quantity";
    DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity_ }
    { 1040039;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;

    // Deleting the following line.
    SourceExpr="Item Ledger Entry"."Cost Amount (Expected)";
    // End of the deleted line.

    DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected__ }
    { 1040045;TextBox ;0 ;0 ;5400 ;423 ;FontBold=Yes;
    SourceExpr=Text1040005 + ' ' + Item."No.";
    ...

    Înlocuirea cod 2

    ...SourceExpr="Value Entry"."Invoiced Quantity";
    DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity_ }
    { 1040039;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;

    // Adding the following line.
    SourceExpr=ItemCostAmtExpected;
    // End of the added line.

    DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected__ }
    { 1040045;TextBox ;0 ;0 ;5400 ;423 ;FontBold=Yes;
    SourceExpr=Text1040005 + ' ' + Item."No.";
    ...

    Cod existent 3

    ...DataSetFieldName=Value_Entry___Cost_Amount__Actual__ }
    { 1040059;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
    CaptionML=ENU=Rec. not invoiced;

    // Deleting the following line.
    SourceExpr="Item Ledger Entry"."Cost Amount (Expected)" - "Value Entry"."Cost Amount (Actual)";
    // 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;
    SourceExpr="Value Entry"."Invoiced Quantity";
    ...

    Înlocuirea cod 3

    ...DataSetFieldName=Value_Entry___Cost_Amount__Actual__ }
    { 1040059;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
    CaptionML=ENU=Rec. not invoiced;

    // Adding the following line.
    SourceExpr=ItemCostAmtExpected - ValueCostAmtActual;
    // 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;
    SourceExpr="Value Entry"."Invoiced Quantity";
    ...

    Cod existent 4

    ...DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity__Control1040067 }
    { 1040068;TextBox ;13050;423 ;1800 ;423 ;FontSize=7;
    FontBold=Yes;

    // Deleting the following lines.
    SourceExpr="Item Ledger Entry"."Cost Amount (Expected)";
    DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected___Control1040068 }
    { 1040069;TextBox ;7350 ;423 ;1550 ;423 ;FontSize=7;
    FontBold=Yes;
    CaptionML=ENU=Rec. not invoiced;
    SourceExpr="Item Ledger Entry"."Cost Amount (Expected)" - "Value Entry"."Cost Amount (Actual)";
    // End of the deleted lines.

    DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040069 }
    { 1040070;TextBox ;15000;423 ;1500 ;423 ;FontSize=7;
    FontBold=Yes;
    ...

    Înlocuirea cod 4

    ...DataSetFieldName=Item_Ledger_Entry___Invoiced_Quantity__Control1040067 }
    { 1040068;TextBox ;13050;423 ;1800 ;423 ;FontSize=7;
    FontBold=Yes;

    // Adding the following lines.
    SourceExpr=ItemCostAmtExpectedTotal }
    { 1040069;TextBox ;7350 ;423 ;1550 ;423 ;FontSize=7;
    FontBold=Yes;
    CaptionML=ENU=Rec. not invoiced;
    SourceExpr=ItemCostAmtExpectedTotal - ValueCostAmtActualTotal;
    // End of the added lines.

    DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040069 }
    { 1040070;TextBox ;15000;423 ;1500 ;423 ;FontSize=7;
    FontBold=Yes;
    ...

    Cod existent 5

    ...ForeColor=65535;
    SourceExpr=ItemInvoicedQtyTotal;
    DataSetFieldName=ItemInvoicedQtyTotal }

    // Delete the following lines.
    { 1040103;TextBox ;300 ;0 ;150 ;423 ;Name=ItemCostAmtExpectedTotal;
    Visible=No;
    ForeColor=65535;
    SourceExpr=ItemCostAmtExpectedTotal;
    DataSetFieldName=ItemCostAmtExpectedTotal }
    // End of the deleted lines.

    { 1040104;TextBox ;0 ;0 ;150 ;423 ;Name=ItemReceivedQtyTotal;
    Visible=No;
    ForeColor=65535;
    ...

    Înlocuirea cod 5

    ...ForeColor=65535;
    SourceExpr=ItemInvoicedQtyTotal;
    DataSetFieldName=ItemInvoicedQtyTotal }
    { 1040104;TextBox ;0 ;0 ;150 ;423 ;Name=ItemReceivedQtyTotal;
    Visible=No;
    ForeColor=65535;
    ...
  2. Modificare cod în Data elementul numărul 2 secțiuni în stoc primit facturată nu raport (10540) după cum urmează:
    Cod existent 1

    ...NoOfItems := NoOfItems + 1;
    CurrReport.CREATETOTALS(Quantity,"Invoiced Quantity","Cost Amount (Expected)");
    CurrReport.CREATETOTALS("Value Entry"."Cost Amount (Actual)","Value Entry"."Invoiced Quantity");

    // Delete the following lines.
    // GB1004.begin
    ItemReceivedQty += Quantity;
    ItemInvoicedQty += "Invoiced Quantity";
    ItemCostAmtExpected += "Cost Amount (Expected)";
    ItemReceivedQtyTotal += Quantity;
    ItemInvoicedQtyTotal += "Invoiced Quantity";
    ItemCostAmtExpectedTotal += "Cost Amount (Expected)";
    // End of the deleted lines.

    // GB1004.end
    END;
    ...

    Înlocuirea cod 1

    ...NoOfItems := NoOfItems + 1;
    CurrReport.CREATETOTALS(Quantity,"Invoiced Quantity","Cost Amount (Expected)");
    CurrReport.CREATETOTALS("Value Entry"."Cost Amount (Actual)","Value Entry"."Invoiced Quantity");

    // Add the following lines.
    CALCFIELDS("Cost Amount (Actual)");
    CALCFIELDS("Cost Amount (Expected)");
    // GB1004.begin
    ItemReceivedQty += Quantity;
    ItemInvoicedQty += "Invoiced Quantity";
    ItemCostAmtExpected += "Cost Amount (Expected)" + "Cost Amount (Actual)";
    ItemReceivedQtyTotal += Quantity;
    ItemInvoicedQtyTotal += "Invoiced Quantity";
    ItemCostAmtExpectedTotal += "Cost Amount (Expected)" + "Cost Amount (Actual)";
    // End of the added lines.

    // GB1004.end
    END;
    ...

    Cod existent 2

    ...{ 1040047;TextBox   ;2100 ;0    ;1500 ;423  ;HorzAlign=Left;
    SourceExpr="Source No.";
    DataSetFieldName=Item_Ledger_Entry__Source_No__ }

    // Delete the following line.
    { 1040030;TextBox ;13050;0 ;1800 ;423 ;SourceExpr="Cost Amount (Expected)";
    // End of the deleted line.

    DataSetFieldName=Item_Ledger_Entry__Cost_Amount__Expected__ }
    }
    }
    ...

    Înlocuirea cod 2

    ...{ 1040047;TextBox   ;2100 ;0    ;1500 ;423  ;HorzAlign=Left;
    SourceExpr="Source No.";
    DataSetFieldName=Item_Ledger_Entry__Source_No__ }

    // Add the following line.
    { 1040030;TextBox ;13050;0 ;1800 ;423 ;SourceExpr="Cost Amount (Expected)" + "Cost Amount (Actual)";
    // End of the added line.

    DataSetFieldName=Item_Ledger_Entry__Cost_Amount__Expected__ }
    }
    }
    ...

    Cod existent 3

    ...SourceExpr="Value Entry"."Invoiced Quantity";
    DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry___Invoiced_Quantity_ }
    { 1040076;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;

    // Delete the following line.
    SourceExpr="Item Ledger Entry"."Cost Amount (Expected)";
    // End of the deleted line.

    DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry___Cost_Amount__Expected__ }
    { 1040079;TextBox ;0 ;0 ;5400 ;423 ;FontBold=Yes;
    SourceExpr=Text1040005 + ' ' + Item."No.";
    ...

    Înlocuirea cod 3

    ...SourceExpr="Value Entry"."Invoiced Quantity";
    DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry___Invoiced_Quantity_ }
    { 1040076;TextBox ;13050;0 ;1800 ;423 ;FontBold=Yes;

    // Add the following line.
    SourceExpr=ItemCostAmtExpected;
    // End of the added line.

    DataSetFieldName=Item_Ledger_Entry__Item_Ledger_Entry___Cost_Amount__Expected__ }
    { 1040079;TextBox ;0 ;0 ;5400 ;423 ;FontBold=Yes;
    SourceExpr=Text1040005 + ' ' + Item."No.";
    ...

    Cod existent 4

    ...DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040080 }
    { 1040081;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
    CaptionML=ENU=Cost;

    // Delete the following line.
    SourceExpr="Item Ledger Entry"."Cost Amount (Expected)" - "Value Entry"."Cost Amount (Actual)";
    // End of the deleted line.

    DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040081 }
    { 1040078;TextBox ;18000;0 ;150 ;423 ;Name=NoOfItems;
    Visible=No;
    ...

    Înlocuirea cod 4

    ...DataSetFieldName=Item_Ledger_Entry__Quantity____Item_Ledger_Entry___Invoiced_Quantity__Control1040080 }
    { 1040081;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
    CaptionML=ENU=Cost;

    // Add the following line.
    SourceExpr=ItemCostAmtExpected - ValueCostAmtActual;
    // End of the added line.

    DataSetFieldName=Item_Ledger_Entry___Cost_Amount__Expected______Value_Entry___Cost_Amount__Actual___Control1040081 }
    { 1040078;TextBox ;18000;0 ;150 ;423 ;Name=NoOfItems;
    Visible=No;
    ...
  3. Modificare cod în Data elementul numărul 3 secțiuni în stoc primit facturată nu raport (10540) după cum urmează:
    Cod existent 1

    ...OnPreDataItem=BEGIN
    IF EndDate <> 0D THEN
    SETRANGE("Posting Date",0D,EndDate);

    // Delete the following line.
    SETFILTER("Invoiced Quantity",'<>%1',0);
    CurrReport.CREATETOTALS("Cost Amount (Actual)","Invoiced Quantity");
    // End of the deleted line.

    END;

    OnAfterGetRecord=BEGIN
    ...

    Înlocuirea cod 1

    ...OnPreDataItem=BEGIN
    IF EndDate <> 0D THEN
    SETRANGE("Posting Date",0D,EndDate);

    // Add the following lines.
    CurrReport.CREATETOTALS("Cost Amount (Actual)","Invoiced Quantity");
    LastDocumentNo := '';
    // End of the added lines.

    END;

    OnAfterGetRecord=BEGIN
    ...

    Cod existent 2

    ...ValueInvoicedQty += "Invoiced Quantity";
    ValueCostAmtActualTotal += "Cost Amount (Actual)";
    ValueInvoicedQtyTotal += "Invoiced Quantity";
    // GB1004.end
    END;
    ...

    Înlocuirea cod 2

    ...ValueInvoicedQty += "Invoiced Quantity";
    ValueCostAmtActualTotal += "Cost Amount (Actual)";
    ValueInvoicedQtyTotal += "Invoiced Quantity";

    // Add the following line.
    CalcSumDocumentNo("Value Entry");
    // End of the added line.

    // GB1004.end
    END;
    ...

    Cod existent 3

    ...SectionWidth=18150;
    SectionHeight=423;
    OnPreSection=BEGIN

    // Delete the following line.
    CurrReport.SHOWOUTPUT(PrintDetails);
    // End of the deleted line.

    END;

    }
    ...

    Înlocuirea cod 3

    ...SectionWidth=18150;
    SectionHeight=423;
    OnPreSection=BEGIN

    // Add the following line.
    CurrReport.SHOWOUTPUT(PrintDetails AND ("Invoiced Quantity" <> 0));
    // End of the added line.

    END;

    }
    ...
  4. Modificare cod în variabile globale în stoc primit facturată nu raport (10540) după cum urmează:
    Cod existent

    ...</TableCell>
    </TableCells>
    <Visibility>

    // Delete the following line.
    <Hidden>=iif (Fields!PrintDetails.Value and Fields!Value_Entry_Entry_No_.Value > 0,FALSE,TRUE)</Hidden>
    // End of the deleted line.

    </Visibility>
    </TableRow>
    </TableRows>
    ...

    Cod de înlocuire

    ...</TableCell>
    </TableCells>
    <Visibility>

    // Adding the following line.
    <Hidden>=iif (Fields!PrintDetails.Value and Fields!Value_Entry_Entry_No_.Value and Fields!Value_Entry__Invoiced_Quantity_.Value <> 0,FALSE,TRUE)</Hidden>
    // End of the added line.

    </Visibility>
    </TableRow>
    </TableRows>
    ...
  5. Modificare cod în Data elementul numărul 1 secțiuni în stoc livrat nu facturată raport (10541) după cum urmează:
    Cod existent 1

    ...VertAlign=Bottom;
    FontBold=Yes;
    MultiLine=Yes;
    DataSetFieldName=Value_Entry__Cost_Amount__Actual__Caption }
    { 1040026;Label ;15000;846 ;1500 ;846 ;ParentControl=1040025;
    HorzAlign=Right;
    ...

    Înlocuirea cod 1

    ...VertAlign=Bottom;
    FontBold=Yes;
    MultiLine=Yes;

    // Add the following line.
    CaptionML=ENU=Cost Amount (Actual);
    // End of the added line.

    DataSetFieldName=Value_Entry__Cost_Amount__Actual__Caption }
    { 1040026;Label ;15000;846 ;1500 ;846 ;ParentControl=1040025;
    HorzAlign=Right;
    ...

    Cod existent 2

    ...VertAlign=Bottom;
    FontBold=Yes;
    MultiLine=Yes;
    DataSetFieldName=Item_Ledger_Entry__Cost_Amount__Expected__Caption }
    { 1040042;Label ;5700 ;0 ;1550 ;846 ;ParentControl=1040040;
    VertAlign=Bottom;
    ...

    Înlocuirea cod 2

    ...VertAlign=Bottom;
    FontBold=Yes;
    MultiLine=Yes;

    // Add the following line.
    CaptionML=ENU=Cost Amount (Expected);
    // End of the added line.

    DataSetFieldName=Item_Ledger_Entry__Cost_Amount__Expected__Caption }
    { 1040042;Label ;5700 ;0 ;1550 ;846 ;ParentControl=1040040;
    VertAlign=Bottom;
    ...

    Cod existent 3

    ...SourceExpr=Text1040005 + ' ' + Item."No.";
    DataSetFieldName=Text1040005_________Item__No__ }
    { 1040054;TextBox ;16650;0 ;1500 ;423 ;FontBold=Yes;

    // Delete the following line.
    SourceExpr="Value Entry"."Cost Amount (Actual)";
    // End of the deleted line.

    DataSetFieldName=Value_Entry___Cost_Amount__Actual__ }
    { 1040059;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
    CaptionML=ENU=Rec. not invoiced;
    ...

    Înlocuirea cod 3

    ...SourceExpr=Text1040005 + ' ' + Item."No.";
    DataSetFieldName=Text1040005_________Item__No__ }
    { 1040054;TextBox ;16650;0 ;1500 ;423 ;FontBold=Yes;

    // Add the following line.
    SourceExpr=-"Value Entry"."Cost Amount (Actual)";
    // End of the added line.

    DataSetFieldName=Value_Entry___Cost_Amount__Actual__ }
    { 1040059;TextBox ;7350 ;0 ;1550 ;423 ;FontBold=Yes;
    CaptionML=ENU=Rec. not invoiced;
    ...

    Cod existent 4

    ...DataSetFieldName=Value_Entry___Invoiced_Quantity__Control1040070 }
    { 1040071;TextBox ;16650;423 ;1500 ;423 ;FontSize=7;
    FontBold=Yes;

    // Delete the following line.
    SourceExpr="Value Entry"."Cost Amount (Actual)";
    // End of the deleted line.

    DataSetFieldName=Value_Entry___Cost_Amount__Actual___Control1040071 }
    { 1040072;Label ;0 ;423 ;5550 ;423 ;FontSize=9;
    FontBold=Yes;
    ...

    Înlocuirea cod 4

    ...DataSetFieldName=Value_Entry___Invoiced_Quantity__Control1040070 }
    { 1040071;TextBox ;16650;423 ;1500 ;423 ;FontSize=7;
    FontBold=Yes;

    // Add the following line.
    SourceExpr=-"Value Entry"."Cost Amount (Actual)";
    // End of the added line.

    DataSetFieldName=Value_Entry___Cost_Amount__Actual___Control1040071 }
    { 1040072;Label ;0 ;423 ;5550 ;423 ;FontSize=9;
    FontBold=Yes;
    ...
  6. Modificare codul date element numărul 2 în stoc livrat nu facturată raport (10541) după cum urmează:
    Cod existent 1

    ...OnAfterGetRecord=BEGIN
    NoOfItems := NoOfItems + 1;
    CurrReport.CREATETOTALS("Value Entry"."Cost Amount (Actual)","Value Entry"."Invoiced Quantity");

    // Delete 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";
    ItemCostAmtExpectedTotal += "Cost Amount (Expected)";
    // End of the deleted lines.

    END;

    DataItemLink=Item No.=FIELD(No.);
    ...

    Înlocuirea cod 1

    ...OnAfterGetRecord=BEGIN
    NoOfItems := NoOfItems + 1;
    CurrReport.CREATETOTALS("Value Entry"."Cost Amount (Actual)","Value Entry"."Invoiced Quantity");

    // Add the following lines.
    CALCFIELDS("Cost Amount (Actual)");
    CALCFIELDS("Cost Amount (Expected)");

    ItemCostAmount -= ("Cost Amount (Expected)" + "Cost Amount (Actual)");
    ItemShippedQty -= Quantity;
    ItemInvoicedQty -= "Invoiced Quantity";
    ItemCostAmtExpected -= ("Cost Amount (Expected)" + "Cost Amount (Actual)");

    ItemCostAmountTotal -= ("Cost Amount (Expected)" + "Cost Amount (Actual)");
    ItemShippedQtyTotal -= Quantity;
    ItemInvoicedQtyTotal -= "Invoiced Quantity";
    ItemCostAmtExpectedTotal -= ("Cost Amount (Expected)" + "Cost Amount (Actual)");
    // End of the added lines.

    END;

    DataItemLink=Item No.=FIELD(No.);
    ...

    Cod existent 2

    ...{ 1040047;TextBox   ;2100 ;0    ;1500 ;423  ;HorzAlign=Left;
    SourceExpr="Source No.";
    DataSetFieldName=Item_Ledger_Entry__Source_No__ }

    // Delete the following line.
    { 1040030;TextBox ;13050;0 ;1800 ;423 ;SourceExpr="Cost Amount (Expected)";
    // End of the deleted line.

    DataSetFieldName=Item_Ledger_Entry__Cost_Amount__Expected__ }
    { 1040082;TextBox ;18000;0 ;150 ;423 ;Name="Entry No.";
    Visible=No;
    ...

    Înlocuirea cod 2

    ...{ 1040047;TextBox   ;2100 ;0    ;1500 ;423  ;HorzAlign=Left;
    SourceExpr="Source No.";
    DataSetFieldName=Item_Ledger_Entry__Source_No__ }

    // Add the following line.
    { 1040030;TextBox ;13050;0 ;1800 ;423 ;SourceExpr=-("Cost Amount (Expected)" + "Cost Amount (Actual)");
    // End of the added line.

    DataSetFieldName=Item_Ledger_Entry__Cost_Amount__Expected__ }
    { 1040082;TextBox ;18000;0 ;150 ;423 ;Name="Entry No.";
    Visible=No;
    ...
  7. Modificare codul date element numărul 3 în stoc livrat nu facturată raport (10541) după cum urmează:
    Cod existent 1

    ...OnPreDataItem=BEGIN
    IF EndDate <> 0D THEN
    SETRANGE("Posting Date",0D,EndDate);

    // Delete the following lines.
    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 of the deleted lines.

    END;

    DataItemLink=Item Ledger Entry No.=FIELD(Entry No.);
    ...

    Înlocuirea cod 1

    ...OnPreDataItem=BEGIN
    IF EndDate <> 0D THEN
    SETRANGE("Posting Date",0D,EndDate);

    // Add the following lines.
    CurrReport.CREATETOTALS("Cost Amount (Actual)","Invoiced Quantity");
    LastDocumentNo := '';
    END;

    OnAfterGetRecord=BEGIN
    ValueInvoicedQty -= "Invoiced Quantity";
    ValueCostAmtActual -= "Cost Amount (Actual)";

    ValueInvoicedQtyTotal -= "Invoiced Quantity";
    ValueCostAmtActualTotal -= "Cost Amount (Actual)";

    CalcSumDocumentNo("Value Entry");
    // End of the added lines.

    END;

    DataItemLink=Item Ledger Entry No.=FIELD(Entry No.);
    ...

    Cod existent 3

    ...SectionWidth=18150;
    SectionHeight=423;
    OnPreSection=BEGIN

    // Delete the following line.
    CurrReport.SHOWOUTPUT(PrintDetails);
    // End of the deleted line.

    END;

    }
    ...

    Înlocuirea cod 3

    ...SectionWidth=18150;
    SectionHeight=423;
    OnPreSection=BEGIN

    // Add the following line.
    CurrReport.SHOWOUTPUT(PrintDetails AND ("Invoiced Quantity" <> 0));
    // End of the added line.

    END;

    }
    ...

    Cod existent 4

    ...{ 1040025;TextBox   ;15000;0    ;1500 ;423  ;CaptionML=ENU=Invoiced Quantity;
    SourceExpr=-"Invoiced Quantity";
    DataSetFieldName=Value_Entry__Invoiced_Quantity_ }

    // Delete the following line.
    { 1040027;TextBox ;16650;0 ;1500 ;423 ;SourceExpr="Cost Amount (Actual)";
    // End of the deleted line.

    DataSetFieldName=Value_Entry__Cost_Amount__Actual__ }
    }
    }
    ...

    Înlocuirea cod 4

    ...{ 1040025;TextBox   ;15000;0    ;1500 ;423  ;CaptionML=ENU=Invoiced Quantity;
    SourceExpr=-"Invoiced Quantity";
    DataSetFieldName=Value_Entry__Invoiced_Quantity_ }

    // Add the following line.
    { 1040027;TextBox ;16650;0 ;1500 ;423 ;SourceExpr=-"Cost Amount (Actual)";
    // End of the added line.

    DataSetFieldName=Value_Entry__Cost_Amount__Actual__ }
    }
    }
    ...
  8. Modificare codul date element numărul 4 în stoc livrat nu facturată raport (10541) după cum urmează:
    Cod existent

    ...SourceExpr=-"Value Entry"."Invoiced Quantity";
    DataSetFieldName=Value_Entry___Invoiced_Quantity__Control1040036 }
    { 1040044;TextBox ;16650;0 ;1500 ;423 ;FontBold=Yes;

    // Delete the following line.
    SourceExpr="Value Entry"."Cost Amount (Actual)";
    // End of the deleted line.

    DataSetFieldName=Value_Entry___Cost_Amount__Actual___Control1040044 }
    { 1040029;TextBox ;0 ;0 ;5400 ;423 ;FontBold=Yes;
    SourceExpr=Text1040005 + ' ' + Item."No.";
    ...

    Cod de înlocuire

    ...SourceExpr=-"Value Entry"."Invoiced Quantity";
    DataSetFieldName=Value_Entry___Invoiced_Quantity__Control1040036 }
    { 1040044;TextBox ;16650;0 ;1500 ;423 ;FontBold=Yes;

    // Add the following line.
    SourceExpr=-"Value Entry"."Cost Amount (Actual)";
    // End of the added line.

    DataSetFieldName=Value_Entry___Cost_Amount__Actual___Control1040044 }
    { 1040029;TextBox ;0 ;0 ;5400 ;423 ;FontBold=Yes;
    SourceExpr=Text1040005 + ' ' + Item."No.";
    ...
  9. Modificare cod în variabile globale în stoc livrat nu facturată raport (10541) după cum urmează:
    Cod existent 1

    ...ItemCostAmtExpectedTotal@1040016 : Decimal;
    ValueInvoicedQtyTotal@1040019 : Decimal;
    ValueCostAmtActualTotal@1040020 : Decimal;

    BEGIN
    {
    ...

    Înlocuirea cod 1

    ...ItemCostAmtExpectedTotal@1040016 : Decimal;
    ValueInvoicedQtyTotal@1040019 : Decimal;
    ValueCostAmtActualTotal@1040020 : Decimal;

    // Add the following lines.
    LastDocumentNo@1040023 : Code[20];

    LOCAL PROCEDURE CalcSumDocumentNo@1040000(VAR ValueEntry@1040000 : Record 5802);
    VAR
    ValueEntry1@1040001 : Record 5802;
    ValueCostAmtActualPer@1040002 : Decimal;
    ValueIncoicedQtyPer@1040003 : Decimal;
    BEGIN
    IF LastDocumentNo = ValueEntry."Document No." THEN BEGIN
    ValueEntry."Cost Amount (Actual)" := 0;
    ValueEntry."Invoiced Quantity" := 0;
    END ELSE BEGIN
    WITH ValueEntry1 DO BEGIN
    COPYFILTERS(ValueEntry);
    SETRANGE("Document No.",ValueEntry."Document No.");
    IF FINDSET THEN
    REPEAT
    ValueCostAmtActualPer += "Cost Amount (Actual)";
    ValueIncoicedQtyPer += "Invoiced Quantity";
    UNTIL NEXT = 0;
    END;
    ValueEntry."Cost Amount (Actual)" := ValueCostAmtActualPer;
    ValueEntry."Invoiced Quantity" := ValueIncoicedQtyPer;
    LastDocumentNo := ValueEntry."Document No.";
    END;
    END;
    // End of the added lines.

    BEGIN
    {
    ...

    Cod existent 2

    ...</TableCell>
    </TableCells>
    <Visibility>

    // Delete the following line.
    <Hidden>=IIF(First(Fields!PrintDetails.Value) And (Fields!Value_Entry__Document_No__.Value<>""),False,True)</Hidden>
    // End of the deleted line.

    </Visibility>
    </TableRow>
    </TableRows>
    ...

    Înlocuirea cod 2

    ...</TableCell>
    </TableCells>
    <Visibility>

    // Add the following line.
    <Hidden>=IIF(First(Fields!PrintDetails.Value) And (Fields!Value_Entry__Document_No__.Value<>"") And (Fields!Value_Entry__Invoiced_Quantity_.Value <>0),False,True)</Hidden>
    // End of the added line.

    </Visibility>
    </TableRow>
    </TableRows>
    ...


Cerințe preliminare

Trebuie să aveți UK localizarea Microsoft Dynamics NAV 2009 R2 sau SP1 instalat pentru a aplica această remediere rapidă.

Eliminare informaţii

Nu se poate elimina această remediere rapidă.

Stare

Microsoft a confirmat că aceasta este o problemă cu produsele Microsoft enumerate în secţiunea „Se aplică la".

Referințe

VSFT DynamicsNAVSE: 352587

Notă Acesta este un articol "rapid publicat" creat direct în cadrul organizației de asistență Microsoft. Informațiile conținute în acest document sunt furnizate ca răspuns la problemele care apar. Ca rezultat al vitezei în a-l face disponibil, materialele pot include erori tipografice și pot fi revizuite în orice moment, fără notificare. Consultați Termenii de utilizarepentru alte considerații.

Autor: avannini
Writer: v-six
Examinare tehnică: avannini
Editor:

Aveți nevoie de ajutor suplimentar?

Extindeți-vă competențele
Explorați instruirea
Fiți primul care obține noile caracteristici
Alăturați-vă la Microsoft Insider

V-a fost de ajutor această informație?

Cât de mulțumit sunteți de calitatea traducerii?

Ce v-a afectat experiența?

Aveți feedback suplimentar? (Opțional)

Vă mulțumim pentru feedback!

×