Globālo dimensiju kodi netiek pārnesti uz tabulu "Kust. virsgrāmatas ieraksts" (21) un tabulu "DK ieraksts" (17), kā paredzēts Microsoft Dynamics NAV 2009 R2 Austrumeiropas versijā

Attiecas uz
Dynamics NAV 2009

Šis raksts attiecas uz Microsoft Dynamics NAV Austrumeiropas (EE) reģionam.

Pazīmes

Pieņemsim, ka izveidojat pārdošanas pasūtījumu, kurā ir ietverta priekšapmaksa Microsoft Dynamics NAV 2009 R2 Austrumeiropas versijā. Grāmatojot pārdošanas pasūtījuma galīgo rēķinu, ieraksti tiek ģenerēti tabulā "Virsgrāmatas ieraksts" (21) un tabulā "DK ieraksts" (17). Tomēr globālo dimensiju kodi netiek pārsūtīti uz tabulām.

Risinājums

Informācija par labojumfailu

Atbalstīts labojumfails tagad ir pieejams no Microsoft. Tomēr tas ir paredzēts tikai šajā rakstā aprakstītās problēmas novēršanai. Lietojiet to tikai sistēmām, kurās rodas šī konkrētā problēma. Šim labojumfailam var tikt veiktas papildu pārbaudes. Tāpēc, ja šī problēma jūs nopietni neietekmē, ieteicams gaidīt nākamo Microsoft Dynamics NAV servisa pakotni vai nākamo Microsoft Dynamics NAV versiju, kurā ir šis labojumfails.

Piezīme Īpašos gadījumos maksa, kas parasti tiek piemērota par atbalsta zvaniem, var tikt atcelta, ja Microsoft Dynamics un saistīto produktu tehniskā atbalsta speciālists nosaka, ka problēma tiks novērsta, instalējot noteiktu atjauninājumu. Parasti atbalsta izmaksas attiecas uz jautājumiem par papildu atbalstu un problēmām, kas neskar specifisko atjauninājumu apspriešanu.

            
          

Informācija par instalāciju

Microsoft sniedz programmēšanas piemērus tikai ilustrācijai, bez tiešas vai netiešas garantijas. Tas ietver, bet neaprobežojas ar netiešām garantijām par piemērotību pārdošanai vai piemērotībai noteiktam mērķim. Šajā rakstā tiek pieņemts, ka pārzināt demonstrējamo programmēšanas valodu un rīkus, kas tiek izmantoti procedūru izveidei un atkļūdošanai. Microsoft atbalsta inženieri var palīdzēt izskaidrot konkrētās procedūras funkcionalitāti, bet viņi šos piemērus nemodificēs, lai nodrošinātu papildu funkcionalitāti vai veidotu procedūras, kas atbilst jūsu specifiskajām prasībām.

Piezīme Pirms šī labojumfaila instalēšanas pārliecinieties, vai visi Microsoft Navision klienta lietotāji ir atteikušies no sistēmas. Tas ietver Microsoft Navision lietojumprogrammu pakalpojumu (NAS) klienta lietotājus. Jūs esat vienīgais klienta lietotājs, kurš ir pieteicies, ieviešot šo labojumfailu.

Lai ieviestu šo labojumfailu, ir nepieciešama izstrādātāja licence.

Iesakām lietotāja kontam logā Windows pieteikšanās vai datu bāzes pieteikšanās logā piešķirt lomas ID "SUPER". Ja lietotāja kontam nevar piešķirt "SUPER" lomas ID, jums ir jāpārbauda, vai lietotāja kontam ir šādas atļaujas:

  • Modificēt objektu, kuru mainīsit.
  • Izpildes atļauja sistēmas objekta ID 5210 un sistēmas objekta ID 9015.

                
Piezīme. Jums nav tiesību uz datu krātuvēm, ja vien jums nav jāveic datu labošana.

Koda izmaiņas

