Süsteem kasutab kirjes ootamatult riigikoodi, kui loote Intrastat-töölehe Microsoft Dynamics NAV 5.0 Hoolduspaketi Service Pack 1 Itaalia versioonis

See artikkel kehtib microsoft Dynamics NAV itaalia keele (it) lokaadi kohta.

Kui loote Intrastat-töölehe Microsoft Dynamics NAV 5.0 hoolduspaketi Service Pack 1 (SP1) itaaliakeelses versioonis, ei kasuta süsteem kandes intrastati tähist. Selle asemel kasutab süsteem riigikoodi.

Sümptomid

Kiirparanduse teave

Microsoftilt on nüüd saadaval toetatud kiirparandus. Siiski on see mõeldud ainult selles artiklis kirjeldatud probleemi lahendamiseks. Rakendage see ainult süsteemidele, kus esineb see konkreetne probleem. See kiirparandus võib saada täiendavaid katseid. Seega, kui see probleem ei mõjuta teid tõsiselt, soovitame oodata järgmist Microsoft Dynamics NAV hoolduspaketti või järgmist Microsoft Dynamics NAV versiooni, mis sisaldab seda kiirparandust.

Märkus. Erijuhtudel võidakse tavaliselt tugiteenuse kõnede eest tehtud tasud tühistada, kui Microsoft Dynamicsi ja seotud toodete tehniline tugitöötaja leiab, et konkreetne värskendus lahendab teie probleemi. Tavapärased toetuskulud kehtivad täiendavatele tugiteenustega seotud küsimustele ja probleemidele, mis ei vasta kõnealuse värskenduse tingimustele.

Lahendus

Installiteave

Microsoft pakub programmeerimise näiteid ainult illustreerimiseks, ilma et garantii oleks väljendatud või kaudselt. See hõlmab kaubastatavuse või kindlaks otstarbeks sobivuse kaudseid garantiisid, kuid mitte ainult. Selles artiklis eeldatakse, et olete tuttav kuvatava programmeerimiskeelega ja tööriistadega, mida kasutatakse protseduuride loomiseks ja silumiseks. Microsofti tugiteenuste insenerid saavad aidata selgitada konkreetse protseduuri funktsionaalsust, kuid nad ei muuda neid näiteid selleks, et pakkuda teie vajadustele vastavaid lisafunktsioone või koostada protseduure.

Märkus. Enne selle kiirparanduse installimist veenduge, et kõik Microsoft Navisioni klientrakenduse kasutajad oleksid süsteemist välja logitud. See hõlmab ka Microsoft Navision Application Servicesi (NAS) klientkasutajaid. Peaksite olema ainus klientkasutaja, kes on sisse logitud, kui rakendate selle kiirparanduse.

Selle kiirparanduse rakendamiseks peab teil olema arendaja litsents.

Soovitame, et aknas Windowsi sisselogimised või aknas Andmebaasi sisselogimised olevale kasutajakontole määrataks "SUPER" rolli ID. Kui kasutajakontole ei saa superrolli ID-d määrata, peate kontrollima, kas kasutajakontol on järgmised õigused.

  • Muudetava objekti muutmisõigus.
  • Süsteemiobjekti ID 5210 ja süsteemiobjekti ID 9015 täitmisõigus.

            
Märkus. Teil pole andmesalvede jaoks õigusi, kui te ei pea tegema andmete parandamist.

Koodi muudatused

