Autor Téma: Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?  (Přečteno 3742 krát)

Offline jtfcobra

  • Plnoletý
  • ***
  • Příspěvků: 240
  • Karma: 0
    • Verze Delphi: XE4,XE5 v testovní
    • XDA Developers
Prosím částečný kod příklad?

Stáhnout XML neni problem stahnout jen z nej vycist data treba do list view?


Nebo CSV?
Kód: Delphi [Vybrat]
  1. accountId;2200018111
  2. bankId;2010
  3. currency;CZK
  4. iban;CZ3520100000002200018111
  5. bic;FIOBCZPPXXX
  6. openingBalance;12894,79
  7. closingBalance;12845,93
  8. dateStart;25.07.2012
  9. dateEnd;15.09.2012
  10. idFrom; 1252062368
  11. idTo; 1255107881
  12. idLastDownload; 1252062367
  13. ID pohybu;Datum;Objem;Měna;Protiúčet;Název protiúčtu;Kód banky;Název banky;KS;VS;SS;Uživatelská identifikace;Zpráva pro
  14. příjemce;Typ;Provedl;Upřesnění;Komentář;BIC;ID pokynu; 1252062368;31.07.2012;0,07;CZK;;;;;;;;;;Připsaný úrok;;;;;2120891307; 1252273009;01.08.2012;-49,00;CZK;1231231231;;2010;“Fio banka, a.s.;0558;;; ;;Platba
  15. převodem uvnitř banky;“Béďa, ““Trávníček“““;; ;;2121709706; 1255107881;31.08.2012;0,07;CZK;;;;;;;;;;Připsaný úrok;;;;;2134853563;



http://www.fio.cz/docs/cz/API_Bankovnictvi.pdf


XML soubor
Kód: Delphi [Vybrat]
  1.  <AccountStatement>
  2. <Info>
  3. <accountId>2111111111</accountId>
  4. <bankId>2010</bankId>
  5. <currency>CZK</currency>
  6. <iban>CZ7920100000002111111111</iban>
  7. <bic>FIOBCZPPXXX</bic>
  8. <openingBalance>7356.22</openingBalance>
  9. <closingBalance>7362.22</closingBalance>
  10. <yearList>2012</ yearList >
  11. <idList>4</ idList >
  12. </Info>
  13. <TransactionList>
  14. <Transaction>
  15. <column_22 id="22" name="ID pohybu">1147301403</column_22>
  16. <column_0 id="0" name="Datum">2012-06-30+02:00</column_0>
  17. <column_1 id="1" name="Objem">7.76</column_1>
  18. <column_14 id="14" name="Měna">CZK</column_14>
  19. <column_8 id="8" name="Typ">Připsaný úrok</column_8>
  20. <column_17 id="17" name="ID pokynu">2099310186</column_17>
  21. </Transaction>
  22. <Transaction>
  23. <column_22 id="22" name="ID pohybu">1147301404</column_22>
  24. <column_0 id="0" name="Datum">2012-06-30+02:00</column_0>
  25. <column_1 id="1" name="Objem">-1.00</column_1>
  26. <column_14 id="14" name="Měna">CZK</column_14>
  27. <column_8 id="8" name="Typ">Odvod daně z úroků</column_8>
  28. <column_17 id="17" name="ID pokynu">2099310186</column_17>
  29. </Transaction>
  30. </TransactionList>
  31. </AccountStatement>

Offline jtfcobra

  • Plnoletý
  • ***
  • Příspěvků: 240
  • Karma: 0
    • Verze Delphi: XE4,XE5 v testovní
    • XDA Developers
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #1 kdy: 11-03-2013, 23:16:03 »
Ted to mam takle nejak to nejde
procedure TForm1.Button3Click(Sender: TObject);
var
    StartItemNode : IXMLNode;
    ANode : IXMLNode;
    SID, sNazev, sPopis,sCas,sCas2,sDatum,sDelka,Skategorie,stelevize : WideString;
 begin
   Listview3.Clear;
   XMLDoc.LoadFromFile('C:\skoda2013\xml.xml');
   StartItemNode := XMLDoc.DocumentElement.ChildNodes.FindNode('Transaction') ;
   ANode := StartItemNode;
   while Assigned(ANode) do
    begin
     SID := ANode.ChildNodes['column_22'].Text;
     snazev := ANode.ChildNodes['Název banky'].Text;
     //add to list view
     with Listview3.Items.Add do
     begin
       Caption := SID;
       SubItems.Add(sNazev);
     end;
   ANode := ANode.NextSibling;
   end;
end;

Offline jtfcobra

  • Plnoletý
  • ***
  • Příspěvků: 240
  • Karma: 0
    • Verze Delphi: XE4,XE5 v testovní
    • XDA Developers
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #2 kdy: 11-03-2013, 23:22:26 »
<column_17 id="17" name="ID pokynu">2099310186</column_17>

chyba je v tomto radku ale nevim jak ho nacist


Kód: Delphi [Vybrat]
  1.    StartItemNode := XMLDoc.DocumentElement.ChildNodes.FindNode('Transaction') ;
  2.    ANode := StartItemNode;
  3.    while Assigned(ANode) do
  4.     begin
  5.      SID := ANode.ChildNodes['column_17'].Text;

tohle kdyz dam tak to nefunguje

