Kada stvorite datoteku za plaćanje SEPA dobavljača za prijedlog plaćanja u njemačkoj verziji sustava Microsoft Dynamics NAV, generira se pogrešan avis plaćanja

Primjenjuje se na
Dynamics NAV 2009 Microsoft Dynamics NAV 5.0

Ovaj se članak odnosi na Microsoft Dynamics NAV za regionalnu shemu na njemačkom (de)jeziku.

Simptomi

Kada stvorite datoteku za plaćanje dobavljača područja Plaćanja u eurima (SEPA) za prijedlog plaćanja u njemačkoj verziji sustava Microsoft Dynamics NAV s uključenim dodatkom Plaćanja, generira se pogrešan avis plaćanja. Varijabla 7 u potvrdi o plaćanju ispunjena je datumom knjiženja prve stavke dobavljača koji se primjenjuje prijedlogom plaćanja. Međutim, potrebno ju je ispuniti datumom knjiženja stavke u platnoj knjizi.
Taj se problem pojavljuje u sljedećim proizvodima:

  • Njemačka verzija sustava Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
  • Njemačka verzija sustava Microsoft Dynamics NAV 2009
  • Njemačka verzija sustava Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1)
  • Njemačka verzija sustava Microsoft Dynamics NAV 5.0

Rješenje

Informacije o hitnom popravku

Microsoft sada nudi podržani hitni popravak. No njegova je namjena samo ispravljanje problema opisanog u ovom članku. Primijenite ga samo na sustave koji imaju taj specifični problem. Ovaj hitni popravak može proći dodatna testiranja. Stoga, ako se ovaj problem ne odnosi ozbiljno, preporučujemo da pričekate sljedeći servisni paket za Microsoft Dynamics NAV ili sljedeću verziju sustava Microsoft Dynamics NAV koja sadrži ovaj hitni popravak.

Napomena: U posebnim slučajevima, ako stručnjak tehničke podrške za Microsoft Dynamics i povezane proizvode utvrdi da određeno ažuriranje može riješiti problem, poziv službi podrške može biti besplatan. Uobičajene cijene poziva službi za podršku primjenjuju se na dodatna pitanja i probleme koje nemaju veze s pripadnom nadopunom.

            
          

Informacije o instalaciji

Microsoft daje primjere programiranja samo za ilustraciju, bez jamstva, bilo izričitog ili prešutnog. To uključuje, bez ograničenja, implicitna jamstva utrživosti ili prikladnosti za određenu svrhu. U članku se podrazumijeva da ste upoznati s programskim jezikom koji se pokazuje te s alatima koji se koriste za stvaranje i ispravljanje pogrešaka procedura. Microsoftovi inženjeri za podršku mogu vam pomoći objasniti funkcionalnost određene procedure, no neće mijenjati te primjere radi pružanja dodatne funkcionalnosti ili konstruirati procedure koji zadovoljavaju vaše specifične zahtjeve.

Napomena Prije nego što instalirate ovaj hitni popravak, provjerite jesu li svi korisnici Microsoft Navision klijenta odjavljeni sa sustava. To obuhvaća korisnike klijentskih usluga Microsoft Navision Application Services (NAS). Trebali biste biti jedini klijentski korisnik prijavljen na vrijeme implementacije ovog hitnog popravka.

Da biste implementirali ovaj hitni popravak, morate imati licencu za razvojne inženjere.

Preporučujemo da se korisničkom računu u prozoru Prijave u sustav Windows ili u prozoru Prijave u bazu podataka dodijeli ID uloge "SUPER". Ako korisničkom računu nije moguće dodijeliti ID uloge "SUPER", morate provjeriti ima li korisnički račun sljedeće dozvole:

  • Dozvola za izmjenu objekta koji ćete mijenjati.
  • Dozvola za izvršavanje za objekt System Object ID 5210 i za objekt System Object ID 9015

                
Napomena: nemate pravo na spremišta podataka, osim ako morate popraviti podatke.

Promjene koda

