Polje IBAN u izveštaju "PORUDŽBENICA – izvoz N34.1" (7000060) nema proverenu valjanost kada štampate izveštaj za nalog za plaćanje koji koristi tip međunarodnog transfera iz španske verzije programa Microsoft Dynamics NAV 2009

Primenjuje se na
Microsoft Dynamics NAV 2009 R2 Dynamics NAV 2009 Service Pack 1

Ovaj članak se odnosi na Microsoft Dynamics NAV za lokalni standard španskog jezika (es).

Simptomi

Kada odštampate izveštaj "PORUDŽBENICA – izvoz N34.1" (7000060) za nalog za plaćanje koji koristi tip međunarodnog transfera u verziji programa Microsoft Dynamics NAV 2009 na španskom jeziku, IBAN polju se ne proverava valjanost. Sistem izvozi datoteku prenosa i zamenjuje IBAN polje pomoću nula, iako je IBAN polje prazno.
Ovaj problem se javlja u sledećim proizvodima:

  • Španska verzija programa Microsoft Dynamics NAV 2009 R2
  • Španska verzija usluge Microsoft Dynamics NAV 2009 servisni paket 1 (SP1)

      

Rešenje

Informacije o hitnim ispravkama

Podržana hitna ispravka je sada dostupna od korporacije Microsoft. Međutim, namena je samo za rešavanje problema koji je opisan u ovom članku. Primenite je samo na sisteme koji imaju ovaj određeni problem. Ova hitna ispravka može proći dodatno testiranje. Stoga, ako ovaj problem ne utiče ozbiljno, preporučujemo da sačekate sledeći servisni paket za Microsoft Dynamics NAV 2009 ili sledeću verziju programa Microsoft Dynamics NAV koja sadrži ovu hitnu ispravku.

Napomena: U posebnim slučajevima, troškovi koji se obično nastaju za pozive podršci mogu biti otkazani ako stručnjak za tehničku podršku za Microsoft Dynamics i srodne proizvode utvrdi da će određena ispravka rešiti problem. Uobičajeni troškovi podrške primenjivaće se na dodatna pitanja podrške i probleme koji ne ispunjavaju uslove za određenu ispravku u pitanju.

            
          

Informacije o instalaciji

Microsoft pruža primere programiranja samo za ilustraciju, bez izričite ili podrazumevane garancije. Ovo uključuje, ali nije ograničeno na, podrazumevane garancije o podesnosti za prodaju ili o podesnosti za određenu namenu. U ovom članku se pretpostavlja da ste upoznati sa programskim jezikom koji se demonstrira i sa alatkama koje se koriste za kreiranje procedura i otklanjanje grešaka. Inženjeri Microsoft podrške mogu da vam objasne funkcionalnost određene procedure, ali neće izmeniti ove primere da bi obezbedili dodatnu funkcionalnost ili konstruisali procedure koje ispunjavaju vaše određene zahteve.

Napomena: Pre nego što instalirate ovu hitnu ispravku, proverite da li su svi korisnici Microsoft Navision klijenta odjavljeni iz sistema. To uključuje korisnike Microsoft Navision Application Services (NAS) klijenta. Vi bi trebalo da budete jedini korisnik klijenta koji je prijavljen kada primenjujete ovu hitnu ispravku.

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

Preporučujemo da se korisničkom nalogu u prozoru "Prijavljivanje u operativni sistem Windows" ili u prozoru "Prijavljivanje u bazu podataka" dodeli ID uloge "SUPER". Ako korisničkom nalogu nije moguće dodeliti ID uloge "SUPER", morate da proverite da li korisnički nalog ima sledeće dozvole:

  • Dozvola "Izmeni" za objekat koji ćete menjati.
  • Dozvola za izvršavanje za objekat sistema ID 5210 i za objekat sistema ID 9015.

                
Napomena: Ne morate da imate prava na skladišta podataka osim ako ne morate da izvršite popravku podataka.

Promene kodova

Napomena: Popravke kodova uvek testirajte u kontrolisanom okruženju pre nego što ih primenite na računare proizvodnje.
Pratite ove korake da biste rešili problem:

  1. Promenite kôd u gen. Journal Line - OnAfterGetRecord trigger in the Export Electronic Plaćanja report (10721) na sledeći način:
    Postojeći kôd

    ...
