Nesprávne intrastat hlásenia poplatky za tovar v dánčine verzii systému Microsoft Dynamics NAV 2009

Intrastat vykazuje vlády a zobrazovania transakcie (množstvo) sa medzi orámovanie, čo znamená transakcie dánske spoločnosti a krajiny. To znamená, že ak, položky sa obchoduje napríklad, Nemecko v januári transakcie by v žiadnom do denníka instrastat február.Transakcie by sa zahrnúť len raz, napriek tomu, že hodnota ide nahor alebo nadol, pretože poplatku. V súčasnosti aj mesiac, kedy je zaregistrovaná poplatku sa vytvorí nový riadok denníka intrastat.Tento problém sa vyskytuje v nasledovných produktov:

Dánska verzia systému Microsoft Dynamics NAV 2009 R2
Dánska verzia systému Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)

Riešenie

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.

Informácie o inštalácii

Spoločnosť Microsoft poskytuje príklady programovacieho kódu len ako názornú ukážku bez vyjadrených či predpokladaných záruk. Tie okrem iného zahŕňajú predpokladané záruky obchodovateľnosti alebo vhodnosti na konkrétny účel. Tento článok predpokladá, že ovládate predvádzaný programovací jazyk a nástroje, ktoré sa používajú na vytváranie a ladenie procedúr. Pracovníci technickej podpory spoločnosti Microsoft môžu vysvetliť fungovanie konkrétneho postupu. Ale nemôžu tieto príklady poskytovať pridanú funkčnosť alebo konštrukčné procedúry zohľadňujúce vaše konkrétne požiadavky.Poznámka: Pred inštaláciou tejto rýchlej opravy, kontrola všetkých používateľov klienta Microsoft Dynamics NAV systém. To zahŕňa služby Microsoft Dynamics NAV aplikácie servera (NAS). Mali by ste byť iba klient prihláseného používateľa je pri implementácii túto rýchlu opravu.Vykonávať túto rýchlu opravu, musíte mať licencie pre vývojárov.Odporúčame, aby používateľského konta v okne prihlásenia systému Windows alebo v okne prihlásenia do databázy pridelí "SUPER" úlohu ID. Ak používateľské konto nemožno priradiť úlohu ID "SUPER", musíte overiť, že používateľské konto má nasledujúce povolenia:

Zmeniť povolenia pre objekt, ktorý sa zmení.
Povolenia na vykonanie systému objekt ID 5210 a systém objekt ID 9015objekt.

Poznámka: Nemusíte mať práva ukladá údaje, pokiaľ budete musieť vykonať opravy údajov.

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:

Zmena kódu v správe Načítať položky tovaru (594) takto:Nahradenie kód 1

...IF IntrastatJnlLine2.FINDFIRST THEN
                             CurrReport.SKIP;

// Delete the following line.
                           TestILE("Item Ledger Entry");
// End of the deleted line.

                           TotalInvoicedQty := 0;
                           TotalAmt := 0;
...

Nahradenie kód 1

...IF IntrastatJnlLine2.FINDFIRST THEN
                             CurrReport.SKIP;

// Add the following lines.
                           IF NOT HasCrossedBorder("Item Ledger Entry") THEN
                             CurrReport.SKIP;
// End of the added lines.

                           TotalInvoicedQty := 0;
                           TotalAmt := 0;
...

Existujúci kód 2

...IF "Country/Region".GET("Item Ledger Entry"."Country/Region Code") THEN
                               IF "Country/Region"."EU Country/Region Code" = '' THEN
                                 CurrReport.SKIP;
                             TestILE("Item Ledger Entry");

                             InsertValueEntryLine;
                           END;
                         END;
...

Nahradenie kód 2

...IF "Country/Region".GET("Item Ledger Entry"."Country/Region Code") THEN
                               IF "Country/Region"."EU Country/Region Code" = '' THEN
                                 CurrReport.SKIP;

// Add the following line.
                             IF HasCrossedBorder("Item Ledger Entry") THEN
// End of the added lines.

                               CurrReport.SKIP;
                             InsertValueEntryLine;
                           END;
                         END;
...

Zmena kódu v CheckILE funkcia v správe Načítať položky tovaru (594) takto:Nahradenie kód 1

...EXIT(AverageQty >= 0);
    END;

// Delete the following line.
    LOCAL PROCEDURE CheckILE@4(CountryRegionCode@1000 : Code[20]);
// End of the deleted line.

    VAR
      CountryRegion@1001 : Record 9;
    BEGIN
...

Nahradenie kód 1

...EXIT(AverageQty >= 0);
    END;

