Acest articol se aplică la Microsoft Dynamics NAV pentru setările regionale de limbă portugheză (pt).
Simptome
Să presupunem că creați un fișier SAF-T în versiunea portugheză de Microsoft Dynamics NAV. Când verificați fișierul .xml creat, observați că valoarea din fișierul NumberOfEntries este incorectă. Vă așteptați ca valoarea să fie aceeași ca numărul tranzacțiilor din baza de date.
Această problemă apare în cazul următoarelor produse:
- Versiunea portugheză de Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
- Versiunea portugheză de Microsoft Dynamics NAV 2009 R2
- Versiunea portugheză de Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1)
Rezolvare
Informații despre remedierea rapidă
O remediere rapidă acceptată este acum disponibilă de la Microsoft. Însă, scopul său este doar să corecteze problema descrisă în acest articol. Aplicați-o doar sistemelor care se confruntă cu această problemă specifică. Această remediere rapidă poate fi testată suplimentar. De aceea, dacă această problemă nu vă afectează grav, vă recomandăm să așteptați următorul pachet Service Pack Microsoft Dynamics NAV 2009 sau versiunea următoare Microsoft Dynamics NAV care conține această remediere rapidă.
Notă În cazuri speciale, costurile implicate de obicei pentru apelurile de asistență pot fi revocate dacă un specialist în asistență tehnică pentru Microsoft Dynamics și produsele asociate stabilește că o anumită actualizare va rezolva problema. Costurile uzuale de suport se vor aplica pentru întrebări suplimentare de suport și pentru probleme ce nu fac obiectul actualizării în chestiune.
Informații despre instalare
Microsoft oferă exemple de programare numai în scop ilustrativ, fără nicio garanție explicită sau implicită. Aceasta include, dar nu se limitează la, garanțiile implicite de vandabilitate sau adecvare pentru un anumit scop. Acest articol presupune că sunteți familiarizat cu limbajul de programare prezentat și cu instrumentele utilizate pentru a crea și a depana proceduri. Inginerii de asistență Microsoft pot ajuta la explicarea funcționalității unei anumite proceduri, însă nu vor modifica aceste exemple pentru a furniza funcționalitate suplimentară și nu vor construi proceduri pentru a răspunde cerințelor dvs. specifice.
Notă Înainte de a instala această remediere rapidă, verificați dacă toți utilizatorii clientului Microsoft Navision sunt deconectați de la sistem. Printre aceștia se numără utilizatorii clienților Microsoft Navision Application Services (NAS). Ar trebui să fiți singurul utilizator client conectat atunci când implementați această remediere rapidă.
Pentru a implementa această remediere rapidă, trebuie să aveți o licență de dezvoltator.
Recomandăm ca contului de utilizator din fereastra Conectări Windows sau din fereastra Conectări bază de date să primească ID-ul de rol "SUPER". În cazul în care contului de utilizator nu i se poate atribui ID-ul de rol "SUPER", trebuie să verificați dacă acel cont de utilizator are următoarele permisiuni:
- Permisiunea Modificare pentru obiectul pe care îl veți modifica.
- Permisiunea de executare pentru obiectul cu ID obiect de sistem 5210 și pentru obiectul ID obiect de sistem 9015.
Notă: nu trebuie să aveți drepturi asupra depozitelor de date decât dacă trebuie să efectuați repararea datelor.
Modificări de cod
Notă: testați întotdeauna remedierile de cod într-un mediu controlat înainte de a aplica remedierile la computerele de producție.
Pentru a rezolva această problemă, urmați acești pași:
Modificați codul din elementele din SAF-T PT XMLPort (13301), după cum urmează:
Cod existent
... { [{2FBD739B-4063-4410-80DA-15187CE38CB6}];5 ;CreditAmount ;Element ;Text ; VariableName=EntriesSalesLnCreditAmount } { [{158561B4-B3C1-4D40-9FE8-2260247EFFE4}];1 ;SourceDocuments ;Element ;Text ; Export::OnBeforePassVariable=BEGIN IF TotalDocs = 0 THEN ...Codul de înlocuire
... { [{2FBD739B-4063-4410-80DA-15187CE38CB6}];5 ;CreditAmount ;Element ;Text ; VariableName=EntriesSalesLnCreditAmount } // Add the following lines. { [{3CD38B38-F1FA-494A-9863-2B919BF4B14B}];2 ;Journal ;Element ;Table ; VariableName=EntriesBlankSourceCode; SourceTable=Table2000000026; Export::OnPreXMLItem=BEGIN EntriesBlankSourceCode.SETRANGE(Number,1,1); Window.UPDATE(1,Text1110008); END; Export::OnAfterGetRecord=BEGIN IF NOT CheckGLRegBlankSourceCode THEN currXMLport.SKIP; ClearTempRec; REPEAT GetGLEntries; UNTIL TempGLReg.NEXT = 0; EntriesBlankJnlID := 'VAZIO'; EntriesBlankJnlDescription := 'VAZIO'; Window.UPDATE(2,''); END; } { [{4829023A-4C43-4746-B15E-55BE1C8A77BC}];3 ;JournalID ;Element ;Text ; VariableName=EntriesBlankJnlID } { [{AC925688-8EBD-4477-BE49-731F4647CF75}];3 ;Description ;Element ;Text ; VariableName=EntriesBlankJnlDescription } { [{EA486FCE-6103-4895-AE4A-A970D1AA69E5}];3 ;Transaction ;Element ;Table ; VariableName=EntriesBlankTr; SourceTable=Table2000000026; Export::OnPreXMLItem=BEGIN TempGLEntry.RESET; EntriesBlankTr.SETRANGE(Number,1,TempGLEntry.COUNT); TempGLEntry.FINDFIRST; END; Export::OnAfterGetRecord=BEGIN ApplyFilters; EntriesBlankTrID := FORMAT(FORMAT(TempGLEntry."Posting Date",0,9) + ' ' + EntriesBlankJnlID + ' ' + TempGLEntry."Document No."); EntriesBlankDocArchivalNumber := TempGLEntry."Document No."; EntriesBlankTrPeriod := FORMAT(GetPeriod(TempGLEntry."Posting Date"),0,9); EntriesBlankTrDate := FORMAT(NORMALDATE(TempGLEntry."Posting Date"),0,9); IF CLOSINGDATE(TempGLEntry."Posting Date") = TempGLEntry."Posting Date" THEN EntriesBlankTransactionType := 'A' ELSE EntriesBlankTransactionType := 'N'; EntriesBlankTrDescription := EntriesBlankJnlDescription; EntriesBlankGLPostingDate := GetGLentryCreationDateTime(TempGLEntry."Entry No."); TempGLEntry.NEXT; END; } { [{1A2E1328-2281-4276-B7F2-93032558BF4D}];4 ;TransactionID ;Element ;Text ; VariableName=EntriesBlankTrID } { [{7238FAE0-4177-49F2-88D7-322E3479BEDF}];4 ;Period ;Element ;Text ; VariableName=EntriesBlankTrPeriod } { [{CB2AE9CA-4533-4F21-A5F0-9DB125CCE6A7}];4 ;TransactionDate ;Element ;Text ; VariableName=EntriesBlankTrDate } { [{06565DE9-009E-4CD1-9567-F869ADD6AF09}];4 ;Description ;Element ;Text ; VariableName=EntriesBlankTrDescription } { [{FC7AF546-FDA6-4409-9A11-E8C3F08B0245}];4 ;DocArchivalNumber ;Element ;Text ; VariableName=EntriesBlankDocArchivalNumber } { [{0D9858E8-71B7-4730-ACD3-208CB18E55D5}];4 ;TransactionType ;Element ;Text ; VariableName=EntriesBlankTransactionType } { [{7A0CC2BE-C3C8-4EDA-A616-C17000B3631C}];4 ;GLPostingDate ;Element ;Text ; VariableName=EntriesBlankGLPostingDate } { [{F7668B87-49B8-4CB6-8316-D1440A5E3ABA}];4 ;Line ;Element ;Table ; VariableName=EntriesLinedBlankDbtAmt; SourceTable=Table2000000026; Export::OnPreXMLItem=BEGIN TempGLEntry2.SETFILTER("Debit Amount",'<>% 1',0); IF NOT TempGLEntry2.FINDFIRST THEN currXMLport.BREAK; EntriesLinedBlankDbtAmt.SETRANGE(Number,1,TempGLEntry2.COUNT); END; Export::OnAfterGetRecord=BEGIN EntriesLnBlankDbtAmtRecordID := FORMAT(TempGLEntry2."Entry No.",0,9); EntriesLnBlankDbtAmtAccountID := TempGLEntry2."G/L Account No."; EntriesLnBlankDbtAmtSysEntDate := GetGLentryCreationDateTime(TempGLEntry2."Entry No."); EntriesLnBlankDbtAmtDescr := TempGLEntry2.Description; EntriesLnBlankDebitAmount := FORMAT(TempGLEntry2."Debit Amount",0,9); TempGLEntry2.NEXT; END; } { [{455ABAA5-310A-4999-B349-FF32D14A1968}];5 ;RecordID ;Element ;Text ; VariableName=EntriesLnBlankDbtAmtRecordID } { [{82412AE1-E33F-4DC9-837E-8E7AAEEFE2ED}];5 ;AccountID ;Element ;Text ; VariableName=EntriesLnBlankDbtAmtAccountID } { [{448EE384-AF3E-4A02-AC66-373591BC28CD}];5 ;SystemEntryDate ;Element ;Text ; VariableName=EntriesLnBlankDbtAmtSysEntDate } { [{9F8171F0-A12E-49B6-A00D-93745204EB23}];5 ;Description ;Element ;Text ; VariableName=EntriesLnBlankDbtAmtDescr } { [{1BD67E80-3CC3-41DF-86B7-7A9FF3514B36}];5 ;DebitAmount ;Element ;Text ; VariableName=EntriesLnBlankDebitAmount } { [{35FC60AD-0217-4D95-978A-FFAD08D66558}];4 ;Line ;Element ;Table ; VariableName=EntriesLinedBlankCrAmt; SourceTable=Table2000000026; Export::OnPreXMLItem=BEGIN TempGLEntry2.SETRANGE("Debit Amount"); TempGLEntry2.SETFILTER("Credit Amount",' <>%1',0); IF NOT TempGLEntry2.FINDFIRST THEN currXMLport.BREAK; EntriesLinedBlankCrAmt.SETRANGE(Number,1,TempGLEntry2.COUNT); END; Export::OnAfterGetRecord=BEGIN EntriesLnBlankCrAmtRecordID := FORMAT(TempGLEntry2."Entry No.",0,9); EntriesLnBlankCrAmtAccountID := TempGLEntry2."G/L Account No."; EntriesLnBlankCrAmtSysEntrDate := GetGLentryCreationDateTime(TempGLEntry2."Entry No."); EntriesLnBlankCrAmtDescr := TempGLEntry2.Description; EntriesLnBlankCreditAmount := FORMAT(TempGLEntry2."Credit Amount",0,9); TempGLEntry2.NEXT; END; } { [{42970CEB-47B1-4737-9067-5D8310FCFA39}];5 ;RecordID ;Element ;Text ; VariableName=EntriesLnBlankCrAmtRecordID } { [{C236B36C-53F0-4FD1-ABCF-28828E216114}];5 ;AccountID ;Element ;Text ; VariableName=EntriesLnBlankCrAmtAccountID } { [{AEC885C8-FCE9-4C04-BBFB-B1A6B7540DDA}];5 ;SystemEntryDate ;Element ;Text ; VariableName=EntriesLnBlankCrAmtSysEntrDate } { [{D2F54DEF-3BF6-4F7F-BCB9-384A96BE514D}];5 ;Description ;Element ;Text ; VariableName=EntriesLnBlankCrAmtDescr } { [{F1DA085A-9AC4-4DB4-AC54-DA77AFE7CCAD}];5 ;CreditAmount ;Element ;Text ; VariableName=EntriesLnBlankCreditAmount } // End of the added lines. { [{158561B4-B3C1-4D40-9FE8-2260247EFFE4}];1 ;SourceDocuments ;Element ;Text ; Export::OnBeforePassVariable=BEGIN IF TotalDocs = 0 THEN ...Modificați codul din funcția SetData din SAF-T PT XMLPort (13301), după cum urmează:
Cod existent
... GLEntry.RESET; // No. of transactions GetOpenGLRegister; // Delete the following lines. IF SourceCode.FINDSET THEN REPEAT IF CheckGLReg THEN REPEAT TempGLEntry3.DELETEALL; GLEntry2.RESET; GLEntry2.SETRANGE("Entry No.",TempGLReg."From Entry No.",TempGLReg."To Entry No."); IF GLEntry2.FINDSET THEN REPEAT TempGLEntry3.RESET; TempGLEntry3.SETCURRENTKEY("Document No.","Posting Date"); TempGLEntry3.SETRANGE("Document No.",GLEntry2."Document No."); TempGLEntry3.SETRANGE("Posting Date",GLEntry2."Posting Date"); IF NOT TempGLEntry3.FINDFIRST THEN BEGIN NoOfTransactions += 1; TempGLEntry3.INIT; TempGLEntry3.TRANSFERFIELDS(GLEntry2); TempGLEntry3.INSERT; END; UNTIL GLEntry2.NEXT=0; UNTIL TempGLReg.NEXT = 0; UNTIL SourceCode.NEXT = 0; // End of the deleted lines. // Sales Invoice Docs SalesInvoice.RESET; SalesInvoice.SETFILTER("Posting Date",'%1..%2',StartDate3,EndDate2); ...Codul de înlocuire
... GLEntry.RESET; // No. of transactions GetOpenGLRegister; // Add the following lines. TempGLEntry3.DELETEALL; IF SourceCode.FINDSET THEN REPEAT IF CheckGLReg THEN REPEAT CalcNoOfTransactions(TempGLReg."From Entry No.",TempGLReg."To Entry No.",TempGLEntry3); UNTIL TempGLReg.NEXT = 0; UNTIL SourceCode.NEXT = 0; IF CheckGLRegBlankSourceCode THEN REPEAT CalcNoOfTransactions(TempGLReg."From Entry No.",TempGLReg."To Entry No.",TempGLEntry3); UNTIL TempGLReg.NEXT = 0; // End of the added lines. // Sales Invoice Docs SalesInvoice.RESET; SalesInvoice.SETFILTER("Posting Date",'%1..%2',StartDate3,EndDate2); ...Modificați codul din documentația din SAF-T PT XMLPort (13301), după cum urmează:
Cod existent
... EXIT(FORMAT(DateParam,0,9) + 'T' + FORMAT(TimeParam,0,'<Hours24,2><Filler Character,0>:<Minutes,2>:<Seconds,2>')); END; // Delete the following lines. BEGIN END. } } // End of the deleted lines. ...Codul de înlocuire
... EXIT(FORMAT(DateParam,0,9) + 'T' + FORMAT(TimeParam,0,'<Hours24,2><Filler Character,0>:<Minutes,2>:<Seconds,2>')); END; // Add the following lines. LOCAL PROCEDURE CalcNoOfTransactions@1110021(FromEntryNo@1110000 : Integer;ToEntryNo@1110001 : Integer;VAR TempGLEntry@1110002 : Record 17); VAR GLEntry@1110003 : Record 17; BEGIN GLEntry.RESET; GLEntry.SETRANGE("Entry No.",TempGLReg."From Entry No.",TempGLReg."To Entry No."); IF GLEntry.FINDSET THEN REPEAT TempGLEntry.RESET; TempGLEntry.SETCURRENTKEY("Document No.","Posting Date"); TempGLEntry.SETRANGE("Document No.",GLEntry."Document No."); TempGLEntry.SETRANGE("Posting Date",GLEntry."Posting Date"); TempGLEntry.SETRANGE("Source Code",GLEntry."Source Code"); IF NOT TempGLEntry.FINDFIRST THEN BEGIN NoOfTransactions += 1; TempGLEntry.INIT; TempGLEntry.TRANSFERFIELDS(GLEntry); TempGLEntry.INSERT; END; UNTIL GLEntry.NEXT=0; END; LOCAL PROCEDURE CheckGLRegBlankSourceCode@1110022() : Boolean; BEGIN TempGLReg.RESET; TempGLReg.SETFILTER("Posting Date",'%1..%2',StartDate3,CLOSINGDATE(EndDate2)); TempGLReg.SETRANGE("Source Code",''); EXIT(TempGLReg.FINDFIRST); END; BEGIN END. } } // End of the added lines. ...
Cerințe preliminare
Trebuie să aveți instalat unul dintre următoarele produse pentru a aplica această remediere rapidă:
- Versiunea portugheză de Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
- Versiunea portugheză de Microsoft Dynamics NAV 2009 R2
- Versiunea portugheză de Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1)
Eliminarea informațiilor
Nu puteți elimina această remediere rapidă.
Stare
Microsoft a confirmat că aceasta este o problemă în produsele Microsoft care sunt listate în secțiunea „Se aplică la”.
Referințe
VSTF DynamicsNAV SE: 263721; 263722
Notă: Acesta este un articol "PUBLICARE RAPIDĂ" creat direct din cadrul organizației de asistență Microsoft. Informațiile din acest document sunt furnizate ca atare ca răspuns la problemele apărute. Ca urmare a vitezei de punere la dispoziție, materialele pot include erori tipografice și pot fi revizuite în orice moment fără preaviz. Consultați Condițiile de utilizare pentru alte considerente.