Märkus. Enne paranduste rakendamist tööarvutitele testige koodiparandusi alati kontrollitud keskkonnas.
Probleemi lahendamiseks tehke järgmist.

  1. Väljal Kauba nr. - Funktsiooni Intrastat Jnl. reatabel (263) päästik onValidate järgmine:
    Olemasolev kood

    …
    
    "Tariff No." := Item."Tariff No.";
    
    //Delete the following line.
    "Country/Region of Origin Code" := Item."Country/Region of Origin Code";
    
    GetItemDescription;
    

    Asenduskood

    ...
    
    "Tariff No." := Item."Tariff No.";
    
    //Add the following line.
    "Country/Region of Origin Code" := GetIntrastatCountryCode(Item."Country/Region of Origin Code");
    
    GetItemDescription;
    
  2. Muutke tabelis Intrastat Jnl. Line (263) funktsiooni ValidteSourceEntryNo koodi järgmiselt.
    Olemasolev kood

    ...
    
    Date := VATEntry."Document Date"; 
    
    //Delete the following line.
    "Country/Region Code" := VATEntry."Country/Region Code"; 
    
    "VAT Registration No." := VATEntry."VAT Registration No.";
    ...
    

    Asenduskood

    ...
    
    Date := VATEntry."Document Date"; 
    
    //Add the following line.
    "Country/Region Code" := GetIntrastatCountryCode(VATEntry."Country/Region Code");
    
    "VAT Registration No." := VATEntry."VAT Registration No.";
    ...
    
  3. Looge uus funktsioon GetIntrastatCountryCode, mis kasutab tabelis Intrastat Jnl. Line (263) tagastatava väärtuse jaoks kooditüüpi ja kümnendpikkust. Selle funktsiooni loomiseks tehke järgmist.

    1. Lisage uus kohalik paramater ja seejärel määrake paramater järgmiselt.

      • Var:Ei
      • Nimi:Riik/regioonKood
      • DataType:Code
      • Alamtüüp:Riigi/regiooni kood
      • Pikkus:10
    2. Lisage uus kohalik muutuja ja määrake muutuja järgmiselt.

      • Nimi: Riik/regioon
      • DataType:Record
      • Alamtüüp: riik/regioon
    3. Lisage kood järgmiselt:

      IF CountryRegion.GET(CountryRegionCode) THEN
      EXIT(CountryRegion."Intrastat Code");
      
  4. Muutke koodi funktsiooni InsertItemJnlLine aruandes Kaubaandmiku kannete toomine (594) järgmiselt.
    Olemasolev kood 1

    ...
    
    WITH IntrastatJnlLine DO BEGIN
    INIT;
    "Line No." := "Line No." + 10000;
    Date := "Item Ledger Entry"."Last Invoice Date";
    
    //Delete the following line.
    "Country/Region Code" := "Item Ledger Entry"."Country/Region Code";
    
    "Transaction Type" := "Item Ledger Entry"."Transaction Type";
    ...
    

    Asenduskood 1

    ...
    
    WITH IntrastatJnlLine DO BEGIN
    INIT;
    "Line No." := "Line No." + 10000;
    Date := "Item Ledger Entry"."Last Invoice Date";
    
    //Add the following line.
    "Country/Region Code" := GetIntrastatCountryCode("Item Ledger Entry"."Country/Region Code");
    
    "Transaction Type" := "Item Ledger Entry"."Transaction Type";
    ...
    

    Olemasolev kood 2

    ...
    
    IF SalesShipHeader.GET("Item Ledger Entry"."Document No.") THEN BEGIN
    IF Customer.GET(SalesShipHeader."Bill-to Customer No.") THEN BEGIN 
    "VAT Registration No." := Customer."VAT Registration No.";
    
    //Delete the following line.
    "Country/Region Code" := Customer."Country/Region Code"; 
    
    END;
    END ELSE BEGIN
    SalesSetup.GET;
    IF NOT SalesSetup."Shipment on Invoice" THEN BEGIN
    IF SalesInvHeader.GET("Item Ledger Entry"."Document No.") THEN
    IF Customer.GET(SalesInvHeader."Bill-to Customer No.") THEN BEGIN 
    "VAT Registration No." := Customer."VAT Registration No.";
    
    //Delete the following line.
    "Country/Region Code" := Customer."Country/Region Code";
    
    END;
    END ELSE
    IF SalesCrMemoHeader.GET(ValueEntry."Document No.") THEN
    IF Customer.GET(SalesCrMemoHeader."Bill-to Customer No.") THEN BEGIN
    "VAT Registration No." := Customer."VAT Registration No.";
    
    //Delete the following line.
    "Country/Region Code" := Customer."Country/Region Code";
    
    END;
    END; 
    ...
    

    Asenduskood 2

    ...
    
    IF SalesShipHeader.GET("Item Ledger Entry"."Document No.") THEN BEGIN
    IF Customer.GET(SalesShipHeader."Bill-to Customer No.") THEN BEGIN 
    "VAT Registration No." := Customer."VAT Registration No.";
    
    //Add the following line.
    "Country/Region Code" := GetIntrastatCountryCode(Customer."Country/Region Code"); 
    
    END;
    END ELSE BEGIN
    SalesSetup.GET;
    IF NOT SalesSetup."Shipment on Invoice" THEN BEGIN
    IF SalesInvHeader.GET("Item Ledger Entry"."Document No.") THEN
    IF Customer.GET(SalesInvHeader."Bill-to Customer No.") THEN BEGIN 
    "VAT Registration No." := Customer."VAT Registration No.";
    
    //Add the following line.
    "Country/Region Code" := GetIntrastatCountryCode(Customer."Country/Region Code"); 
    
    END;
    END ELSE
    IF SalesCrMemoHeader.GET(ValueEntry."Document No.") THEN
    IF Customer.GET(SalesCrMemoHeader."Bill-to Customer No.") THEN BEGIN
    "VAT Registration No." := Customer."VAT Registration No.";
    
    //Add the following line.
    "Country/Region Code" := GetIntrastatCountryCode(Customer."Country/Region Code"); 
    
    END;
    END; 
    ...
    

    Olemasolev kood 3

    ...
    
    IF IntrastatJnlBatch.Type = IntrastatJnlBatch.Type :: Purchases THEN BEGIN
    IF (ItemVendor.GET("Item Ledger Entry"."Source No.","Item Ledger Entry"."Item No.","Item Ledger Entry"."Variant Code")) AND
    (ItemVendor."Country/Region of Origin Code" <> '') THEN
    
    //Delete the following line.
    "Country/Region of Origin Code" := ItemVendor."Country/Region of Origin Code"
    
    ELSE
    
    //Delete the following line.
    "Country/Region of Origin Code" := Item."Country/Region of Origin Code";
    
    FindSourceCurrency(
    "Item Ledger Entry"."Source No.","Item Ledger Entry"."Document Date","Item Ledger Entry"."Posting Date");
    END ELSE
    
    //Delete the following line.
    "Country/Region of Origin Code" := Item."Country/Region of Origin Code";
    
    
    "Source Type" := "Source Type"::"Item entry";
    ...
    

    Asenduskood 3

    ...
    
    IF IntrastatJnlBatch.Type = IntrastatJnlBatch.Type :: Purchases THEN BEGIN
    IF (ItemVendor.GET("Item Ledger Entry"."Source No.","Item Ledger Entry"."Item No.","Item Ledger Entry"."Variant Code")) AND
    (ItemVendor."Country/Region of Origin Code" <> '') THEN
    
    //Add the following lin.
    "Country/Region of Origin Code" := GetIntrastatCountryCode(ItemVendor."Country/Region of Origin Code")
    
    ELSE
    
    //Add the following line.
    "Country/Region of Origin Code" := GetIntrastatCountryCode(Item."Country/Region of Origin Code");
    
    FindSourceCurrency(
    "Item Ledger Entry"."Source No.","Item Ledger Entry"."Document Date","Item Ledger Entry"."Posting Date");
    END ELSE
    
    //Add the following line.
    "Country/Region of Origin Code" := GetIntrastatCountryCode(Item."Country/Region of Origin Code");
    
    "Source Type" := "Source Type"::"Item entry";
    ...
    
  5. Muutke väljal Kaubaandmiku kannete toomine (594) funktsiooni InsertJobLedgerLine tähist järgmiselt.
    Olemasolev kood

    ...
    
    Date := "Job Ledger Entry"."Posting Date";
    
    //Delete the following line.
    "Country/Region Code" := "Job Ledger Entry"."Country/Region Code";
    
    "Transaction Type" := "Job Ledger Entry"."Transaction Type";
    ...
    

    Asenduskood

    ...
    
    Date := "Job Ledger Entry"."Posting Date";
    
    //Add the following line.
    "Country/Region Code" := GetIntrastatCountryCode("Job Ledger Entry"."Country/Region Code");
    
    "Transaction Type" := "Job Ledger Entry"."Transaction Type";
    ...
    

Eeltingimused

Selle kiirparanduse rakendamiseks peab teil olema installitud Microsoft Dynamics NAV 5.0 hoolduspaketi Service Pack 1 itaaliakeelne versioon.

Eemaldamisteave

Seda kiirparandust ei saa eemaldada.

Microsoft on kinnitanud, et see on jaotises „Rakenduskoht“ loetletud Microsofti toodete korral esinev probleem.

Olek

Märkus. See on otse Microsofti tugiteenuste organisatsioonist loodud FAST PUBLISH-artikkel. Käesolevas artiklis sisalduv teave on esitatud kujul, mis on seotud tekkivate küsimustega. Materjali kättesaadavaks tegemise kiiruse tõttu võivad materjalid sisaldada kirjavigu ja neid võib igal ajal ette teatamata läbi vaadata. Muid kaalutlusi leiate teemast Kasutustingimused .