Manglende streng i CT NHO-filen i den italienske versjonen av Microsoft Dynamics NAV 2009

Informasjon om hurtigreparasjon

En støttet hurtigreparasjon er nå tilgjengelig fra Microsoft. Det er imidlertid bare ment å løse problemet som er beskrevet i denne artikkelen. Bruk den bare på systemer som har dette bestemte problemet. Denne hurtigreparasjonen kan gjennomgå ytterligere testing. Hvis du ikke er alvorlig påvirket av dette problemet, anbefaler vi derfor at du venter på neste oppdateringspakke for Microsoft Dynamics NAV 2009 eller den neste versjonen av Microsoft Dynamics NAV som inneholder denne hurtigreparasjonen.

Obs! I spesielle tilfeller avgifter som vanligvis påløper for støtte samtaler kan avbrytes hvis en kundestøttemedarbeider for Microsoft Dynamics og beslektede produkter avgjør at en bestemt oppdatering løser problemet. Vanlige kundestøttekostnader gjelder for ytterligere kundestøttespørsmål og problemer som ikke dekkes av den gjeldende oppdateringen.

Installasjonsinformasjon

Microsoft bruker ment som eksempler, uten garanti, verken direkte eller indirekte. Dette inkluderer, men er ikke begrenset til, eventuelle stilltiende garantier om salgbarhet eller anvendelighet for særskilte formål. Denne artikkelen forutsetter at du er kjent med programmeringsspråket som anvendes, og verktøyene som brukes til å opprette og feilsøke prosedyrer. Microsofts kundestøtteteknikere kan hjelpe deg med å forklare funksjonaliteten til en bestemt prosedyre. De endrer imidlertid ikke disse eksemplene for å lage forbedret funksjonalitet eller lage prosedyrer som dekker dine spesifikke behov.

Obs! Før du installerer denne hurtigreparasjonen, må du kontrollere at alle brukerne i Microsoft Dynamics NAV-klienten er logget av systemet. Dette inkluderer tjenester for Microsoft Dynamics NAV Application Server (NAS). Du skal bare klient-brukeren som er logget på når du implementerer denne hurtigreparasjonen.

Hvis du vil implementere denne hurtigreparasjonen, må du ha en utviklerlisens.

Vi anbefaler at kontoen i vinduet Windows-pålogging eller i vinduet Database-pålogging være tildelt "SUPER" rolle-ID. Hvis brukerkontoen ikke kan tilordnes "SUPER" rolle-IDen, må du kontrollere at brukerkontoen har følgende tillatelser:

• Endre-tillatelse for objektet du vil endre.

• Tilgangsnivået for systemet objekt-IDen til 5210 objektet og systemet objekt-ID-9015
  
  -objektet.

Obs! Du har ikke tilgangsrettigheter til datalagre med mindre du har til å utføre data reparasjon.

Kodeendringer

Obs! Alltid løser teste koden i et kontrollert miljø før du installerer hurtigreparasjoner til produksjonsdatamaskiner for.

Hvis du vil løse dette problemet, gjør du følgende:

1. Endre koden i globale variabler i kodeenheten SEPA CT-Fyll Eksporter Buffer (1221) som følger:
   Eksisterende kode

   ...HasErrorsErr@1007 : TextConst 'ENU=The journal lines have one or more errors. Correct the errors and try again.';
         FieldIsBlankErr@1006 : TextConst 'ENU=Field %1 must be specified.';
         SameBankErr@1000 : TextConst 'ENU=All lines must have the same bank account as the balancing account.';
   
       PROCEDURE FillExportBuffer@3(VAR GenJnlLine@1000 : Record 81;VAR PaymentExportData@1001 : Record 1226;SEPAFormat@1130000 : 'pain,CBI');
       VAR
   ...
   

   Ny kode

   ...HasErrorsErr@1007 : TextConst 'ENU=The journal lines have one or more errors. Correct the errors and try again.';
         FieldIsBlankErr@1006 : TextConst 'ENU=Field %1 must be specified.';
         SameBankErr@1000 : TextConst 'ENU=All lines must have the same bank account as the balancing account.';
   
   // Add the following line.
        RemitMsg@1001 : TextConst 'ENU=%1 %2';
   
       PROCEDURE FillExportBuffer@3(VAR GenJnlLine@1000 : Record 81;VAR PaymentExportData@1001 : Record 1226;SEPAFormat@1130000 : 'pain,CBI');
       VAR
   ...
   