FIELDERROR(Amount,STRSUBSTNO(Text1100002,FIELDCAPTION("Bank Payment Type"),FORMAT("Bank Payment Type")));

ElectPmtMgmt.GetPayeeInfo("Account No.",VendorCCCBankNo,VendCCCBankBranchNo,VendCCCControlDigits,

// Delete the following line.
VendCCCAccNo,PayeeAddress,PayeeCCC,IBAN,SwiftCode);

Vendor.GET("Account No.");
CalcAmountPaid("Gen. Journal Line");
...

    Kôd za zamenu

    ...
FIELDERROR(Amount,STRSUBSTNO(Text1100002,FIELDCAPTION("Bank Payment Type"),FORMAT("Bank Payment Type")));

ElectPmtMgmt.GetPayeeInfo("Account No.",VendorCCCBankNo,VendCCCBankBranchNo,VendCCCControlDigits,

// Add the following line.
VendCCCAccNo,PayeeAddress,PayeeCCC,IBAN,SwiftCode,"Transfer Type");

Vendor.GET("Account No.");
CalcAmountPaid("Gen. Journal Line");
...

  2. Promenite kôd u Cartera Doc. - OnAfterGetRecord trigger in the PO - Export N34.1 report (7000060) na sledeći način:
    Postojeći kôd

    ...
DocType := DocMisc.DocType2("Payment Method Code");

ElectPmtMgmt.GetPayeeInfo("Account No.",VendorCCCBankNo,VendCCCBankBranchNo,VendCCCControlDigits,VendCCCAccNo,

// Delete the following line.
PayeeAddress,PayeeCCC,IBAN,SwiftCode);

GetExportedAmount("Payment Order"."No.","Account No.");
...

    Kôd za zamenu

    ...
DocType := DocMisc.DocType2("Payment Method Code");

ElectPmtMgmt.GetPayeeInfo("Account No.",VendorCCCBankNo,VendCCCBankBranchNo,VendCCCControlDigits,VendCCCAccNo,

// Add the following line. 
PayeeAddress,PayeeCCC,IBAN,SwiftCode,"Transfer Type");

GetExportedAmount("Payment Order"."No.","Account No.");
...

  3. Dodajte novi lokalni parametar u funkciju GetPayeeInfo na kartici Elect. Pmts Management Codeunit (10701), a zatim navedite parametar na sledeći način:

    • Ime: TransferType
    • Tip podataka: Opcija
    • Niska opcija: =, Nacionalni, Međunarodni, Specijalni

  4. Promenite kôd u funkciji GetPayeeInfo u dijalogu Elect. Kodna jedinica za upravljanje PMTS (10701) na sledeći način:
    Postojeći kôd

    ...
VendorBankAccount.TABLECAPTION,VendorBankAccount.FIELDCAPTION("Use For Electronic Payments"),
Vendor.TABLECAPTION,Vendor."No.");
VendorBankAccount.FIND('-');

// Delete the following lines.
VendorBankAccount.TESTFIELD("CCC Bank No.");
VendorBankAccount.TESTFIELD("CCC Bank Branch No.");
VendorBankAccount.TESTFIELD("CCC Bank Account No.");
VendorBankAccount.TESTFIELD("CCC Control Digits");

PayeeCCCAccNo := VendorBankAccount."CCC Bank Account No.";
PayeeCCCControlDigits := VendorBankAccount."CCC Control Digits";
PayeeCCCBankNo := VendorBankAccount."CCC Bank No.";
PayeeCCCBankBranchNo := VendorBankAccount."CCC Bank Branch No.";
IF (PayeeCCCBankNo = '') OR (PayeeCCCBankBranchNo = '') OR
(PayeeCCCControlDigits = '') OR (PayeeCCCAccNo = '')
THEN
ERROR(Text1100002,VendorBankAccount."Vendor No.");

