Odpisov správa (12119) sa nevytlačí konca súčty, ktoré sa týkajú predchádzajúceho roka údaje v talianskej verzie Microsoft Dynamics NAV 2009

Informácie o rýchlej oprave

Rýchla oprava je k dispozícii od spoločnosti Microsoft. Je však určená iba opraviť problém popísaný v tomto článku. Použite ju iba v počítačoch s týmto konkrétnym problémom. Môže, že táto rýchla oprava bude ďalej testovaná. Ak vám nespôsobuje tento problém, odporúčame vám počkať na ďalšiu Microsoft Dynamics NAV 2009 service pack alebo ďalšej verzii Microsoft Dynamics NAV, ktorá obsahuje túto rýchlu opravu.

Poznámka: V špeciálnych prípadoch sa poplatky, ktoré sú telefonickú podporu nemusia účtovať ak technickú podporu Professional pre Microsoft Dynamics a súvisiace produkty zistí, že táto konkrétna aktualizácia vyrieši váš problém. Ďalšie otázky a žiadosti o technickú podporu, ktoré sa netýkajú tejto špecifickej aktualizácie, podliehajú bežným sadzbám za poskytovanie technickej podpory.

Zmeny kódu

Poznámka: Vždy skúšobný opravy v prostredí kontrolované pred použitím opravy výroby počítačov.
Ak chcete vyriešiť tento problém, postupujte nasledovne:

1. Zmena kódu v údaje položky číslo 1 v odpisov správa (12119) takto:
   Nahradenie kód 1

   ...                               FASource := Text008;
                                IF NOT FADeprBook.GET("No.",DeprBookCode) THEN
                                  CurrReport.SKIP;
   
                                // Delete the following lines.
                                IF SkipRecord THEN
                                  CurrReport.SKIP;
                                // End of the lines.
   
                                IF "FA Posting Group" <> FADeprBook."FA Posting Group" THEN
                                  ERROR(Text007,FIELDCAPTION("FA Posting Group"),"No.");
   ...
   
   

   Nahradenie kód 1

   ...                               FASource := Text008;
                                IF NOT FADeprBook.GET("No.",DeprBookCode) THEN
                                  CurrReport.SKIP;
   
                                // Add the following lines.
                                FixedAsset.COPY("Fixed Asset");
                                IF SkipRecord THEN BEGIN
                                  IF FixedAsset.NEXT = 0 THEN
                                    CreateTotals;
                                  CurrReport.SKIP;
                                END;
                                // End of the lines.
   
                                IF "FA Posting Group" <> FADeprBook."FA Posting Group" THEN
                                  ERROR(Text007,FIELDCAPTION("FA Posting Group"),"No.");
   ...
   
   

   Existujúci kód 2

   ...                               FillTempFALedgEntry;
                                  UpdateTotals;
                                  CreateGroupTotals;
   
                                  // Delete the following lines.
                                  CreateTotals;
   
                                TotalStartingAccumulated := TotalStartAmounts[2] + TotalStartAmounts[5] + TotalStartAmounts[6];
                                TotalAntAccDepreciation := TotalNetChangeAmounts[5] + TotalNetChangeAmounts[6];
   
                                IF TotalEndingAmounts[1]+TotalEndingAmounts[3]+TotalEndingAmounts[4] = 0 THEN BEGIN
                                  TotalBasicDepreciationPerc := 0;
                                  TotalAntAccDepreciationPerc := 0
                                END ELSE BEGIN
                                  TotalBasicDepreciationPerc := ABS(ROUND((((TotalNetChangeAmounts[2] + ReclassDeprAmount) / // IT0001
                                    (TotalEndingAmounts[1] +
                                    TotalEndingAmounts[3] +
                                   TotalEndingAmounts[4])) * 100),0.01));
   
                                  TotalAntAccDepreciationPerc := ABS(ROUND(((TotalAntAccDepreciation /
                                    TotalEndingAmounts[1] +
                                    TotalEndingAmounts[3] +
                                    TotalEndingAmounts[4]) * 100),0.01));
   
                                END;
                                // End of the lines.
   
                              END;
   
             ReqFilterFields=No.,FA Class Code,FA Subclass Code,Budgeted Asset;
   ...
   
   

   Nahradenie kód 2

   ...                               FillTempFALedgEntry;
                                  UpdateTotals;
                                  CreateGroupTotals;
   
                                // Add the following lines.
                                IF FixedAsset.NEXT = 0 THEN
                                  CreateTotals;
                                // End of the lines.
   
                              END;
   
             ReqFilterFields=No.,FA Class Code,FA Subclass Code,Budgeted Asset;
   ...
   
   