2. Endre koden i FillExportBuffer -funksjonen i kodeenheten SEPA CT-Fyll Eksporter Buffer (1221) som følger:
   Eksisterende kode 1

   ...SetBankAsSenderBank(BankAccount,SEPAFormat);
             "Transfer Date" := TempGenJnlLine."Posting Date";
             "Document No." := TempGenJnlLine."Document No.";
             Amount := TempGenJnlLine.Amount;
             IF TempGenJnlLine."Currency Code" = '' THEN
               "Currency Code" := GeneralLedgerSetup."LCY Code"
   ...
   

   Ny kode 1

   ...SetBankAsSenderBank(BankAccount,SEPAFormat);
             "Transfer Date" := TempGenJnlLine."Posting Date";
             "Document No." := TempGenJnlLine."Document No.";
   
   // Add the following line.
            "Applies-to Ext. Doc. No." := TempGenJnlLine."Applies-to Ext. Doc. No.";
   
             Amount := TempGenJnlLine.Amount;
             IF TempGenJnlLine."Currency Code" = '' THEN
               "Currency Code" := GeneralLedgerSetup."LCY Code"
   ...
   

   Eksisterende kode 2

   ..."SEPA Message ID" := MessageID;
             "SEPA Payment Information ID" := MessageID + '/' + FORMAT("Entry No.");
             "SEPA End-to-End ID" := MessageID + '/' + FORMAT("Entry No.");
   
   // Delete the following lines.
            AddRemittanceText(TempGenJnlLine.Description);
            IF TempGenJnlLine."Message to Recipient" <> '' THEN
              AddRemittanceText(TempGenJnlLine."Message to Recipient");
   // End of the deleted lines.
   
             ValidatePaymentExportData(PaymentExportData,TempGenJnlLine,SEPAFormat);
             INSERT(TRUE);
           UNTIL TempGenJnlLine.NEXT = 0;
   ...
   

   Ny kode 2

   ..."SEPA Message ID" := MessageID;
             "SEPA Payment Information ID" := MessageID + '/' + FORMAT("Entry No.");
             "SEPA End-to-End ID" := MessageID + '/' + FORMAT("Entry No.");
   
   // Add the following lines.
            IF "Applies-to Ext. Doc. No." <> '' THEN
              AddRemittanceText(STRSUBSTNO(RemitMsg,TempGenJnlLine."Applies-to Doc. Type","Applies-to Ext. Doc. No."))
            ELSE
              AddRemittanceText(TempGenJnlLine.Description);
            IF TempGenJnlLine."Message to Recipient" <> '' THEN
              AddRemittanceText(TempGenJnlLine."Message to Recipient");
   // End of the added lines.
   
             ValidatePaymentExportData(PaymentExportData,TempGenJnlLine,SEPAFormat);
             INSERT(TRUE);
           UNTIL TempGenJnlLine.NEXT = 0;
   ...
   

3. Endre koden i feltene i tabellen Betalingsmåte Eksporter Data (1226) som følger:
   Eksisterende kode

   ...OptionString=[ ,Company,Person] }
       { 125 ;   ;SEPA Partner Type Text;Code4        }
       { 170 ;   ;Creditor No.        ;Code35         }
     }
     KEYS
     {
   ...
   

   Ny kode

   ...OptionString=[ ,Company,Person] }
       { 125 ;   ;SEPA Partner Type Text;Code4        }
       { 170 ;   ;Creditor No.        ;Code35         }
   
   // Add the following line.
      { 173 ;   ;Applies-to Ext. Doc. No.;Code35     }
   
     }
     KEYS
     {
   ...
   

4. Endre koden i feltene i tabellen Bokføringsgruppe-firma Journal Line (81) som følger:
   Eksisterende kode

   ...}
       { 121 ;   ;Prepayment          ;Boolean        }
       { 122 ;   ;Financial Void      ;Boolean       ;Editable=No }
       { 288 ;   ;Recipient Bank Account;Code10      ;TableRelation=IF (Account Type=CONST(Customer)) "Customer Bank Account".Code WHERE (Customer No.=FIELD(Account No.))
                                                                    ELSE IF (Account Type=CONST(Vendor)) "Vendor Bank Account".Code WHERE (Vendor No.=FIELD(Account No.))
                                                                    ELSE IF (Bal. Account Type=CONST(Customer)) "Customer Bank Account".Code WHERE (Customer No.=FIELD(Bal. Account No.))
   ...
   

   Ny kode

   ...}
       { 121 ;   ;Prepayment          ;Boolean        }
       { 122 ;   ;Financial Void      ;Boolean       ;Editable=No }
   
   // Add the following line.
      { 173 ;   ;Applies-to Ext. Doc. No.;Code35     }
   
       { 288 ;   ;Recipient Bank Account;Code10      ;TableRelation=IF (Account Type=CONST(Customer)) "Customer Bank Account".Code WHERE (Customer No.=FIELD(Account No.))
                                                                    ELSE IF (Account Type=CONST(Vendor)) "Vendor Bank Account".Code WHERE (Vendor No.=FIELD(Account No.))
                                                                    ELSE IF (Bal. Account Type=CONST(Customer)) "Customer Bank Account".Code WHERE (Customer No.=FIELD(Bal. Account No.))
   ...
   

Forutsetninger

Du må ha én av de følgende programmene installert for å bruke denne hurtigreparasjonen:

• Den italienske versjonen av Microsoft Dynamics NAV 2009 R2

• Den italienske versjonen av Microsoft Dynamics NAV 2009 SP1

Informasjon om fjerning

Du kan ikke fjerne denne hurtigreparasjonen.