// Add the following line.
    LOCAL PROCEDURE CountryOfOrigin@4(CountryRegionCode@1000 : Code[20]) : Boolean;
// End of the added line.

    VAR
      CountryRegion@1001 : Record 9;
    BEGIN
...

Existujúci kód 2

...IF ("Item Ledger Entry"."Country/Region Code" IN [CompanyInfo."Country/Region Code",'']) =
         (CountryRegionCode IN [CompanyInfo."Country/Region Code",''])
      THEN

// Delete the following line.
        CurrReport.SKIP;
// End of the deleted line.

      IF CountryRegionCode <> '' THEN BEGIN
        CountryRegion.GET(CountryRegionCode);
        IF CountryRegion."Intrastat Code" = '' THEN
...

Nahradenie kód 2

...IF ("Item Ledger Entry"."Country/Region Code" IN [CompanyInfo."Country/Region Code",'']) =
         (CountryRegionCode IN [CompanyInfo."Country/Region Code",''])
      THEN

// Add the following line.
        EXIT(FALSE);
// End of the added line.

      IF CountryRegionCode <> '' THEN BEGIN
        CountryRegion.GET(CountryRegionCode);
        IF CountryRegion."Intrastat Code" = '' THEN
...

Existujúci kód 3

...IF CountryRegionCode <> '' THEN BEGIN
        CountryRegion.GET(CountryRegionCode);
        IF CountryRegion."Intrastat Code" = '' THEN

// Delete the following lines.
          CurrReport.SKIP;
      END;
    END;
// End of the deleted lines.

    PROCEDURE TestILE@5(ItemLedgEntry@1000 : Record 32);
    VAR
      ItemLedgEntry2@1003 : Record 32;
      Location@1002 : Record 14;
...

Nahradenie kód 3

...IF CountryRegionCode <> '' THEN BEGIN
        CountryRegion.GET(CountryRegionCode);
        IF CountryRegion."Intrastat Code" = '' THEN

// Add the following lines.
          EXIT(FALSE);
      END;
      EXIT(TRUE);
    END;
// End of the added lines.

    PROCEDURE HasCrossedBorder@5(ItemLedgEntry@1000 : Record 32) : Boolean;
    VAR
      ItemLedgEntry2@1003 : Record 32;
      Location@1002 : Record 14;
...

Zmena kódu v TestILE funkcia v správe Načítať položky tovaru (594) takto:Nahradenie kód 1

...IF ("Country/Region Code" = CompanyInfo."Country/Region Code") OR
                 ("Country/Region Code" = '')
              THEN

// Delete the following line.
                CurrReport.SKIP;
// End of the deleted line.

              IF "Applies-to Entry" = 0 THEN BEGIN
                ItemLedgEntry2.SETCURRENTKEY("Item No.","Posting Date");
                ItemLedgEntry2.SETRANGE("Item No.","Item No.");
...

Nahradenie kód 1

...IF ("Country/Region Code" = CompanyInfo."Country/Region Code") OR
                 ("Country/Region Code" = '')
              THEN

// Add the following line.
                EXIT(FALSE);
// End of the added line.

              IF "Applies-to Entry" = 0 THEN BEGIN
                ItemLedgEntry2.SETCURRENTKEY("Item No.","Posting Date");
                ItemLedgEntry2.SETRANGE("Item No.","Item No.");
...

Existujúci kód 2

...IF (ItemLedgEntry2."Country/Region Code" <> CompanyInfo."Country/Region Code") AND
                 (ItemLedgEntry2."Country/Region Code" <> '')
              THEN
                CurrReport.SKIP;
            END;
          "Entry Type" = "Entry Type"::Transfer:
            BEGIN
...

Nahradenie kód 2

...IF (ItemLedgEntry2."Country/Region Code" <> CompanyInfo."Country/Region Code") AND
                 (ItemLedgEntry2."Country/Region Code" <> '')
              THEN
                EXIT(FALSE);
            END;
          "Entry Type" = "Entry Type"::Transfer:
            BEGIN
...

Existujúci kód 3

...IF ("Country/Region Code" = CompanyInfo."Country/Region Code") OR
                 ("Country/Region Code" = '')
              THEN
                CurrReport.SKIP;
              IF "Transfer Order No." = '' THEN BEGIN
                Location.GET("Location Code");
                IF (Location."Country/Region Code" <> '') AND
...

Nahradenie kód 3

...IF ("Country/Region Code" = CompanyInfo."Country/Region Code") OR
                 ("Country/Region Code" = '')
              THEN
                EXIT(FALSE);
              IF "Transfer Order No." = '' THEN BEGIN
                Location.GET("Location Code");
                IF (Location."Country/Region Code" <> '') AND