2. Zmena kódu v údaje položky číslo 1 sekcie v odpisov správa (12119) takto:
   Nahradenie kód 1

   ...            CONTROLS
               {
                 { 169 ;TextBox      ;24450;0    ;1650 ;423  ;FontBold=Yes;
   
                                                              // Delete the following line.
                                                              SourceExpr=BookValueAtEndingDate;
                                                              // End of the line.
   
                                                              AutoFormatType=1;
                                                              DataSetFieldName=BookValueAtEndingDate_Control169 }
                 { 1130064;Label     ;0    ;0    ;2250 ;423  ;HorzAlign=Left;
   ...
   
   

   Nahradenie kód 1

   ...            CONTROLS
               {
                 { 169 ;TextBox      ;24450;0    ;1650 ;423  ;FontBold=Yes;
   
                                                              // Add the following line.
                                                              SourceExpr=EndTotalBookValueAtEndingDate;
                                                              // End of the line.
   
                                                              AutoFormatType=1;
                                                              DataSetFieldName=BookValueAtEndingDate_Control169 }
                 { 1130064;Label     ;0    ;0    ;2250 ;423  ;HorzAlign=Left;
   ...
   
   

   Existujúci kód 2

   ...TotalNetChangeAmounts_3__TotalNetChangeAmounts_4_ }
                 { 1130077;TextBox   ;5850 ;0    ;1800 ;423  ;SourceExpr=TotalDisposalAmounts[1]+TotalDisposalAmounts[3]+TotalDisposalAmounts[4];
                                                              DataSetFieldName=TotalDisposalAmounts_1__TotalDisposalAmounts_3__TotalDisposalAmounts_4_ }
   
                 // Delete the following line.
                 { 1130078;TextBox   ;7650 ;0    ;1800 ;423  ;SourceExpr=TotalEndingAmounts[1]+TotalEndingAmounts[3]+TotalEndingAmounts[4];
                 // End of the line.
   
                                                              DataSetFieldName=TotalEndingAmounts_1__TotalEndingAmounts_3__TotalEndingAmounts_4__Control1130078 }
                 { 1130079;TextBox   ;9450 ;0    ;1500 ;423  ;SourceExpr=TotalStartingAccumulated;
                                                              DataSetFieldName=TotalStartingAccumulated }
   ...
   
   

   Nahradenie kód 2

   ...                                                           DataSetFieldName=TotalNetChangeAmounts_1__TotalNetChangeAmounts_3__TotalNetChangeAmounts_4_ }
                 { 1130077;TextBox   ;5850 ;0    ;1800 ;423  ;SourceExpr=TotalDisposalAmounts[1]+TotalDisposalAmounts[3]+TotalDisposalAmounts[4];
                                                              DataSetFieldName=TotalDisposalAmounts_1__TotalDisposalAmounts_3__TotalDisposalAmounts_4_ }
   
                 // Add the following line.
                 { 1130078;TextBox   ;7650 ;0    ;1800 ;423  ;SourceExpr=EndTotalEndingAmounts[1]+EndTotalEndingAmounts[3]+EndTotalEndingAmounts[4];
                 // End of the line.
   
                                                              DataSetFieldName=TotalEndingAmounts_1__TotalEndingAmounts_3__TotalEndingAmounts_4__Control1130078 }
                 { 1130079;TextBox   ;9450 ;0    ;1500 ;423  ;SourceExpr=TotalStartingAccumulated;
                                                              DataSetFieldName=TotalStartingAccumulated }
   ...
   
   

   Existujúci kód 3

   ...                                                           DataSetFieldName=TotalStartingAccumulated }
                 { 1130081;TextBox   ;13950;0    ;1500 ;423  ;SourceExpr=ABS(TotalNetChangeAmounts[2]);
                                                              DataSetFieldName=ABS_TotalNetChangeAmounts_2__ }
   
                 // Delete the following line.
                 { 1130083;TextBox   ;22950;0    ;1500 ;423  ;SourceExpr=ABS(TotalEndingAmounts[2]+TotalEndingAmounts[5]+TotalEndingAmounts[6]);
                 // End of the line.
   
                                                              DataSetFieldName=ABS_TotalEndingAmounts_2__TotalEndingAmounts_5__TotalEndingAmounts_6___Control1130083 }
                 { 1130090;TextBox   ;21450;0    ;1500 ;423  ;SourceExpr=ABS(TotalNetChangeAmounts[2]+TotalAntAccDepreciation);
                                                              DataSetFieldName=ABS_TotalNetChangeAmounts_2__TotalAntAccDepreciation_ }
   ...
   
   

   Nahradenie kód 3

   ...                                                           DataSetFieldName=TotalStartingAccumulated }
                 { 1130081;TextBox   ;13950;0    ;1500 ;423  ;SourceExpr=ABS(TotalNetChangeAmounts[2]);
                                                              DataSetFieldName=ABS_TotalNetChangeAmounts_2__ }
   
                 // Add the following line.
                 { 1130083;TextBox   ;22950;0    ;1500 ;423  ;SourceExpr=ABS(EndTotalEndingAmounts[2]+EndTotalEndingAmounts[5]+EndTotalEndingAmounts[6]);
                 // End of the line.
   
                                                              DataSetFieldName=ABS_TotalEndingAmounts_2__TotalEndingAmounts_5__TotalEndingAmounts_6___Control1130083 }
                 { 1130090;TextBox   ;21450;0    ;1500 ;423  ;SourceExpr=ABS(TotalNetChangeAmounts[2]+TotalAntAccDepreciation);
                                                              DataSetFieldName=ABS_TotalNetChangeAmounts_2__TotalAntAccDepreciation_ }
   ...
   
   

