Logo Connect Malzeme Kodu > Özel Kod Değiştirme Kuralı

Merhaba Logo Connect’de Malzeme Kodu Yerine Özel Kodu Getirme Kuralı

sub ProcessEvent(App)

Kontrol=App.Doc.FirstChild("TRANSACTIONS.TRANSACTION")
while Kontrol
Ref = App.Doc.FieldAsInteger("TRANSACTIONS.TRANSACTION.MASTER_ORGLOGICALREF")
KODUU = App.Doc.FieldAsInteger("TRANSACTIONS.TRANSACTION.MASTER_CODE")
OZELKOD = App.UQuery_GetFld(1, "SPECODE", 25, 52, FALSE, "LOGICALREF="+ cstr(Ref))
App.Doc.ModifyData "TRANSACTIONS.TRANSACTION.MASTER_CODE", OZELKOD
Kontrol=App.Doc.NextChild
wend
App.Doc.SaveData

end sub

E-Fatura XSLT büyük (uppercase) / küçük (lowercase) harf dönüştürme

Yazmayalı uzun zaman oldu ne kadar daha sık bloglamak istesemde nedense çok beceremiyorum neyse geçelim konumuza.
E-Fatura / E-Arşiv Faturlarında bazı alanların erp yazılımından küçük harf gelsede xslt dönüşümünde büyük harfe dönüştürülmesi ihtiyaç oldu
Benden istenen genel açıklamalar yani notların bulunduğu satırların büyük harfe dönüştürülmesi istendi, çok harika bir çözüm olmasada çözüm şu şekilde Logo Tiger / Go üzerinden çalıştığımızıda belirtelim.
Xslt dosyamızın üst sıralarından bulunan aşağıdaki satırı bulun

<xsl:variable name="XML" select="/"/>

ve hemen alt satıra şu iki satırı eyleyin

 <xsl:variable name="uppercase" select="'ABCDEFGHIİJKLMNOPQRSŞTUVWXYZ'" />

 <xsl:variable name="lowercase" select="'abcdefghıijklmnopqrsştuvwxyz'" />

Bura dikkat ederseiniz harfler bir büyük bir küçük aynı sıra ile yazılmış translate komutu yardımı ise harfleri yer değiştircez xslt dosyasında //n1:Invoice/cbc:Note genel açılamaları temsil ediyor dosyanızdan bu satırı bulun hemen alt satırında aşağıdaki kodu bulacaksınız.

<xsl:value-of select="."></xsl:value-of> 

bu kodu aşağıdaki kod ile yer değiştirin

<xsl:value-of select="translate(.,$lowercase,$uppercase )"></xsl:value-of> 

Hepsi bu kadar unutmadan kaynakta verelim

https://stackoverflow.com/questions/586231/how-can-i-convert-a-string-to-upper-or-lower-case-with-xslt

Logo Objects ile Fatura Kesmek Yöntem 1

Merhaba yoğun taleb ve verdiğim sözler nedeniyle bu örneği yazmam farz oldu.
Bu işe başlamadan önce biraz logoyu, gerek kullanımı, tablo yapısı gibi özelliklerini inceleyin.
anlatma kabiliyetim biraz zayıftır şimdiden özür dilerim.
Lisansınız yoksa yormayın kendinizi !!!!
örnekteki amacım sizin işinizi yapmak değil size küçük bir örnekle yardımcı olmak balık tutumayı öğretmek gibi düşünün bu nedenle yazılım bilginiz konu için yetmiyorsa (zamanla oda olur kimse anasının karnında öğrenmedi) ne olur beni üzmeyin ben sadece 1 adet fatura örneği vereceğim farklı fişler yapma istiyorsanız kartları veya hareketleri dışarı xml olarak atarak xml dosyaları inceyin emin olun çok kısa sürede olayı kavrayacaksınız şimdi bir fatura xml ile başlayaım örnekle bereber xml yi anlayacasınız.

Okumaya devam et Logo Objects ile Fatura Kesmek Yöntem 1

Logo Tiger Kapanmamış Satış Faturlarının Listesi

Logo Tiger Kapanmamış Satış Faturlarının Listesi


SELECT PAYTRANS.CARDREF, PAYTRANS.MODULENR, PAYTRANS.FICHEREF, PAYTRANS.TRCODE, SUM(PAYTRANS.TOTAL) AS FATURA_TOPLAMI, SUM(PAYTRANS.PAID) AS KAPANAN_TUTAR,
SUM(PAYTRANS.TOTAL) - SUM(PAYTRANS.PAID) AS KALAN_TUTAR, CLCARD.CODE, CLCARD.DEFINITION_, CLCARD.TOWN,CLCARD.DISTRICT, CLCARD.TELNRS2, PAYTRANS.PROCDATE AS FATURA_TARIHI,
PAYTRANS.DATE_ AS ODEME_TARIHI,

( SELECT ( SELECT DEFINITION_ FROM lg_001_PAYPLANS WHERE LOGICALREF = PAYDEFREF ) FROM lg_001_03_INVOICE WHERE LOGICALREF = PAYTRANS.FICHEREF ) AS ODEME_PLANI

FROM lg_001_03_PAYTRANS AS PAYTRANS
     LEFT OUTER JOIN lg_001_CLCARD AS CLCARD ON PAYTRANS.CARDREF = CLCARD.LOGICALREF

WHERE PAYTRANS.CARDREF IN ( SELECT LOGICALREF FROM lg_001_CLCARD AS SYN_CLCARD WHERE CODE LIKE '131 %') AND
( SELECT PAYDEFREF FROM lg_001_03_INVOICE WHERE LOGICALREF = PAYTRANS.FICHEREF) IN( 41, 43, 39 ) AND
      PAYTRANS.MODULENR IN( 4 ) AND
      PAYTRANS.PROCDATE <> PAYTRANS.DATE_ AND
      PAYTRANS.DATE_ <= '2016-10-11 00:00:00.000'

GROUP BY PAYTRANS.CARDREF, PAYTRANS.MODULENR, PAYTRANS.FICHEREF, PAYTRANS.TRCODE, CLCARD.CODE, CLCARD.DEFINITION_, CLCARD.TOWN,CLCARD.DISTRICT, CLCARD.TELNRS2, PAYTRANS.PROCDATE, PAYTRANS.DATE_

HAVING SUM(PAYTRANS.TOTAL) - SUM(PAYTRANS.PAID) > 0.99

ORDER BY PAYTRANS.CARDREF;