Piezīme Pirms labojumu lietošanas ražošanas datoros vienmēr pārbaudiet koda labojumus kontrolētā vidē.
Lai atrisinātu šo problēmu, veiciet tālāk norādītās darbības.

  1. Pievienojiet jaunu funkciju GetDimValueCode dienasgrāmatas rindas dimensiju tabulā (356), kā norādīts tālāk.

    PROCEDURE GetDimValueCode@1470000(DimCode@1470000 : Code[20]) DimValueCode : Code[20];
    BEGIN
    SETRANGE("Dimension Code",DimCode);
    IF FINDFIRST THEN
    DimValueCode := "Dimension Value Code";
    SETRANGE("Dimension Code");
    END;
    
  2. Mainiet funkcijas PostVATCorrection kodu koda vienībā "Pārdošanas pasta avansi" (26585) šādi:
    Esošais kods

    ...
    GenJnlLine."Advance VAT Base Amount" := BaseToDeductLCY;
    GenJnlLine."Advance Exch. Rate Difference" := VATOffsetAmount - VATAmountLCY;
    GenJnlLine.VALIDATE(Amount,VATAmountLCY);
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim);
    ...
    

    Aizstāšanas kods

    ...
    GenJnlLine."Advance VAT Base Amount" := BaseToDeductLCY;
    GenJnlLine."Advance Exch. Rate Difference" := VATOffsetAmount - VATAmountLCY;
    GenJnlLine.VALIDATE(Amount,VATAmountLCY);
    
    // Add the following lines. 
    GenJnlLine."Shortcut Dimension 1 Code" := TempJnlLineDim.GetDimValueCode(GLSetup."Global Dimension 1 Code");
    GenJnlLine."Shortcut Dimension 2 Code" := TempJnlLineDim.GetDimValueCode(GLSetup."Global Dimension 2 Code");
    // End of the lines. 
    
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim);
    ...
    
  3. Mainiet funkcijas PostPaymentCorrection kodu koda vienībā "Pārdošanas pasta avansi" (26585) šādi:
    Esošs kods 1

    ...
    LedgEntryDim.SETRANGE("Table ID",DATABASE::"Cust. Ledger Entry");
    LedgEntryDim.SETRANGE("Entry No.",LinkedAdvanceEntry."Entry No.");
    DimMgt.CopyLedgEntryDimToJnlLineDim(LedgEntryDim,TempJnlLineDim);
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim);
    UNTIL LinkedAdvanceEntry.NEXT = 0;
    ...
    

    Nomaiņas kods 1

    ...
    LedgEntryDim.SETRANGE("Table ID",DATABASE::"Cust. Ledger Entry");
    LedgEntryDim.SETRANGE("Entry No.",LinkedAdvanceEntry."Entry No.");
    DimMgt.CopyLedgEntryDimToJnlLineDim(LedgEntryDim,TempJnlLineDim);
    
    // Add the following lines. 
    GenJnlLine."Shortcut Dimension 1 Code" := TempJnlLineDim.GetDimValueCode(GLSetup."Global Dimension 1 Code");
    GenJnlLine."Shortcut Dimension 2 Code" := TempJnlLineDim.GetDimValueCode(GLSetup."Global Dimension 2 Code");
    // End of the lines. 
    
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim);
    UNTIL LinkedAdvanceEntry.NEXT = 0;
    ...
    

    Esošs kods 2

    ...
    GenJnlLine.VALIDATE("Amount (LCY)",-PrepaidAmountLCY);
    GenJnlLine."Applies-to Doc. Type" := GenJnlLine."Applies-to Doc. Type"::Invoice;
    GenJnlLine."Applies-to Doc. No." := SalesInvHeader."No.";
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim2);
    ...
    

    Nomaiņas kods 2

    ...
    GenJnlLine.VALIDATE("Amount (LCY)",-PrepaidAmountLCY);
    GenJnlLine."Applies-to Doc. Type" := GenJnlLine."Applies-to Doc. Type"::Invoice;
    GenJnlLine."Applies-to Doc. No." := SalesInvHeader."No.";
    
    // Add the following lines. 
    GenJnlLine."Shortcut Dimension 1 Code" := TempJnlLineDim2.GetDimValueCode(GLSetup."Global Dimension 1 Code");
    GenJnlLine."Shortcut Dimension 2 Code" := TempJnlLineDim2.GetDimValueCode(GLSetup."Global Dimension 2 Code");
    // End of the lines. 
    
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim2);
    ...
    
  4. Mainiet funkcijas PostVATCorrection kodu koda vienībā "Iegādes pasta avansi" (26586) šādi:
    Esošais kods

    ...
    GenJnlLine."Advance VAT Base Amount" := BaseToDeductLCY;
    GenJnlLine."Advance Exch. Rate Difference" := VATOffsetAmount - VATAmountLCY;
    GenJnlLine.VALIDATE(Amount,VATAmountLCY);
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim);
    ...
    

    Aizstāšanas kods

    ...
    GenJnlLine."Advance VAT Base Amount" := BaseToDeductLCY;
    GenJnlLine."Advance Exch. Rate Difference" := VATOffsetAmount - VATAmountLCY;
    GenJnlLine.VALIDATE(Amount,VATAmountLCY);
    
    // Add the following lines. 
    GenJnlLine."Shortcut Dimension 1 Code" := TempJnlLineDim.GetDimValueCode(GLSetup."Global Dimension 1 Code");
    GenJnlLine."Shortcut Dimension 2 Code" := TempJnlLineDim.GetDimValueCode(GLSetup."Global Dimension 2 Code");
    // End of the lines. 
    
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim);
    ...
    
  5. Mainiet kodu funkcijas PostPaymentCorrection koda vienībā "Iegādes pasta avansi" (26586) šādi:
    Esošs kods 1

    ...
    LedgEntryDim.SETRANGE("Table ID",DATABASE::"Vendor Ledger Entry");
    LedgEntryDim.SETRANGE("Entry No.",LinkedAdvanceEntry."Entry No.");
    DimMgt.CopyLedgEntryDimToJnlLineDim(LedgEntryDim,TempJnlLineDim);
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim);
    UNTIL LinkedAdvanceEntry.NEXT = 0;
    ...
    

    Nomaiņas kods 1

    ...
    LedgEntryDim.SETRANGE("Table ID",DATABASE::"Vendor Ledger Entry");
    LedgEntryDim.SETRANGE("Entry No.",LinkedAdvanceEntry."Entry No.");
    DimMgt.CopyLedgEntryDimToJnlLineDim(LedgEntryDim,TempJnlLineDim);
    
    // Add the following lines. 
    GenJnlLine."Shortcut Dimension 1 Code" := TempJnlLineDim.GetDimValueCode(GLSetup."Global Dimension 1 Code");
    GenJnlLine."Shortcut Dimension 2 Code" := TempJnlLineDim.GetDimValueCode(GLSetup."Global Dimension 2 Code");
    // End of the lines. 
    
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim);
    UNTIL LinkedAdvanceEntry.NEXT = 0;
    ...
    

    Esošs kods 2

    ...
    GenJnlLine.VALIDATE("Amount (LCY)",-PrepaidAmountLCY);
    GenJnlLine."Applies-to Doc. Type" := GenJnlLine."Applies-to Doc. Type"::Invoice;
    GenJnlLine."Applies-to Doc. No." := PurchInvHeader."No.";
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim2);
    ...
    

    Nomaiņas kods 2

    ...
    GenJnlLine.VALIDATE("Amount (LCY)",-PrepaidAmountLCY);
    GenJnlLine."Applies-to Doc. Type" := GenJnlLine."Applies-to Doc. Type"::Invoice;
    GenJnlLine."Applies-to Doc. No." := PurchInvHeader."No.";
    
    // Add the following lines. 
    GenJnlLine."Shortcut Dimension 1 Code" := TempJnlLineDim2.GetDimValueCode(GLSetup."Global Dimension 1 Code");
    GenJnlLine."Shortcut Dimension 2 Code" := TempJnlLineDim2.GetDimValueCode(GLSetup."Global Dimension 2 Code");
    // End of the lines. 
    
    GenJnlPostLine.RunWithCheck(GenJnlLine,TempJnlLineDim2);
    ...
    

Priekšnosacījumi

Lai lietotu šo labojumfailu, jābūt instalētai Microsoft Dynamics NAV 2009 R2 Austrumeiropas versijai.

Noņemšanas informācija

Šo labojumfailu nevar noņemt.

Statuss

Microsoft apstiprināja, ka šī ir problēma Microsoft produktos, kas norādīti sadaļā "attiecas uz".

Piezīme Šis ir "ĀTRĀS PUBLICĒŠANAS" raksts, kas izveidots tieši Microsoft atbalsta organizācijā. Šeit ietvertā informācija tiek sniegta tāda, kāda tā ir, reaģējot uz jauniem jautājumiem. Ātrās pieejamības rezultātā materiālos var būt drukas kļūdas, un tos var pārskatīt jebkurā laikā bez iepriekšēja brīdinājuma. Citus apsvērumus skatiet lietošanas nosacījumos .