Iznos u 349 datoteci deklaracije nije ispravan ako je potvrđen izbor u polju za potvrdu "Office usluga" u dijalogu "Podešavanje knjiženja PDV-a" u španskoj verziji programa Microsoft Dynamics NAV

Radite bilo gde na bilo kom uređaju sa uslugom Microsoft 365

Nadogradite na Microsoft 365 da biste radili bilo gde sa najnovijim funkcijama i ispravkama.

Nadogradi odmah

Ovaj članak se odnosi na Microsoft Dynamics NAV za jezik španskih (es) jezika.

Simptoma

Pretpostavimo da je u dijalogu Podešavanje knjiženja PDV- a potvrđen izbor u polju za potvrdu usluga EU u španskoj verziji programa Microsoft Dynamics NAV. Kada generisanje datoteke 349, iznos u izvezeni datoteci nije ispravan.
Do ovog problema dolazi u sledećim proizvodima:

  • Španska verzija Microsoft Dynamics NAV 2009 servisnog paketa 1 (SP1)

  • Španska verzija Microsoft Dynamics NAV 5,0 servisnog paketa 1 (SP1)


Reљenja

Informacije o ispravci

Podržana hitna ispravka sada je dostupna od korporacije Microsoft. Međutim, svrha je samo da se ispravi problem opisan u ovom članku. Primenjujte ga samo na sisteme koji doživljavaju ovaj određeni problem. Ovaj hitni popravak možda će dobiti dodatna testiranja. Stoga, ako vas ovaj problem ne muиi, preporučujemo da sačekate sledeće Microsoft Dynamics NAV 2009 servisni paket ili sledeću Microsoft Dynamics NAV verziju koja sadrži ovu hitnu ispravku.

Napomena u specijalnim slučajevima, troškovi koji se obično naplaćuju za pozive podrške mogu se otkazati ako stručnjak za tehničku podršku za Microsoft Dynamics i srodne proizvode utvrdi da će određeno ažuriranje rešiti problem. Uobičajeni troškovi podrške primenjuju se na dodatna pitanja i probleme koji se ne kvalifikuju za određenu ispravku.



Informacije o instalaciji

Microsoft pruža primere programiranja samo na ilustraciji, bez izričenja ili podrazumevanih garancija. To obuhvata, ali nije ograničeno, na podrazumevane garancije o pristupačnosti prodaje ili prikladnosti za određenu namenu. Ovaj članak pretpostavlja da ste upoznati sa programskim jezikom koji se demonstrira i sa alatki koje se koriste za kreiranje i otklanjanju grešaka. Inženjeri Microsoft podrške mogu da objasne funkcionalnost određene procedure, ali oni neće menjati ove primere da bi obezbedili dodatnu funkcionalnost ili da bi napravili procedure za ispunjavanje određenih zahteva.

Napomena pre nego što instalirate ovu hitnu ispravku, proverite da li su korisnici korisnika Microsoft Navision prijavljeni kao isključili sistem. To obuhvata korisnike klijenta za Microsoft Navision aplikacije (nam). Trebalo bi da budete jedini klijent korisnik koji je prijavljen kada primenite ovu hitnu ispravku.

Da biste primenili ovu hitnu ispravku, morate imati licencu za programere.

Preporučujemo da se korisnički nalog u prozoru "Windows prijavljivanja" ili u prozoru "prijavljivanja podataka" dodeli ID uloge "SUPER". Ako korisniku ne može da se dodeli ID uloge "SUPER", morate potvrditi da korisnički nalog ima sledeće dozvole:

  • Dozvola za izmenu za objekat koji ćete promeniti.

  • Dozvola za izvršavanje za objekat ID-a sistemskog objekta sistema 5210 i za objekat ID-a sistemskih objekta sistema 9015.



Imajte u vidu da ne morate da imate prava na magacine ako ne morate da izvršite popravku podataka.

Promene kôda

