Datasnap yetkilendirme üzerine yaptığım küçük bir örnek
https://github.com/lazymule/DatasnapAuthRules
İsmail Kocacan’da borş durmamış Android Client
https://github.com/ismailkocacan/DatasnapAuthRules
Logo Go / Tiger Hareketsiz Carileri Kullanımdışı yapma
Logo Go / Tiger Hareketsiz Carileri Kullanımdışı yapma
with bb as (SELECT LOGICALREF,CODE, DEFINITION_,( select count (CLIENTREF) from dbo.LV_115_01_CLEKSTRE where CLIENTREF = aa.LOGICALREF ) as say FROM dbo.LG_115_CLCARD as aa with (nolock) where CARDTYPE = 3 ) update LG_115_CLCARD set ACTIVE = 1 where LOGICALREF in ( select LOGICALREF from bb where say = 0)
Logo Tiger Depo Bazında Malzeme/Stok Durumları
Malzemlerin listesini depo bazında almak isterseniz aşağıdaki kodu kullanabilirsiniz.
SELECT ITEMS.CODE, ITEMS.NAME, STINVTOT.INVENNO AS DEPO, SUM(STINVTOT.ONHAND) AS MIKTAR FROM LV_001_02_STINVTOT AS STINVTOT LEFT OUTER JOIN LG_001_ITEMS AS ITEMS ON STINVTOT.STOCKREF = ITEMS.LOGICALREF WHERE (ITEMS.CARDTYPE = 1) AND STINVTOT.INVENNO = -1 /* Tüm Depolar için -1 */ GROUP BY ITEMS.CODE, ITEMS.NAME, STINVTOT.INVENNO, ITEMS.CARDTYPE HAVING (SUM(STINVTOT.ONHAND) <> 0)
Logo Tiger / Go veri tabanı
Logo go veya tiger veri tabanı tablolarının , alan isimleri ve bağımlılık tablosuna ulaşmak istiyorsanız link aşağıda tanımlar ingilizce bilginize.
ftp://download.logo.com.tr/Windows/TOOLS/tools/Veritabani/
Logo Objects ile fatura kesmek
1 yılı aşkın bir süredir logo tiger kullanıyorum/z öncelikle copy paste olayı ile hemen hemen her işimizi görüyor. logo da objects kullanmak istiyorsanız ilk olarak lisansınızın olması gerekiyor. register felan nette bir çok sitede var ben sadece delphi ile pek az örnek var küçük bir örnekte ben sunmak istedim. döküman diye fazla kıvranmayın tablo isimleri harici pek fazla döküman bulamazsınız üretici firma ise sadece çözüm ortaklarına destek veriyor. benim tavsiyem ne yapacaksanız fiş fatura vs. logoda yapın ve araçlar veri aktarımı ile dışarı xml atın ve alanları inceleyin aşağıdaki örnek size yol gösterecektir. unutmadan saati herzaman pack etmek zorundasınız.
var data: IData; datalines: UnityObjects_TLB.ILines; zaman: OleVariant; begin data := Logo.NewDataObject(doSalesInvoice); data.New; data.DataFields.FieldByName('TYPE').Value := 9; data.DataFields.FieldByName('NUMBER').Value := //Fatura No data.DataFields.FieldByName('DOC_NUMBER').Value := // Belge Numarası data.DataFields.FieldByName('AUXIL_CODE').Value := 'AUTO'; data.DataFields.FieldByName('DATE').Value := //Tarih data.DataFields.FieldByName('DOC_DATE').Value := // Tarih Logo.PackTime(12, 12, 12, zaman); data.DataFields.FieldByName('TIME').Value := zaman; data.DataFields.FieldByName('ARP_CODE').Value := // Müşteri Kodu data.DataFields.FieldByName('POST_FLAGS').Value := 247; data.DataFields.FieldByName('PAYMENT_CODE').Value := // Ödeme Planı data.DataFields.FieldByName('SALESMAN_CODE').Value := // Satıcı data.DataFields.FieldByName('NOTES1').Value := //Açıklama data.DataFields.FieldByName('SOURCE_WH').Value := // Ambar Kodu data.DataFields.FieldByName('DIVISION').Value := //Depo Kodu datalines := data.DataFields.FieldByName('TRANSACTIONS').Lines; datalines.AppendLine; datalines[0].FieldByName('TYPE').Value := 4; datalines[0].FieldByName('MASTER_CODE').Value := //Stok Kodu datalines[0].FieldByName('QUANTITY').Value := //Adet datalines[0].FieldByName('PRICE').Value := //B.Fiyat datalines[0].FieldByName('UNIT_CODE').Value := 'ADET'; datalines[0].FieldByName('VAT_RATE').Value := //KdV data.Post