3. Pridajte nasledujúce globálnej premenné odpisov správa (12119):

   • FixedAsset@1130040: Záznam 5600

   • EndTotalEndingAmounts@1130041: [7] rad Decimal

   • EndTotalBookValueAtEndingDate@1130042: desiatková

4. Zmena kódu v UpdateTotals funkcia odpisov správa (12119) takto:
   Nahradenie kód 1

   ...          GroupStartAmounts[J] := 0;
             GroupNetChangeAmounts[J] := 0;
             GroupDisposalAmounts[J] := 0;
   
             // Delete the following lines.
             TotalStartAmounts[J] := 0;
             TotalNetChangeAmounts[J] := 0;
             TotalDisposalAmounts[J] := 0;
             TotalReclassDeprAmount := ReclassDeprAmount;
             // End of the lines.
   
           END;
           // IT0001.end
           FOR J := 1 TO NumberOfTypes DO BEGIN
   ...
   
   

   Nahradenie kód 1

   ...          GroupStartAmounts[J] := 0;
             GroupNetChangeAmounts[J] := 0;
             GroupDisposalAmounts[J] := 0;
           END;
           // IT0001.end
           FOR J := 1 TO NumberOfTypes DO BEGIN
   ...
   
   

   Existujúci kód 2

   ...          TotalStartAmounts[J] := TotalStartAmounts[J] + StartAmounts[J];
             TotalNetChangeAmounts[J] := TotalNetChangeAmounts[J] + NetChangeAmounts[J];
             TotalDisposalAmounts[J] := TotalDisposalAmounts[J] + DisposalAmounts[J];
           END;
         END;
   ...
   
   

   Nahradenie kód 2

   ...          TotalStartAmounts[J] := TotalStartAmounts[J] + StartAmounts[J];
             TotalNetChangeAmounts[J] := TotalNetChangeAmounts[J] + NetChangeAmounts[J];
             TotalDisposalAmounts[J] := TotalDisposalAmounts[J] + DisposalAmounts[J];
   
             // Add the following lines.
             IF J = 2 THEN
               TotalReclassDeprAmount := TotalReclassDeprAmount + ReclassDeprAmount;
             // End of the lines.
   
           END;
         END;
   ...
   
   