Uvek beleške koristite probne ispravke u kontrolisanom okruženju pre nego što primenite ispravke na računare na računaru.
Da biste rešili ovaj problem, slijedite ove korake:

  1. Promena koda u odeljcima stavki 5 podataka broj 5 u 349 izveštaju deklaracije (88) na sledeći način:
    postojeći kôd 1

                                  BEGIN
    REPEAT

    //Delete the following line.
    VATInvSales.RESET;

    VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
    VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

    Kôd za zamenu 1

                                  BEGIN
    REPEAT

    //Add the follwing lines.
    LastTransactionNo := 0;
    VATInvSales.RESET;
    VATInvSales.SETCURRENTKEY("Transaction No.");
    //End of the lines.

    VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
    VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

    Postojeća Šifra 2

                                              IF "VAT Registration No." <> '' THEN BEGIN
    IF AmountToIncludein349 <> 0 THEN BEGIN

    //Delete the following lines.
    OpTriang := 'X';
    AmountOpTri := AmountOpTri + AmountToIncludein349
    //End of the lines.

    END ELSE BEGIN
    OpTriang := 'X';

    Zamena koda 2

                                              IF "VAT Registration No." <> '' THEN BEGIN
    IF AmountToIncludein349 <> 0 THEN BEGIN

    //Add the following lines.
    IF VATInvSales."Transaction No." <> LastTransactionNo THEN BEGIN
    OpTriang := 'X';
    AmountOpTri := AmountOpTri + AmountToIncludein349;
    END;
    //End of the lines.

    END ELSE BEGIN
    OpTriang := 'X';

    Postojeći kôd 3

                                          // OpTriang := 'X';
    // AmountOpTri := AmountOpTri + VATInvSales.Base;
    UNTIL VATInvSales.NEXT = 0;
    END;

    Kôd za zamenu 3

                                          // OpTriang := 'X';
    // AmountOpTri := AmountOpTri + VATInvSales.Base;

    //Add the following line.
    LastTransactionNo := VATInvSales."Transaction No.";

    UNTIL VATInvSales.NEXT = 0;
    END;

    Postojeći kôd 4

                                        UNTIL VATInvSales.NEXT = 0;
    END;

    //Delete the following line.
    VATInvSales.RESET;

    VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
    VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

    Kôd za zamenu 4

                                        UNTIL VATInvSales.NEXT = 0;
    END;

    //Add the following lines.
    LastTransactionNo := 0;
    VATInvSales.RESET;
    VATInvSales.SETCURRENTKEY("Transaction No.");
    //End of the lines.

    VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
    VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

    Postojeći kôd 5

                                              ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
    IF "VAT Registration No." <> '' THEN BEGIN

    //Delete the following lines.
    IF AmountToIncludein349 <> 0 THEN
    NormalAmount := NormalAmount + AmountToIncludein349
    ELSE
    //End of the lines.

    NormalAmount := NormalAmount + VATInvSales.Base;
    END ELSE

    Kôd za zamenu 5

                                              ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
    IF "VAT Registration No." <> '' THEN BEGIN

    //Add the following lines.
    IF AmountToIncludein349 <> 0 THEN BEGIN
    IF VATInvSales."Transaction No." <> LastTransactionNo THEN
    NormalAmount := NormalAmount + AmountToIncludein349;
    END ELSE
    //End of the lines.

    NormalAmount := NormalAmount + VATInvSales.Base;
    END ELSE

    Postojeći kôd 6

                                          END;
    // NormalAmount := NormalAmount + VATInvSales.Base;
    UNTIL VATInvSales.NEXT = 0;
    END;

    Kôd za zamenu 6

                                          END;
    // NormalAmount := NormalAmount + VATInvSales.Base;

    //Add the following line.
    LastTransactionNo := VATInvSales."Transaction No.";

    UNTIL VATInvSales.NEXT = 0;
    END;

    Postojeći kôd 7

                                      END;

    //Delete the following line.
    VATInvSales.RESET;

    VATInvSales.SETRANGE(Type,VATInvSales.Type::Sale);
    VATInvSales.SETRANGE("Document Type",VATInvSales."Document Type"::Invoice);

    Kôd za zamenu 7

                                      END;

    //Add the following lines.
    LastTransactionNo := 0;
    VATInvSales.RESET;
    VATInvSales.SETCURRENTKEY("Transaction No.");
    //End of the lines.

    VATInvSales.SETRANGE(Type,VATInvSales.Type::Sale);
    VATInvSales.SETRANGE("Document Type",VATInvSales."Document Type"::Invoice);

    Postojeći kôd 8

                                              ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
    IF "VAT Registration No." <> '' THEN BEGIN

    //Delete the following lines.
    IF AmountToIncludein349 <> 0 THEN
    AmountEUService := AmountEUService + AmountToIncludein349
    ELSE
    //End of the lines.

    AmountEUService := AmountEUService + VATInvSales.Base;
    END ELSE

    Kôd za zamenu 8

                                              ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
    IF "VAT Registration No." <> '' THEN BEGIN

    //Add the following lines.
    IF AmountToIncludein349 <> 0 THEN BEGIN
    IF VATInvSales."Transaction No." <> LastTransactionNo THEN
    AmountEUService := AmountEUService + AmountToIncludein349;
    END ELSE
    //End of the lines.

    AmountEUService := AmountEUService + VATInvSales.Base;
    END ELSE

    Postojeći kôd 9

                                            END;
    END;
    UNTIL VATInvSales.NEXT = 0;

    Lozinka za zamenu 9

                                            END;
    END;

    //Add the following line.
    LastTransactionNo := VATInvSales."Transaction No.";

    UNTIL VATInvSales.NEXT = 0;
  2. Promena koda u odeljcima stavke sa podacima broj 6 u odeljku 349 report (88) na sledeći način:
    postojeći kôd 1

                                  BEGIN
    REPEAT

    //Delete the following line.
    VATInvPurch.RESET;

    VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
    VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

    Kôd za zamenu 1

                                  BEGIN
    REPEAT

    //Add the following lines.
    LastTransactionNo := 0;
    VATInvPurch.RESET;
    VATInvPurch.SETCURRENTKEY("Transaction No.");
    //End of the lines.

    VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
    VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

    Postojeća Šifra 2

                                              IF "VAT Registration No." <> '' THEN BEGIN
    IF AmountToIncludein349 <> 0 THEN BEGIN

    //Delete the following lines.
    OpTriang := 'X';
    AmountOpTri := AmountOpTri + AmountToIncludein349;
    //End of the lines.

    END ELSE BEGIN
    OpTriang := 'X';

    Zamena koda 2

                                              IF "VAT Registration No." <> '' THEN BEGIN
    IF AmountToIncludein349 <> 0 THEN BEGIN

    //Add the following lines.
    IF VATInvPurch."Transaction No." <> LastTransactionNo THEN BEGIN
    OpTriang := 'X';
    AmountOpTri := AmountOpTri + AmountToIncludein349;
    END;
    //End of the lines.

    END ELSE BEGIN
    OpTriang := 'X';

    Postojeći kôd 3

                                          // OpTriang := 'X';
    // AmountOpTri := AmountOpTri + VATInvPurch.Base;
    UNTIL VATInvPurch.NEXT = 0;
    END;

    Kôd za zamenu 3

                                          // OpTriang := 'X';
    // AmountOpTri := AmountOpTri + VATInvPurch.Base;

    //Add the following line.
    LastTransactionNo := VATInvPurch."Transaction No.";

    UNTIL VATInvPurch.NEXT = 0;
    END;

    Postojeći kôd 4

                                        UNTIL VATInvPurch.NEXT = 0;
    END;

    //Delete the following line.
    VATInvPurch.RESET;

    VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
    VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

    Kôd za zamenu 4

                                        UNTIL VATInvPurch.NEXT = 0;
    END;

    //Add the following lines.
    LastTransactionNo := 0;
    VATInvPurch.RESET;
    VATInvPurch.SETCURRENTKEY("Transaction No.");
    //End of the lines.

    VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
    VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

    Postojeći kôd 5

                                              ((VATInvPurch."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
    IF "VAT Registration No." <> '' THEN BEGIN

    //Delete the following lines.
    IF AmountToIncludein349 <> 0 THEN
    NormalAmount := NormalAmount + AmountToIncludein349
    ELSE
    //End of the lines.

    NormalAmount := NormalAmount + VATInvPurch.Base;
    END ELSE

    Kôd za zamenu 5

                                              ((VATInvPurch."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
    IF "VAT Registration No." <> '' THEN BEGIN

    //Add the following lines.
    IF AmountToIncludein349 <> 0 THEN BEGIN
    IF VATInvPurch."Transaction No." <> LastTransactionNo THEN
    NormalAmount := NormalAmount + AmountToIncludein349;
    END ELSE
    //End of the lines.

    NormalAmount := NormalAmount + VATInvPurch.Base;
    END ELSE

    Postojeći kôd 6

                                          END;
    // NormalAmount := NormalAmount + VATInvPurch.Base;
    UNTIL VATInvPurch.NEXT = 0;
    END;

    Kôd za zamenu 6

                                          END;
    // NormalAmount := NormalAmount + VATInvPurch.Base;

    //Add the following line.
    LastTransactionNo := VATInvPurch."Transaction No.";

    UNTIL VATInvPurch.NEXT = 0;
    END;

    Postojeći kôd 7

                                        UNTIL VATInvPurch.NEXT = 0;
    END;

    //Delete the following line.
    VATInvPurch.RESET;

    VATInvPurch.SETRANGE(Type,VATInvPurch.Type::Purchase);
    VATInvPurch.SETRANGE("Document Type",VATInvPurch."Document Type"::Invoice);

    Kôd za zamenu 7

                                        UNTIL VATInvPurch.NEXT = 0;
    END;

    //Add the following lines.
    LastTransactionNo := 0;
    VATInvPurch.RESET;
    VATInvPurch.SETCURRENTKEY("Transaction No.");
    //End of the lines.

    VATInvPurch.SETRANGE(Type,VATInvPurch.Type::Purchase);
    VATInvPurch.SETRANGE("Document Type",VATInvPurch."Document Type"::Invoice);

    Postojeći kôd 8

                                            THEN BEGIN
    IF "VAT Registration No." <> '' THEN BEGIN

    //Delete the following lines.
    IF AmountToIncludein349 <> 0 THEN
    AmountEUService := AmountEUService + AmountToIncludein349
    ELSE
    //End of the lines.

    AmountEUService := AmountEUService + VATInvPurch.Base;
    END ELSE

    Kôd za zamenu 8

                                            THEN BEGIN
    IF "VAT Registration No." <> '' THEN BEGIN

    //Add the following lines.
    IF AmountToIncludein349 <> 0 THEN BEGIN
    IF VATInvPurch."Transaction No." <> LastTransactionNo THEN
    AmountEUService := AmountEUService + AmountToIncludein349;
    END ELSE
    //End of the lines.

    AmountEUService := AmountEUService + VATInvPurch.Base;
    END ELSE

    Postojeći kôd 9

                                            END;
    END;
    UNTIL VATInvPurch.NEXT = 0;

    Lozinka za zamenu 9

                                            END;
    END;

    //Add the following line.
    LastTransactionNo := VATInvPurch."Transaction No.";

    UNTIL VATInvPurch.NEXT = 0;
  3. Dodajte novu globalnu promenljivu u izveštaj za 349 deklaraciju (88), a zatim navedite promenljive na sledeći način:

    • Ime: LastTransactionNo@1100072

    • DataType: ceo broj

Preduslovi

Morate imati instaliran jedan od sledećih proizvoda da biste primenili ovu hitnu ispravku:

  • Španska verzija Microsoft Dynamics NAV 2009 servisnog paketa 1 (SP1)

  • Španska verzija Microsoft Dynamics NAV 5,0 servisnog paketa 1 (SP1)

Morate da imate instaliran španski 349 izveštaj da biste primenili ovu hitnu ispravku.
Više informacija potražite na sledećoj Microsoft Veb lokaciji:
španski 349 izveštaj
pored toga, morate imati instaliran PDV 2010 paket da biste primenili ovu hitnu ispravku.
Više informacija potražite na sledećoj Microsoft Veb lokaciji:
Microsoft Dynamics NAV podrška za PDV 2010

Informacije o uklanjanju

Ne možete da uklonite ovu hitnu ispravku.

Statusnoj

Microsoft je potvrdio da je ovo problem sa Microsoft proizvodima koji su navedeni u odeljku "odnosi se na".

Napomena ovo je članak "brzo OBJAVLJIVANJE" koji je kreiran direktno iz Microsoft organizacije podrške. Informacije koje se ovde nalaze su obezbeđene kao odgovor na probleme sa novim stvarima. Kao rezultat brzine da bi ona bila dostupna, materijali mogu da uključe tipografske greške i mogu da se redigovaju u bilo kom trenutku bez najave. Pogledajte uslove korišćenja za druga razmatranja.

Potrebna vam je dodatna pomoć?

Unapredite veštine
Istražite obuku
Prvi nabavite nove funkcije
Pridružite se Microsoft insajdere

Da li su vam ove informacije koristile?

Hvala vam na povratnim informacijama!

Hvala za povratne informacije! Izgleda da će biti od pomoći ako vas povežemo sa našim agentima Office podrške.

×