Offline jtfcobra

  • Plnoletý
  • ***
  • Příspěvků: 240
  • Karma: 0
    • Verze Delphi: XE4,XE5 v testovní
    • XDA Developers
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #3 kdy: 12-03-2013, 08:38:31 »
Poradí někdo s XML?

Offline < z >

  • Administrátoři
  • Guru
  • *****
  • Příspěvků: 1142
  • Karma: 42
    • Verze Delphi: 7, 2010
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #4 kdy: 12-03-2013, 09:37:59 »
koukam, ze tvuj problem je taky dost slozity a srozumitelny :)

ja pouzival vzdy NativeXML, ale takhle by to taky melo jit ...

takze, co presne nefunguje? neni tam zadny text a ostatni to precte?

Offline jtfcobra

  • Plnoletý
  • ***
  • Příspěvků: 240
  • Karma: 0
    • Verze Delphi: XE4,XE5 v testovní
    • XDA Developers
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #5 kdy: 12-03-2013, 09:41:05 »
no nevypise se mi tento radek <column_17 id="17" name="ID pokynu">2099310186</column_17>



podle mne mu tam vadi tohle  id="17" name="ID pokynu" kdyz to vymazu tak to jde...

Offline jtfcobra

  • Plnoletý
  • ***
  • Příspěvků: 240
  • Karma: 0
    • Verze Delphi: XE4,XE5 v testovní
    • XDA Developers
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #6 kdy: 12-03-2013, 09:43:00 »
jak vypada kod NativeXML?

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 4992
  • Karma: 41
    • Verze Delphi: W10 + Delphi 10.4 professional
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #7 kdy: 12-03-2013, 10:10:32 »
Mal by som byť ticho, lebo sa tomu nerozumiem, ale mne to pripadá, že tie " berie ako riadiace znaky.
W10 64b, Delphi 10.4, FireBird 3.05
Expert na kladenie nejasne formulovaných otázok.

Offline jtfcobra

  • Plnoletý
  • ***
  • Příspěvků: 240
  • Karma: 0
    • Verze Delphi: XE4,XE5 v testovní
    • XDA Developers
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #8 kdy: 12-03-2013, 10:14:15 »
je to divny premyslim nad tim...

Offline Mi.Chal.

  • Guru
  • *****
  • Příspěvků: 576
  • Karma: 25
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #9 kdy: 12-03-2013, 12:15:57 »
Mal by som byť ticho, lebo sa tomu nerozumiem, ale mne to pripadá, že tie " berie ako riadiace znaky.

to je normální XML, hodnoty atributů se dávají vždy do uvozovek (").

Offline jtfcobra

  • Plnoletý
  • ***
  • Příspěvků: 240
  • Karma: 0
    • Verze Delphi: XE4,XE5 v testovní
    • XDA Developers
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #10 kdy: 12-03-2013, 13:07:49 »
A reseni?

Offline Mi.Chal.

  • Guru
  • *****
  • Příspěvků: 576
  • Karma: 25
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #11 kdy: 12-03-2013, 15:02:35 »
A reseni?

bez pořádného popisu není řešení. Dal si sem fragment kódu, ale nepíšeš, co konkrétně nejde - zkus si to odkrokovat a uvidíš, kam to doleze. Já ty Delphi knihovny už moc neznám, kde třeba hledá ta FindNode? Všechno nody rekurzivně nebo jenom její přímé děti? Dává se tam opravdu název elementu nebo to je třeba xpath? atd

Offline pf1957

  • Padawan
  • ******
  • Příspěvků: 2790
  • Karma: 134
    • Verze Delphi: D2007, XE3, DX10

Offline jtfcobra

  • Plnoletý
  • ***
  • Příspěvků: 240
  • Karma: 0
    • Verze Delphi: XE4,XE5 v testovní
    • XDA Developers
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #13 kdy: 13-03-2013, 23:03:27 »
Nechapu jde jen o xml a nevim jak precist...

Z toho data...
<TransactionList>
<Transaction>
<column_22 id="22" name="ID pohybu">1147301403</column_22>
<column_0 id="0" name="Datum">2012-06-30+02:00</column_0>
<column_1 id="1" name="Objem">7.76</column_1>
<column_14 id="14" name="Měna">CZK</column_14>
<column_8 id="8" name="Typ">Připsaný úrok</column_8>
<column_17 id="17" name="ID pokynu">2099310186</column_17>
</Transaction>
<Transaction>
<column_22 id="22" name="ID pohybu">1147301404</column_22>
<column_0 id="0" name="Datum">2012-06-30+02:00</column_0>
<column_1 id="1" name="Objem">-1.00</column_1>
<column_14 id="14" name="Měna">CZK</column_14>
<column_8 id="8" name="Typ">Odvod daně z úroků</column_8>
<column_17 id="17" name="ID pokynu">2099310186</column_17>
</Transaction>
</TransactionList>

Offline pf1957

  • Padawan
  • ******
  • Příspěvků: 2790
  • Karma: 134
    • Verze Delphi: D2007, XE3, DX10
Re:Nacteni XML nebo CSV z FIO banky neni problem ale jak precist XML?
« Odpověď #14 kdy: 14-03-2013, 08:06:02 »
Nechapu jde jen o xml a nevim jak precist...
A od nas cekas co, kdyz neumis/nechces popsat svuj problem? Ze ti posleme funkcni reseni? Proc bychom to delali  :o