Napomena: uvijek testirajte popravke koda u kontroliranom okruženju prije primjene popravaka na proizvodnim računalima.
Da biste riješili taj problem, učinite sljedeće:

  1. Dodajte novu lokalnu varijablu u funkciju CreateRecords u jedinici koda za upravljanje SEPA-om (5001911), a zatim varijablu odredite na sljedeći način:

    • Naziv: PDate
    • DataType: Date
  2. Promijenite kod u funkciji CreateRecords u jedinici koda za upravljanje SEPA-om (5001911) na sljedeći način:
    Postojeći kod 1

    ...
    CountryCodeL := PaymLine.GetCountryCode();
    IF "AVIS Letter" THEN BEGINSetuptext := PaymentSetup."Avis Proposal";
    IF CountryCodeL <> '' THENSetuptext := PaymentSetup."AZV Avis Proposal";
    CLEAR(TempRmtInfo);
    END ELSE BEGIN
    ...
    

    Zamjenski kod 1

    ...
    CountryCodeL := PaymLine.GetCountryCode();
    
    // Add the following line.
    CLEAR(PDate);
    
    IF "AVIS Letter" THEN BEGINSetuptext := PaymentSetup."Avis Proposal";
    IF CountryCodeL <> '' THENSetuptext := PaymentSetup."AZV Avis Proposal";
    CLEAR(TempRmtInfo);
    
    // Add the following line.
    PDate := PaymLedgEntry."Posting Date";
    
    END ELSE BEGIN
    ...
    

    Postojeći kod 2

    ...
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.CALCFIELDS("Original Amount");
    TempRmtInfo := TempRmtInfo +
    ...
    

    Zamjenski kod 2

    ...
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.CALCFIELDS("Original Amount");
    
    // Add the following lines.
    IF PDate = 0D THEN
    PDate := CustLedgEntry."Posting Date";
    // End of the lines.
    
    TempRmtInfo := TempRmtInfo +
    ...
    

    Postojeći kod 3

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(CustLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Delete the following line.
    FORMAT(CustLedgEntry."Posting Date",8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(CustLedgEntry."Document Type"),1,2));
    ...
    

    Zamjenski kod 3

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(CustLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Add the following line.
    FORMAT(PDate,8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(CustLedgEntry."Document Type"),1,2));
    ...
    

    Postojeći kod 4

    ...
    VendLedgEntry.GET("Ledg.Entry No.");
    VendLedgEntry.CALCFIELDS("Original Amount");
    TempRmtInfo := TempRmtInfo +
    ...
    

    Zamjenski kod 4

    ...
    VendLedgEntry.GET("Ledg.Entry No.");
    VendLedgEntry.CALCFIELDS("Original Amount");
    
    // Add the following lines.
    IF PDate = 0D THEN
    PDate := VendLedgEntry."Posting Date";
    // End of the lines.
    
    TempRmtInfo := TempRmtInfo +
    ...
    

    Postojeći kod 5

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(VendLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Delete the following line.
    FORMAT(VendLedgEntry."Posting Date",8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(VendLedgEntry."Document Type"),1,2));
    ...
    

    Zamjenski kod 5

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(VendLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Add the following line.
    FORMAT(PDate,8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(VendLedgEntry."Document Type"),1,2));
    ...
    
  3. Dodajte novu lokalnu varijablu u funkciju CreateEinzugRecords u jedinici koda za upravljanje SEPA-om (5001911), a zatim odredite varijablu na sljedeći način:

    • Naziv: PDate
    • DataType: Date
  4. Promijenite kod u funkciji CreateEinzugRecords u jedinici koda za upravljanje SEPA-om (5001911) na sljedeći način:
    Postojeći kod 1

    ...
    CountryCodeL := PaymLine.GetCountryCode();
    PaymentSetup.GET;
    IF "AVIS Letter" THEN BEGIN
    Setuptext := PaymentSetup."Avis Proposal";
    IF CountryCodeL <> '' THEN
    Setuptext := PaymentSetup."AZV Avis Proposal";
    CLEAR(TempRmtInfo);
    END ELSE BEGIN
    ...
    

    Zamjenski kod 1

    ...
    CountryCodeL := PaymLine.GetCountryCode();
    
    // Add the following line.
    CLEAR(PDate);
    
    PaymentSetup.GET;
    IF "AVIS Letter" THEN BEGIN
    Setuptext := PaymentSetup."Avis Proposal";
    IF CountryCodeL <> '' THEN
    Setuptext := PaymentSetup."AZV Avis Proposal";
    CLEAR(TempRmtInfo);
    
    // Add the following line.
    PDate := PaymLedgEntry."Posting Date";
    
    END ELSE BEGIN
    ...
    

    Postojeći kod 2

    ...
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.CALCFIELDS("Original Amount");
    TempRmtInfo := TempRmtInfo +
    ...
    

    Zamjenski kod 2

    ...
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.CALCFIELDS("Original Amount");
    
    // Add the following lines.
    IF PDate = 0D THEN
    PDate := CustLedgEntry."Posting Date";
    // End of the lines.
    
    TempRmtInfo := TempRmtInfo +
    ...
    

    Postojeći kod 3

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(CustLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Delete the following line.
    FORMAT(CustLedgEntry."Posting Date",8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(CustLedgEntry."Document Type"),1,2));
    ...
    

    Zamjenski kod 3

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(CustLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Add the following line.
    FORMAT(PDate,8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(CustLedgEntry."Document Type"),1,2));
    ...
    

Preduvjeti

Da biste primijenili ovaj hitni popravak, morate imati instaliran neki od sljedećih proizvoda:

  • Njemačka verzija sustava Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
  • Njemačka verzija sustava Microsoft Dynamics NAV 2009
  • Njemačka verzija sustava Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1)
  • Njemačka verzija sustava Microsoft Dynamics NAV 5.0

Podaci o uklanjanju

Ovaj hitni popravak ne možete ukloniti.

Status

Microsoft je potvrdio da je to problem u Microsoftovim proizvodima koji su navedeni u odjeljku „Odnosi se na“.

Napomena: Ovo je članak "FAST PUBLISH" stvoren izravno u Microsoftovoj ustanovi za podršku. Ovdje sadržane informacije pružaju se takve kakve jesu kao odgovor na nove probleme. Kao rezultat brzine stavljanja na raspolaganje, materijali mogu sadržavati tipografske pogreške i mogu se revidirati u bilo kojem trenutku bez prethodne najave. Dodatne napomene potražite u Uvjetima korištenja .