...

Existujúci kód 4

...IF (Location."Country/Region Code" <> '') AND
                   (Location."Country/Region Code" <> CompanyInfo."Country/Region Code")
                THEN
                  CurrReport.SKIP;
              END ELSE BEGIN
                ItemLedgEntry2.SETRANGE("Transfer Order No.","Transfer Order No.");
                ItemLedgEntry2.SETFILTER("Country/Region Code",'%1 | %2','',CompanyInfo."Country/Region Code");
...

Nahradenie kód 4

...IF (Location."Country/Region Code" <> '') AND
                   (Location."Country/Region Code" <> CompanyInfo."Country/Region Code")
                THEN
                  EXIT(FALSE);
              END ELSE BEGIN
                ItemLedgEntry2.SETRANGE("Transfer Order No.","Transfer Order No.");
                ItemLedgEntry2.SETFILTER("Country/Region Code",'%1 | %2','',CompanyInfo."Country/Region Code");
...

Existujúci kód 5

...Include := TRUE;
                  UNTIL Include OR (ItemLedgEntry2.NEXT = 0);
                IF NOT Include THEN
                  CurrReport.SKIP;
              END;
            END;
          "Location Code" <> '':
...

Nahradenie kód 5

...Include := TRUE;
                  UNTIL Include OR (ItemLedgEntry2.NEXT = 0);
                IF NOT Include THEN
                  EXIT(FALSE);
              END;
            END;
          "Location Code" <> '':
...

Existujúci kód 6

..."Location Code" <> '':
            BEGIN
              Location.GET("Location Code");
              CheckILE(Location."Country/Region Code");
            END;
          ELSE BEGIN
            IF "Entry Type" = "Entry Type"::Purchase THEN
...

Nahradenie kód 6

..."Location Code" <> '':
            BEGIN
              Location.GET("Location Code");
              IF NOT CountryOfOrigin(Location."Country/Region Code") THEN
                EXIT(FALSE);
            END;
          ELSE BEGIN
            IF "Entry Type" = "Entry Type"::Purchase THEN
...

Existujúci kód 7

...END;
          ELSE BEGIN
            IF "Entry Type" = "Entry Type"::Purchase THEN
              CheckILE(CompanyInfo."Ship-to Country/Region Code");
            IF "Entry Type" = "Entry Type"::Sale THEN
              CheckILE(CompanyInfo."Country/Region Code");
          END;
        END;
      END;
...

Nahradenie kód 7

...END;
          ELSE BEGIN
            IF "Entry Type" = "Entry Type"::Purchase THEN
              IF NOT CountryOfOrigin(CompanyInfo."Ship-to Country/Region Code") THEN
                EXIT(FALSE);
            IF "Entry Type" = "Entry Type"::Sale THEN
              IF NOT CountryOfOrigin(CompanyInfo."Country/Region Code") THEN
                EXIT(FALSE);
          END;
        END;
      END;
...

Zmena kódu v HasCrossedBorder funkcia v správe Načítať položky tovaru (594) takto:Existujúci kód

...END;
        END;
      END;
    END;
...

Nahradenie kódu

...END;
        END;
      END;
      EXIT(TRUE)
    END;

    PROCEDURE InsertValueEntryLine@6();...

Požiadavky

Musíte mať jednu z nasledovných produktov nainštalovaný chcete použiť túto rýchlu opravu:

Dánska verzia systému Microsoft Dynamics NAV 2009 R2
Dánska verzia systému Microsoft Dynamics NAV 2009 SP1

Informácie o odstránení

Nemôžete odstrániť túto rýchlu opravu.

Stav

Spoločnosť Microsoft potvrdila, že ide o problém v produktoch spoločnosti Microsoft, ktoré sú uvedené v časti Vzťahuje sa na.

Poznámka: To je "Rýchlo publikovať" článok vytvorené priamo v rámci organizácie technickej podpory spoločnosti Microsoft. Uvedené informácie sa poskytuje ako-v reakcii na naliehavé problémy. Rýchlosťou robiť materiály môžu obsahovať typografické chyby a môžu byť kedykoľvek bez predchádzajúceho upozornenia. Prečítajte si Podmienky používaniaz iných dôvodov.

Nesprávne intrastat hlásenia poplatky za tovar v dánčine verzii systému Microsoft Dynamics NAV 2009

Riešenie

Informácie o rýchlej oprave

Informácie o inštalácii

Zmeny kódu

Požiadavky

Informácie o odstránení

Stav

Potrebujete ďalšiu pomoc?

Chcete ďalšie možnosti?

Boli tieto informácie užitočné?

Ďakujeme za vaše pripomienky!