5. Zmena kódu v CreateGroupTotals funkcia odpisov správa (12119) takto:
   Nahradenie kód 1

   ...      LOCAL PROCEDURE CreateGroupTotals@1130114();
         BEGIN
   
           BookValueAtEndingDate := 0;
           BookValueAtStartingDate := 0;
           FOR J := 1 TO NumberOfTypes DO BEGIN
   ...
   
   

   Nahradenie kód 1

   ...      LOCAL PROCEDURE CreateGroupTotals@1130114();
         BEGIN
           BookValueAtEndingDate := 0;
           BookValueAtStartingDate := 0;
           FOR J := 1 TO NumberOfTypes DO BEGIN
   ...
   
   

   Existujúci kód 2

   ...        BookValueAtStartingDate := 0;
           FOR J := 1 TO NumberOfTypes DO BEGIN
             TotalEndingAmounts[J] := GroupStartAmounts[J] + GroupNetChangeAmounts[J] + GroupDisposalAmounts[J];
             BookValueAtEndingDate := BookValueAtEndingDate + TotalEndingAmounts[J];
             BookValueAtStartingDate := BookValueAtStartingDate + GroupStartAmounts[J];
   ...
   
   

   Nahradenie kód 2

   ...        BookValueAtStartingDate := 0;
           FOR J := 1 TO NumberOfTypes DO BEGIN
             TotalEndingAmounts[J] := GroupStartAmounts[J] + GroupNetChangeAmounts[J] + GroupDisposalAmounts[J];
   
             // Add the following lines.
             IF J = 2 THEN
               TotalEndingAmounts[J] += ReclassDeprAmount;
             // End of the lines.
   
             BookValueAtEndingDate := BookValueAtEndingDate + TotalEndingAmounts[J];
             BookValueAtStartingDate := BookValueAtStartingDate + GroupStartAmounts[J];
   ...
   
   

   Existujúci kód 3

   ...          BookValueAtEndingDate := BookValueAtEndingDate + TotalEndingAmounts[J];
             BookValueAtStartingDate := BookValueAtStartingDate + GroupStartAmounts[J];
   
             // Delete the following lines.
             IF J = 2 THEN
               TotalEndingAmounts[J] += ReclassDeprAmount;
             // End of the lines.
   
           END;
         END;
   ...
   
   

   Nahradenie kód 3

   ...          BookValueAtEndingDate := BookValueAtEndingDate + TotalEndingAmounts[J];
             BookValueAtStartingDate := BookValueAtStartingDate + GroupStartAmounts[J];
           END;
         END;
   ...
   
   

6. Zmena kódu v UpdateTotalsFunkcia v odpisov správa (12119) takto:
   Nahradenie kód 1

   ...      LOCAL PROCEDURE CreateTotals@1130117();
         BEGIN
   
           // Delete the following lines.
           BookValueAtEndingDate := 0;
           BookValueAtStartingDate := 0;
           FOR J := 1 TO NumberOfTypes DO BEGIN
             TotalEndingAmounts[J] := TotalStartAmounts[J] + TotalNetChangeAmounts[J] + TotalDisposalAmounts[J];
           // End of the lines.
   
             // IT0001.begin
             IF J = 2 THEN
   ...
   
   

   Nahradenie kód 1

   ...      LOCAL PROCEDURE CreateTotals@1130117();
         BEGIN
   
           // Add the following lines.
           FOR J := 1 TO NumberOfTypes DO BEGIN
             EndTotalEndingAmounts[J] := TotalStartAmounts[J] + TotalNetChangeAmounts[J] + TotalDisposalAmounts[J];
           // End of the lines.
   
             // IT0001.begin
             IF J = 2 THEN
   ...
   
   

   Existujúci kód 2

   ...          // IT0001.begin
             IF J = 2 THEN
   
               // Delete the following lines.
               TotalEndingAmounts[J] += ReclassDeprAmount;
             // IT0001.end
             BookValueAtEndingDate := BookValueAtEndingDate + TotalEndingAmounts[J];
             BookValueAtStartingDate := BookValueAtStartingDate + TotalStartAmounts[J];
               // End of the lines.
   
          END;
         END;
   ...
   
   

   Nahradenie kód 2

   ...          // IT0001.begin
             IF J = 2 THEN
   
               // Add the following lines.
               EndTotalEndingAmounts[J] := EndTotalEndingAmounts[J] + TotalReclassDeprAmount;
             // IT0001.end
             EndTotalBookValueAtEndingDate := EndTotalBookValueAtEndingDate + EndTotalEndingAmounts[J];
           END;
   
           TotalStartingAccumulated := TotalStartAmounts[2] + TotalStartAmounts[5] + TotalStartAmounts[6];
           TotalAntAccDepreciation := TotalNetChangeAmounts[5] + TotalNetChangeAmounts[6];
   
           IF EndTotalEndingAmounts[1]+EndTotalEndingAmounts[3]+EndTotalEndingAmounts[4] = 0 THEN BEGIN
             TotalBasicDepreciationPerc := 0;
             TotalAntAccDepreciationPerc := 0
           END ELSE BEGIN
             TotalBasicDepreciationPerc := ABS(ROUND((((TotalNetChangeAmounts[2] + TotalReclassDeprAmount) / // IT0001
               (EndTotalEndingAmounts[1] +
               EndTotalEndingAmounts[3] +
               EndTotalEndingAmounts[4])) * 100),0.01));
   
             TotalAntAccDepreciationPerc := ABS(ROUND(((TotalAntAccDepreciation /
               EndTotalEndingAmounts[1] +
               EndTotalEndingAmounts[3] +
               EndTotalEndingAmounts[4]) * 100),0.01));
             // End of the lines.
   
           END;
         END;
   ...
   
   

