Dutch NL Version and payment file format

andy76
andy76 Member Posts: 616
edited 2009-03-12 in NAV/Navision Classic Client
Hello,

does somebody of you have good experience with NAV NL localization?
Do you know if the incoming payment files of international format SWIFT MT 940 are managed?
If yes, can these objects be integrated in another localizations? How are they identificables?

Thank you

Comments

  • Marc5150
    Marc5150 Member Posts: 9
    Hi,

    The following protocols are supported in telebanking NL:
    CLIEOP3 (exporteren)
    BTL91 (exporteren)
    BBV (exporteren)
    PAYMUL (exporteren)
    Swift MT940 (importeren)
    Rabobank mut.asc (importeren)
    Rabobank vvmut.asc (importeren)
    Rabobank ASCII (importeren)

    So yes, swift MT940 is supported.
    import is handled via a dataport so I guess integration in another localisation is possible.

    Greetz,
    Marc
  • andy76
    andy76 Member Posts: 616
    I have seen that there is a dataport in version NAV NL Dataport : 11000000 - Import Swift MT940 but I don't know this localization and we can not see the code being partner of CH - Swiss Microsoft.
    Is it possible to see the code of this dataport?
  • DenSter
    DenSter Member Posts: 8,307
    I don't know exactly what you need to do to get it, but I'm pretty sure it is possible for you to get a partner license for other localizations. Get in touch with your Microsoft contact to get more information. It might take a while.
    Daniel Rimmelzwaan
    RIS Plus, LLC
  • Marc5150
    Marc5150 Member Posts: 9
    Here's the onAfterImportRecord code to give you an idea.
    Tag := FindTag;
CASE Tag OF
  '25':
    BEGIN //accountnumber from accountlist
      InitHeadCloseValues;
      ImpHeadAccountno := DELCHR(GetText(5,35),'<','0');
    END;

  Text1000003,Text1000004:
    BEGIN // last delivery, message continued
      ImpHeadDebCred          := GetText(6,1);
      ImpHeadPerviousDate      := GetDate(7,6,Text1000005);
      ImpHeadOpeningBalanceCurrency := GetText(13,3);
      ImpHeadOpeningBalance       := GetDecimal(16,16,',');
      ProcessHeader;
    END;

  '61': //contents of the changes
    BEGIN
      //FirstNetChangeLine
      InitLneVariables;
      ImpLneCurrencyDate := GetDate(5,6,Text1000005);
      ImpLnrDebCred     := GetText(11,1);
      IF NOT (ImpLnrDebCred IN [Text1000006,Text1000007]) THEN BEGIN
        Shift := 4;
        ImpLnrDebCred := GetText(11+Shift,1);
      END;

      IF (UPPERCASE(GetText(12+Shift,1)) IN ['A'..'Z']) THEN
        Shift := Shift + 1;

      ImpLneAmount := GetDecimal(12+Shift,16,',');
      ProcessLine;
      DescriptionBelongsToLine := TRUE;
    END;

   '86',Text1000008://Description
     BEGIN
       ImpLneDescriptionCount := ImpLneDescriptionCount+1;
       IF Tag=Text1000008 THEN
         ImpLneDescription := GetText(1,65)
       ELSE
         ImpLneDescription := GetText(5,65);
       ProcessRemark;
     END;
   Text1000009,Text1000010:
     BEGIN  //Closing balance
       ImpClsDebCred              := GetText(6,1);
       ImpSltLastDate         := GetDate(7,6,Text1000005);
       ImpCltLastAmountCurrencyCode := GetText(13,3);
       ImpCltLastAmount           := GetDecimal(16,16,',');
       ProcessClose;
       DescriptionBelongsToLine  := FALSE;
     END;

    //Tag 64 and 65 are not nessesary
END;

    Greetz,
    Marc

Categories