PayeeCCCAccNo := PADSTR('',MAXSTRLEN(PayeeCCCAccNo) - STRLEN(PayeeCCCAccNo),'0') + PayeeCCCAccNo;
PayeeCCCControlDigits := PADSTR('',MAXSTRLEN(PayeeCCCControlDigits) - STRLEN(PayeeCCCControlDigits),'0')
+ PayeeCCCControlDigits;

PayeeCCC := CONVERTSTR(PADSTR(PayeeCCCBankNo,4,' '),' ','0') + CONVERTSTR(PADSTR(PayeeCCCBankBranchNo,4,' '),' ','0') +
PADSTR(PayeeCCCControlDigits,2,' ') + CONVERTSTR(PADSTR(PayeeCCCAccNo,10,' '),' ','0');

IBAN := CONVERTSTR(PADSTR(VendorBankAccount.IBAN,34,' '),' ','0');
SwiftCode := CONVERTSTR(PADSTR(VendorBankAccount."SWIFT Code",11,' '),' ','0');
// End of the lines.
...

    Kôd za zamenu

    ...
VendorBankAccount.TABLECAPTION,VendorBankAccount.FIELDCAPTION("Use For Electronic Payments"),
Vendor.TABLECAPTION,Vendor."No.");
VendorBankAccount.FIND('-');

// Add the following lines. 
IF TransferType = TransferType::National THEN BEGIN
VendorBankAccount.TESTFIELD("CCC Bank No.");
VendorBankAccount.TESTFIELD("CCC Bank Branch No.");
VendorBankAccount.TESTFIELD("CCC Bank Account No.");
VendorBankAccount.TESTFIELD("CCC Control Digits");

PayeeCCCAccNo := VendorBankAccount."CCC Bank Account No.";
PayeeCCCControlDigits := VendorBankAccount."CCC Control Digits";
PayeeCCCBankNo := VendorBankAccount."CCC Bank No.";
PayeeCCCBankBranchNo := VendorBankAccount."CCC Bank Branch No.";
IF (PayeeCCCBankNo = '') OR (PayeeCCCBankBranchNo = '') OR
(PayeeCCCControlDigits = '') OR (PayeeCCCAccNo = '')
THEN
ERROR(Text1100002,VendorBankAccount."Vendor No.");

PayeeCCCAccNo := PADSTR('',MAXSTRLEN(PayeeCCCAccNo) - STRLEN(PayeeCCCAccNo),'0') + PayeeCCCAccNo;
PayeeCCCControlDigits := PADSTR('',MAXSTRLEN(PayeeCCCControlDigits) - STRLEN(PayeeCCCControlDigits),'0')
+ PayeeCCCControlDigits;

PayeeCCC := CONVERTSTR(PADSTR(PayeeCCCBankNo,4,' '),' ','0') + CONVERTSTR(PADSTR(PayeeCCCBankBranchNo,4,' '),' ','0') +
PADSTR(PayeeCCCControlDigits,2,' ') + CONVERTSTR(PADSTR(PayeeCCCAccNo,10,' '),' ','0');
END ELSE BEGIN
VendorBankAccount.TESTFIELD(IBAN);
IBAN := CONVERTSTR(PADSTR(VendorBankAccount.IBAN,34,' '),' ','0');
SwiftCode := CONVERTSTR(PADSTR(VendorBankAccount."SWIFT Code",11,' '),' ','0');
END;
// End of the lines. 
...

Preduslovi

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

  • Španska verzija programa Microsoft Dynamics NAV 2009 R2
  • Španska verzija usluge Microsoft Dynamics NAV 2009 servisni paket 1 (SP1)

Informacije o uklanjanju

Ne možete da uklonite ovu hitnu ispravku.

Status

Microsoft je potvrdio da je ovo problem u Microsoft proizvodima koji su navedeni u odeljku „Odnosi se na“.

Napomena: Ovo je članak "BRZO OBJAVLJIVANJE" koji je kreiran direktno u okviru organizacije Microsoft podrške. Informacije koje se nalaze ovde pružaju se kakve jesu kao odgovor na nove probleme. Kao rezultat brzine stavljanja na raspolaganje, materijali mogu sadržavati tipografske greške i mogu se revidirati u bilo kom trenutku bez prethodne najave. Pogledajte Uslove korišćenja za druga razmatranja.