7. Zmena kódu v odpisov správa (12119) takto:
   Nahradenie kód 1

   ...                          <PaddingTop>2pt</PaddingTop>
                             <VerticalAlign>Middle</VerticalAlign>
                           </Style>
   
                           // Delete the following line.
                           <Value>=LAST(Fields!TotalEndingAmounts_1__TotalEndingAmounts_3__TotalEndingAmounts_4_.Value)</Value>
                           // End of the line.
   
                           <ZIndex>11</ZIndex>
                         </Textbox>
                       </ReportItems>
   ...
   
   

   Nahradenie kód 1

   ...                          <PaddingTop>2pt</PaddingTop>
                             <VerticalAlign>Middle</VerticalAlign>
                           </Style>
   
                          // Add the following line.
                           <Value>=LAST(Fields!TotalEndingAmounts_1__TotalEndingAmounts_3__TotalEndingAmounts_4__Control1130078.Value)</Value>
                           // End of the line.
   
                           <ZIndex>11</ZIndex>
                         </Textbox>
                       </ReportItems>
   ...
   
   

   Existujúci kód 2

   ...                          <PaddingTop>2pt</PaddingTop>
                             <VerticalAlign>Middle</VerticalAlign>
                           </Style>
   
                           // Delete the following line.
                           <Value>=LAST(Fields!ABS_TotalEndingAmounts_2__TotalEndingAmounts_5__TotalEndingAmounts_6__.Value)</Value>
                           // End of the line.
   
                           <ZIndex>2</ZIndex>
                         </Textbox>
                       </ReportItems>
   ...
   
   

   Nahradenie kód 2

   ...                          <PaddingTop>2pt</PaddingTop>
                             <VerticalAlign>Middle</VerticalAlign>
                           </Style>
   
                           // Add the following line.
                           <Value>=LAST(Fields!ABS_TotalEndingAmounts_2__TotalEndingAmounts_5__TotalEndingAmounts_6___Control1130083.Value)</Value>
                           // End of the line.
   
                           <ZIndex>2</ZIndex>
                         </Textbox>
                       </ReportItems>
   ...
   
   

   Existujúci kód 3

   ...                          <PaddingTop>2pt</PaddingTop>
                             <VerticalAlign>Middle</VerticalAlign>
                           </Style>
   
                           // Delete the following line.
                           <Value>=LAST(Fields!BookValueAtEndingDate.Value)</Value>
                           // End of the line.
   
                           <ZIndex>1</ZIndex>
                         </Textbox>
                       </ReportItems>
   ...
   
   

   Nahradenie kód 3

   ...                          <PaddingTop>2pt</PaddingTop>
                             <VerticalAlign>Middle</VerticalAlign>
                           </Style>
   
                           // Add the following line.
                           <Value>=LAST(Fields!BookValueAtEndingDate_Control169.Value)</Value>
                           // End of the line.
   
                           <ZIndex>1</ZIndex>
                         </Textbox>
                       </ReportItems>
   ...
   
   

   Existujúci kód 4

   ...          <Field Name="ABS_ReclassDeprAmount__Control1130212Format">
               <DataField>ABS_ReclassDeprAmount__Control1130212Format</DataField>
             </Field>
             <Field Name="BookValueAtEndingDate_Control169Format">
               <DataField>BookValueAtEndingDate_Control169Format</DataField>
             </Field>
   ...
   
   

   Nahradenie kód 4

   ...          <Field Name="ABS_ReclassDeprAmount__Control1130212Format">
               <DataField>ABS_ReclassDeprAmount__Control1130212Format</DataField>
             </Field>
   
             // Add the following lines.
             <Field Name="BookValueAtEndingDate_Control169">
               <DataField>BookValueAtEndingDate_Control169</DataField>
             </Field>
             // End of the lines.
   
             <Field Name="BookValueAtEndingDate_Control169Format">
               <DataField>BookValueAtEndingDate_Control169Format</DataField>
             </Field>
   ...
   
   

   Existujúci kód 5

   ...          <Field Name="TotalDisposalAmounts_1__TotalDisposalAmounts_3__TotalDisposalAmounts_4_Format">
               <DataField>TotalDisposalAmounts_1__TotalDisposalAmounts_3__TotalDisposalAmounts_4_Format</DataField>
             </Field>
             <Field Name="TotalEndingAmounts_1__TotalEndingAmounts_3__TotalEndingAmounts_4__Control1130078Format">
               <DataField>TotalEndingAmounts_1__TotalEndingAmounts_3__TotalEndingAmounts_4__Control1130078Format</DataField>
             </Field>
   ...
   
   

   Nahradenie kód 5

   ...          <Field Name="TotalDisposalAmounts_1__TotalDisposalAmounts_3__TotalDisposalAmounts_4_Format">
               <DataField>TotalDisposalAmounts_1__TotalDisposalAmounts_3__TotalDisposalAmounts_4_Format</DataField>
             </Field>
   
             // Add the following lines.
             <Field Name="TotalEndingAmounts_1__TotalEndingAmounts_3__TotalEndingAmounts_4__Control1130078">
               <DataField>TotalEndingAmounts_1__TotalEndingAmounts_3__TotalEndingAmounts_4__Control1130078</DataField>
             </Field>
             // End of the lines.
   
             <Field Name="TotalEndingAmounts_1__TotalEndingAmounts_3__TotalEndingAmounts_4__Control1130078Format">
               <DataField>TotalEndingAmounts_1__TotalEndingAmounts_3__TotalEndingAmounts_4__Control1130078Format</DataField>
             </Field>
   ...
   
   

   Existujúci kód 6

   ...          <Field Name="ABS_TotalNetChangeAmounts_2__Format">
               <DataField>ABS_TotalNetChangeAmounts_2__Format</DataField>
             </Field>
             <Field Name="ABS_TotalEndingAmounts_2__TotalEndingAmounts_5__TotalEndingAmounts_6___Control1130083Format">
               <DataField>ABS_TotalEndingAmounts_2__TotalEndingAmounts_5__TotalEndingAmounts_6___Control1130083Format</DataField>
             </Field>
   ...
   
   

   Nahradenie kód 6

   ...          <Field Name="ABS_TotalNetChangeAmounts_2__Format">
               <DataField>ABS_TotalNetChangeAmounts_2__Format</DataField>
             </Field>
   
             // Add the following lines.
             <Field Name="ABS_TotalEndingAmounts_2__TotalEndingAmounts_5__TotalEndingAmounts_6___Control1130083">
               <DataField>ABS_TotalEndingAmounts_2__TotalEndingAmounts_5__TotalEndingAmounts_6___Control1130083</DataField>
             </Field>
             // End of the lines.
   
             <Field Name="ABS_TotalEndingAmounts_2__TotalEndingAmounts_5__TotalEndingAmounts_6___Control1130083Format">
               <DataField>ABS_TotalEndingAmounts_2__TotalEndingAmounts_5__TotalEndingAmounts_6___Control1130083Format</DataField>
             </Field>
   ...