{"id":887,"date":"2015-04-02T09:12:42","date_gmt":"2015-04-02T06:12:42","guid":{"rendered":"http:\/\/www.ozgurguler.net\/?p=887"},"modified":"2015-04-02T09:12:42","modified_gmt":"2015-04-02T06:12:42","slug":"logo-objects-ile-fatura-kesmek","status":"publish","type":"post","link":"https:\/\/www.ozgurguler.net\/blog\/logo-objects-ile-fatura-kesmek\/","title":{"rendered":"Logo Objects ile fatura kesmek"},"content":{"rendered":"<p>Delphi ile kod \u00f6rne\u011fi<\/p>\n<p><!--more--><\/p>\n<table style=\"height: 622px;\" border=\"0\" width=\"683\" cellspacing=\"0\" cellpadding=\"0\">\n<tbody>\n<tr>\n<td class=\"gutter\">\n<div class=\"line number1 index0 alt2\">1<\/div>\n<div class=\"line number2 index1 alt1\">2<\/div>\n<div class=\"line number3 index2 alt2\">3<\/div>\n<div class=\"line number4 index3 alt1\">4<\/div>\n<div class=\"line number5 index4 alt2\">5<\/div>\n<div class=\"line number6 index5 alt1\">6<\/div>\n<div class=\"line number7 index6 alt2\">7<\/div>\n<div class=\"line number8 index7 alt1\">8<\/div>\n<div class=\"line number9 index8 alt2\">9<\/div>\n<div class=\"line number10 index9 alt1\">10<\/div>\n<div class=\"line number11 index10 alt2\">11<\/div>\n<div class=\"line number12 index11 alt1\">12<\/div>\n<div class=\"line number13 index12 alt2\">13<\/div>\n<div class=\"line number14 index13 alt1\">14<\/div>\n<div class=\"line number15 index14 alt2\">15<\/div>\n<div class=\"line number16 index15 alt1\">16<\/div>\n<div class=\"line number17 index16 alt2\">17<\/div>\n<div class=\"line number18 index17 alt1\">18<\/div>\n<div class=\"line number19 index18 alt2\">19<\/div>\n<div class=\"line number20 index19 alt1\">20<\/div>\n<div class=\"line number21 index20 alt2\">21<\/div>\n<div class=\"line number22 index21 alt1\">22<\/div>\n<div class=\"line number23 index22 alt2\">23<\/div>\n<div class=\"line number24 index23 alt1\">24<\/div>\n<div class=\"line number25 index24 alt2\">25<\/div>\n<div class=\"line number26 index25 alt1\">26<\/div>\n<div class=\"line number27 index26 alt2\">27<\/div>\n<div class=\"line number28 index27 alt1\">28<\/div>\n<div class=\"line number29 index28 alt2\">29<\/div>\n<div class=\"line number30 index29 alt1\">30<\/div>\n<div class=\"line number31 index30 alt2\">31<\/div>\n<\/td>\n<td class=\"code\">\n<div class=\"container\">\n<div class=\"line number1 index0 alt2\"><code class=\"delphi keyword\">var<\/code><\/div>\n<div class=\"line number2 index1 alt1\"><code class=\"delphi plain\">data: IData;<\/code><\/div>\n<div class=\"line number3 index2 alt2\"><code class=\"delphi plain\">datalines: UnityObjects_TLB<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">ILines;<\/code><\/div>\n<div class=\"line number4 index3 alt1\"><code class=\"delphi plain\">zaman: OleVariant;<\/code><\/div>\n<div class=\"line number5 index4 alt2\"><code class=\"delphi keyword\">begin<\/code><\/div>\n<div class=\"line number6 index5 alt1\"><code class=\"delphi plain\">data := Logo<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">NewDataObject(doSalesInvoice);<\/code><\/div>\n<div class=\"line number7 index6 alt2\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">New;<\/code><\/div>\n<div class=\"line number8 index7 alt1\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'TYPE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi value\">9<\/code><code class=\"delphi plain\">;<\/code><\/div>\n<div class=\"line number9 index8 alt2\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'NUMBER'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/Fatura No<\/code><\/div>\n<div class=\"line number10 index9 alt1\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'DOC_NUMBER'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/ Belge Numaras\u0131<\/code><\/div>\n<div class=\"line number11 index10 alt2\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'AUXIL_CODE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi string\">'AUTO'<\/code><code class=\"delphi plain\">;<\/code><\/div>\n<div class=\"line number12 index11 alt1\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'DATE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/Tarih<\/code><\/div>\n<div class=\"line number13 index12 alt2\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'DOC_DATE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/ Tarih<\/code><\/div>\n<div class=\"line number14 index13 alt1\"><code class=\"delphi plain\">Logo<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">PackTime(<\/code><code class=\"delphi value\">12<\/code><code class=\"delphi plain\">, <\/code><code class=\"delphi value\">12<\/code><code class=\"delphi plain\">, <\/code><code class=\"delphi value\">12<\/code><code class=\"delphi plain\">, zaman);<\/code><\/div>\n<div class=\"line number15 index14 alt2\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'TIME'<\/code><code class=\"delphi plain\">).Value := zaman;<\/code><\/div>\n<div class=\"line number16 index15 alt1\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'ARP_CODE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/ M\u00fc\u015fteri Kodu<\/code><\/div>\n<div class=\"line number17 index16 alt2\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'POST_FLAGS'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi value\">247<\/code><code class=\"delphi plain\">;<\/code><\/div>\n<div class=\"line number18 index17 alt1\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'PAYMENT_CODE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/ \u00d6deme Plan\u0131<\/code><\/div>\n<div class=\"line number19 index18 alt2\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'SALESMAN_CODE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/ Sat\u0131c\u0131<\/code><\/div>\n<div class=\"line number20 index19 alt1\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'NOTES1'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/A\u00e7\u0131klama<\/code><\/div>\n<div class=\"line number21 index20 alt2\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'SOURCE_WH'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/ Ambar Kodu<\/code><\/div>\n<div class=\"line number22 index21 alt1\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'DIVISION'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/Depo Kodu<\/code><\/div>\n<div class=\"line number23 index22 alt2\"><code class=\"delphi plain\">datalines := data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">DataFields<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">FieldByName(<\/code><code class=\"delphi string\">'TRANSACTIONS'<\/code><code class=\"delphi plain\">).Lines;<\/code><\/div>\n<div class=\"line number24 index23 alt1\"><code class=\"delphi plain\">datalines<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">AppendLine;<\/code><\/div>\n<div class=\"line number25 index24 alt2\"><code class=\"delphi plain\">datalines[<\/code><code class=\"delphi value\">0<\/code><code class=\"delphi plain\">].FieldByName(<\/code><code class=\"delphi string\">'TYPE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi value\">4<\/code><code class=\"delphi plain\">;<\/code><\/div>\n<div class=\"line number26 index25 alt1\"><code class=\"delphi plain\">datalines[<\/code><code class=\"delphi value\">0<\/code><code class=\"delphi plain\">].FieldByName(<\/code><code class=\"delphi string\">'MASTER_CODE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/Stok Kodu<\/code><\/div>\n<div class=\"line number27 index26 alt2\"><code class=\"delphi plain\">datalines[<\/code><code class=\"delphi value\">0<\/code><code class=\"delphi plain\">].FieldByName(<\/code><code class=\"delphi string\">'QUANTITY'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/Adet<\/code><\/div>\n<div class=\"line number28 index27 alt1\"><code class=\"delphi plain\">datalines[<\/code><code class=\"delphi value\">0<\/code><code class=\"delphi plain\">].FieldByName(<\/code><code class=\"delphi string\">'PRICE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/B.Fiyat<\/code><\/div>\n<div class=\"line number29 index28 alt2\"><code class=\"delphi plain\">datalines[<\/code><code class=\"delphi value\">0<\/code><code class=\"delphi plain\">].FieldByName(<\/code><code class=\"delphi string\">'UNIT_CODE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi string\">'ADET'<\/code><code class=\"delphi plain\">;<\/code><\/div>\n<div class=\"line number30 index29 alt1\"><code class=\"delphi plain\">datalines[<\/code><code class=\"delphi value\">0<\/code><code class=\"delphi plain\">].FieldByName(<\/code><code class=\"delphi string\">'VAT_RATE'<\/code><code class=\"delphi plain\">).Value := <\/code><code class=\"delphi comments\">\/\/KdV<\/code><\/div>\n<div class=\"line number31 index30 alt2\"><code class=\"delphi plain\">data<\/code><code class=\"delphi value\">.<\/code><code class=\"delphi plain\">Post<\/code><\/div>\n<\/div>\n<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Delphi ile kod \u00f6rne\u011fi<\/p>\n","protected":false},"author":4,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[19],"tags":[],"class_list":["post-887","post","type-post","status-publish","format-standard","hentry","category-logorapor"],"_links":{"self":[{"href":"https:\/\/www.ozgurguler.net\/blog\/wp-json\/wp\/v2\/posts\/887","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.ozgurguler.net\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.ozgurguler.net\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.ozgurguler.net\/blog\/wp-json\/wp\/v2\/users\/4"}],"replies":[{"embeddable":true,"href":"https:\/\/www.ozgurguler.net\/blog\/wp-json\/wp\/v2\/comments?post=887"}],"version-history":[{"count":1,"href":"https:\/\/www.ozgurguler.net\/blog\/wp-json\/wp\/v2\/posts\/887\/revisions"}],"predecessor-version":[{"id":888,"href":"https:\/\/www.ozgurguler.net\/blog\/wp-json\/wp\/v2\/posts\/887\/revisions\/888"}],"wp:attachment":[{"href":"https:\/\/www.ozgurguler.net\/blog\/wp-json\/wp\/v2\/media?parent=887"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ozgurguler.net\/blog\/wp-json\/wp\/v2\/categories?post=887"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ozgurguler.net\/blog\/wp-json\/wp\/v2\/tags?post=887"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}