Simptome
Atunci când o intrare este negativă (corecție), sistemul va automat să presupunem că este un export. Cu toate acestea, indicațiile CBS declara este un import negativă. Prin urmare, ar trebui să existe o funcționalitate afirmă semnul de intrare (negativ sau pozitiv) și semnul ar trebui să nu influențează starea de Import sau Export. Această problemă se produce în următoarele produse:
-
Versiunea în limba olandeză de Microsoft Dynamics NAV 2009 R2
-
Versiunea în limba olandeză Microsoft Dynamics NAV 2009 Service Pack 1
Rezolvare
Informații despre remedierea rapidă
Un hotfix acceptat este acum disponibil de la Microsoft. Cu toate acestea, acesta este destinat numai corectării problemei descrise în acest articol. Aplicați-o numai pe sistemele care întâmpină această problemă anume. Această remediere rapidă poate să necesite testare suplimentară. De aceea, dacă nu sunteți grav afectat de această problemă, vă recomandăm să așteptați următorul pachet service pack Microsoft Dynamics NAV 2009 sau versiunea Microsoft Dynamics NAV următoare, care conține această remediere rapidă.
Notă În cazuri speciale, costurile implicate de obicei pentru asistență apeluri pot fi anulate dacă un specialist în asistență tehnică pentru Microsoft Dynamics și produse asociate stabilește că o anumită actualizare va rezolva problema. Se vor aplica costurile uzuale de asistenţă pentru întrebări suplimentare de asistenţă şi pentru probleme ce nu fac obiectul actualizării în cauză.Informaţii despre instalare
Microsoft furnizează exemple de programare scop ilustrativ, fără nicio garanţie explicită sau implicită. Aceasta include, dar nu se limitează la, garanţiile implicite de vandabilitate sau de potrivire pentru un anumit scop. Acest articol presupune că sunteţi familiarizat cu limbajul de programare care este prezentat şi cu instrumentele utilizate pentru a crea şi a depana proceduri. Specialiștii în asistență Microsoft pot ajuta la explicarea funcționalității unei anumite proceduri. Cu toate acestea, nu vor modifica aceste exemple pentru a furniza funcționalitate suplimentară construi proceduri pentru a răspunde cerințelor dvs. specifice.
Notă Înainte de a instala această remediere rapidă, verificați dacă toți utilizatorii de client Microsoft Dynamics NAV sunt log off sistemul. Aceasta include servicii Microsoft Dynamics NAV Application Server (NAS). Ar trebui să fie singurul client utilizatorului care este conectat când implementați această remediere rapidă. Pentru a implementa această remediere rapidă, trebuie să aveți o licență de dezvoltare. Vă recomandăm că contul de utilizator în fereastra Conectări Windows sau în fereastra Conectări bază de date se atribuie "SUPER" rolul ID-ul. În cazul în care contul de utilizator nu poate fi atribuit ID-ul "SUPER" rolul, trebuie să verificați că contul de utilizator are următoarele permisiuni:-
Modify permisiunea pentru obiectul care se va schimba.
-
Permisiunea de executare pentru obiectul sistem obiect ID 5210 și sistem obiect ID 9015
obiect.
Notă Nu trebuie să aveți drepturi de la magazine de date decât dacă trebuie să efectuați o reparare de date.
Modificări de cod
Notă Întotdeauna test cod remediază într-un mediu controlat înainte de a aplica remedieri pentru computerele de producție.
Pentru a rezolva această problemă, urmați acești pași:-
Modificați codul din crea Decl. Disk raportul Intrastat (11413) după cum urmează:
Cod existent 1...SpecialUnit@1000002 : Decimal;
RoundedWeight@1000001 : Integer; ItemDirection@1000004 : Integer; BEGIN TESTFIELD("Item No."); TESTFIELD("Tariff No."); ...Înlocuirea cod 1
...SpecialUnit@1000002 : Decimal;
RoundedWeight@1000001 : Integer; ItemDirection@1000004 : Integer; // Add the following line IsCorrection@1000005 : Boolean; // End of the added line. BEGIN TESTFIELD("Item No."); TESTFIELD("Tariff No."); ...Cod existent 2
...ZeroShipment := FALSE;
END; END; Write(FORMAT(Date, 0, '<Year4><Month,2>')); Write(FORMAT(ItemDirection)); ...Înlocuirea cod 2
...
ZeroShipment := FALSE; END; END; // Add the following line. IsCorrection := CheckCorrection("Source Entry No.",ItemDirection); // End of the added line. Write(FORMAT(Date, 0, '<Year4><Month,2>')); Write(FORMAT(ItemDirection)); ...Cod existent 3
...Write(PADSTR2("Transaction Type", 1, '', '>'));
Write(PADSTR2(DELCHR("Tariff No."), 8, '0', '<')); Write('00'); Write(Sign(RoundedWeight)); // DELETED Write(PADSTR2(FORMAT(RoundedWeight, 0, '<Integer>'), 10, ' ', '<')); ...Înlocuirea cod 3
...Write(PADSTR2("Transaction Type", 1, '', '>'));
Write(PADSTR2(DELCHR("Tariff No."), 8, '0', '<')); Write('00'); // Add the following line. Write(Sign(RoundedWeight,IsCorrection)); // End of the added line. Write(PADSTR2(FORMAT(RoundedWeight, 0, '<Integer>'), 10, ' ', '<')); ...Cod existent 4
...Write(PADSTR2(FORMAT(RoundedWeight, 0, '<Integer>'), 10, ' ', '<'));
// Delete the following line. Write(Sign(SpecialUnit)); // End of the deleted line. Write(PADSTR2(FORMAT(SpecialUnit, 0, '<Integer>'), 10, ' ', '<')); ...Înlocuirea cod 4
...Write(PADSTR2(FORMAT(RoundedWeight, 0, '<Integer>'), 10, ' ', '<'));
// Add the following line. Write(Sign(SpecialUnit,IsCorrection)); // End of the added line. Write(PADSTR2(FORMAT(SpecialUnit, 0, '<Integer>'), 10, ' ', '<')); ...Cod existent 5
...
Write(PADSTR2(FORMAT(SpecialUnit, 0, '<Integer>'), 10, ' ', '<')); // Delete the following line. Write(Sign(Amount)); // End of the deleted line. Write(PADSTR2(FORMAT(Amount, 0, '<Integer>'), 10, ' ', '<')); ...Înlocuirea cod 5
...
Write(PADSTR2(FORMAT(SpecialUnit, 0, '<Integer>'), 10, ' ', '<')); // Add the following line. Write(Sign(Amount,IsCorrection)); // End of the added line. Write(PADSTR2(FORMAT(Amount, 0, '<Integer>'), 10, ' ', '<')); ...Cod existent 6
...Write(PADSTR2(FORMAT(Amount, 0, '<Integer>'), 10, ' ', '<'));
// Delete the following line. Write('+'); // End of the deleted line. Write(PADSTR2('0', 10, ' ', '<')); Write(PADSTR2("Document No.", 10, ' ', '<')); ...Înlocuirea cod 6
...Write(PADSTR2(FORMAT(Amount, 0, '<Integer>'), 10, ' ', '<'));
// Add the following lines. IF IsCorrection THEN Write('-') ELSE // ADDED Write('+'); // End of the added lines. Write(PADSTR2('0', 10, ' ', '<')); Write(PADSTR2("Document No.", 10, ' ', '<')); ...Cod existent 7
...Write(PADSTR2('0', 10, ' ', '<'));
Write(PADSTR2("Document No.", 10, ' ', '<')); // Delete the following line. Write(PADSTR2('', 4, ' ', '>')); // End of the deleted line. Write('000'); Write(PADSTR2("Intrastat Jnl. Batch"."Currency Identifier", 1, ' ', '>')); Write(PADSTR2('', 6, ' ', '>')); ...Înlocuirea cod 7
...Write(PADSTR2('0', 10, ' ', '<'));
Write(PADSTR2("Document No.", 10, ' ', '<')); // Add the following lines. Write(PADSTR2('', 3, ' ', '>')); IF IsCorrection THEN Write('C') ELSE Write(' '); // End of the added lines. Write('000'); Write(PADSTR2("Intrastat Jnl. Batch"."Currency Identifier", 1, ' ', '>')); Write(PADSTR2('', 6, ' ', '>')); ... -
Modificați codul din funcția de Sign in în crearea Decl. Disk raportul Intrastat (11413) după cum urmează:
Cod existent 1...ExportFile.SEEK(ExportFile.POS - 1);
END; // Delete the following line. LOCAL PROCEDURE Sign@1000006(Number@1000000 : Decimal) : Text[1]; // End of the deleted line. BEGIN CASE Number < 0 OF TRUE: ...Înlocuirea cod 1
... ExportFile.SEEK(ExportFile.POS - 1);
END; // Add the following line. LOCAL PROCEDURE Sign@1000006(Number@1000000 : Decimal;IsCorrection@1000001 : Boolean) : Text[1]; // End of the added line. BEGIN CASE Number < 0 OF TRUE: ...Cod existent 2
...BEGIN
CASE Number < 0 OF TRUE: // Delete the following line. EXIT('-'); // End of the deleted line. FALSE: ...Înlocuirea cod 2
...BEGIN
CASE Number < 0 OF TRUE: // Add the following lines. IF NOT IsCorrection THEN EXIT('-') ELSE EXIT('+'); // End of the added lines. FALSE: ...Cod existent 3
...FALSE:
// Delete the following line. EXIT('+'); // End of the deleted line. END; END; ...Înlocuirea cod 3
...FALSE:
// Add the following lines. IF NOT IsCorrection THEN EXIT('+') ELSE EXIT('-'); // End of the added lines. END; END; ... -
Modificați codul din funcția CheckCorrection în crearea Decl. Disk raportul Intrastat (11413) după cum urmează:
Cod existent...CrLf[2] := 10;
END; BEGIN ...Cod de înlocuire
...CrLf[2] := 10;
END; // Add the following lines. PROCEDURE CheckCorrection@1000018(SourceEntryNo@1000000 : Integer;VAR ItemDirection@1000001 : Integer) : Boolean; VAR ItemLedgerEntry@1000002 : Record 32; // End of the added lines. BEGIN ... -
Modificați codul din funcția CrLf în crearea Decl. Disk raportul Intrastat (11413) după cum urmează:
Cod existent...BEGIN
// Delete the following lines. { // Note: Intrastat Jnl. Batch dataitem has MaxIteration = 1 } END. } RDLDATA { } } // End of the deleted lines. ...Cod de înlocuire
...BEGIN
// Add the following lines. WITH ItemLedgerEntry DO BEGIN GET(SourceEntryNo); CASE "Document Type" OF "Document Type"::"Purchase Return Shipment": BEGIN ItemDirection := 6; EXIT(TRUE); END; "Document Type"::"Sales Return Receipt": BEGIN ItemDirection := 7; EXIT(TRUE); END; END; END; END; // End of the added lines. ... -
Modificați codul din funcția CheckCorrection în crearea Decl. Disk raportul Intrastat (11413) după cum urmează:
Cod de înlocuire...// Add the following lines.
BEGIN { // Note: Intrastat Jnl. Batch dataitem has MaxIteration = 1 } END. } RDLDATA { } } // End of the added lines. ...
Cerințe preliminare
Trebuie să aveți unul dintre următoarele produse instalate pentru a aplica această remediere rapidă:
-
Versiunea în limba olandeză de Microsoft Dynamics NAV 2009 R2
-
Versiunea în limba olandeză Microsoft Dynamics NAV 2009 SP1
Eliminare informaţii
Nu se poate elimina această remediere rapidă.
Stare
Microsoft a confirmat că aceasta este o problemă cu produsele Microsoft enumerate în secţiunea „Se aplică la".
Notă Acesta este un articol "rapid publicat" creat direct în cadrul organizației de asistență Microsoft. Informațiile conținute în acest document sunt furnizate ca răspuns la problemele care apar. Ca rezultat al vitezei în a-l face disponibil, materialele pot include erori tipografice și pot fi revizuite în orice moment, fără notificare. Consultați Termenii de utilizarepentru alte considerații.