MİZAN - FİNANS KARŞILAŞTIRMA RAPORU HAKKINDA

[Arkadasca]

.

.
Merhabalar,
Mizanla finansı karşılaştırmak istiyorum... Geçici için hazırlıklara başladık.
Elinde hazır sorgu olan var mı?
Paylaşabilir mi?
Teşekkürler

.

[akcanadana]

Biraz daha açıklama yaparmısın. Sorgu hangi veritabından olacak

[Arkadasca]

Merhaba, ilginiz için teşekkür ederim.
LOGO TIGER veri tabanında çalışacaktır.

[akcanadana]

VBA mı SQL mi

[Arkadasca]

.
Merhaba,
Elbette VBA olmalıdır. Ancak bu sizi çok uğraştıracak ise SQL olabilir.
VBA Kısmını ben halledebilirim.
Teşekkürler.

.

[akcanadana]

Normal mizan almak kolay fakat yanına Logo verilerini getirmek biraz uğraştırıcı Veritabanını iyi bilmek gerekir. Muhasebe ana hesaplarının Logo bakiyelerini biraz daha kolay ama kırılım hesapların Logo bakiyeleri biraz uğraştırıcı Logo verileri borç-alacak-bakiyemi olacak yoksa sadece bakiyemi

[Arkadasca]

.

Merhabalar,
Siz geçici çalışmalarını nasıl yapıyorsunuz?
İstediğimiz raporda, cari kodu, adı, borç alacak muhasebe bakiye finans bakiye olması yeterlidir

[akcanadana]

Mıhasebe hesaplarında her cari için ayrı kod mu açıldı. Yoksa muhasebe tekbir hesap kodu ile mi takip ediliyor.

[Arkadasca]

.
Muhasebe hesaplarında her bir cari için ayrı kod açılmıştır.

Ancak muhasebe ile ilgili olmayan,
diğer modüller için gerekli olup
muhasebe kodu boş olan carilerde vardır.
Örnek: Cari kart kodu:101
Cari kartın içinden muhasebe kodu kısmı:000

[Arkadasca]

.
Günceldir.


,

[cousen]

Kod: Tümünü seç

SELECT 

[Cari Kodu]=CLCARD.CODE,
[Cari Adı]=CLCARD.DEFINITION_,
[Muhasebe Hesap Kodu]=ISNULL((SELECT CODE FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF)),0),
[Muhasebe Hesap Adı]=ISNULL((SELECT DEFINITION_ FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF)),0),

[Ocak Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_<=1 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Ocak Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE MONTH_<=1 AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Şubat Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_=2 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Şubat Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_=2  AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Mart Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_=3 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Mart Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_=3  AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Nisan Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_=4 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Nisan Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_=4  AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Mayıs Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_=5 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Mayıs Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_=5  AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Haziran Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_=6 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Haziran Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_=6  AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Temmuz Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_=7 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Temmuz Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_=7  AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Ağustos Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_=8 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Ağustos Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_=8  AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Eylül Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_=9 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Eylül Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_=9 AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Ekim Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_=10 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Ekim Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_=10  AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Kasım Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_=11 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Kasım Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_=11  AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Aralık Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_=12 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Aralık Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_=12  AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0),

[Genel Muhasebe]=ISNULL((SELECT SUM(EMF.DEBIT-EMF.CREDIT) FROM LG_022_01_EMFLINE EMF WHERE MONTH_<=12 AND CANCELLED=0 AND ACCOUNTREF IN(SELECT LOGICALREF FROM LG_022_EMUHACC WHERE LOGICALREF=(SELECT ACCOUNTREF FROM LG_022_CRDACREF WHERE TRCODE=5 AND  CLCARD.LOGICALREF=CARDREF))),0),
[Genel Cari]=ISNULL((SELECT SUM(CASE SIGN WHEN 0 THEN AMOUNT ELSE AMOUNT * - 1 END) FROM LG_022_01_CLFLINE WHERE  MONTH_<=12  AND CANCELLED=0 AND   CLCARD.LOGICALREF=CLIENTREF),0)

FROM 
LG_022_CLCARD AS CLCARD
WHERE CARDTYPE<>22



ORDER BY 
[Cari Kodu],
[Cari Adı],
[Muhasebe Hesap Kodu],
[Muhasebe Hesap Adı]

[Arkadasca]

Merhabalar,

İlginiz için çok teşekkür ederim.

Bu rapor tüm carilerin dökümünü veriyor. Sadece hareket görenleri (Sıfırdan büyük olanları) nasıl alabiliriz?

Ayrıca rapor sonundaki "Genel muhasebe" ve "Genel Cari" kurgusu nasıldır?
12 Ay içindeki ortalamayı mı alıyor?

Tekrar teşekkür eder, sağlıklı günler dilerim.

[cousen]

Kod: Tümünü seç

SELECT 
Cari_Tür=CASE WHEN SATIRLAR.CLIENTREF>0 THEN 'Cari' WHEN FATURA.FROMKASA>0 THEN 'Kasa' WHEN FATURA.FROMBANK>0 THEN 'Banka' ELSE '' END, 

Cari_Hesap_Kodu=CASE  WHEN FATURA.FROMKASA>0 THEN
(SELECT KASA.CODE FROM LG_020_KSCARD KASA WHERE KASA.LOGICALREF =(SELECT B.CARDREF FROM LG_020_01_KSLINES B WHERE FATURA.KASTRANSREF = B.LOGICALREF)) 
WHEN FATURA.FROMBANK>0 THEN 
(SELECT BANKA.CODE FROM LG_020_BANKACC BANKA WHERE BANKA.LOGICALREF =(SELECT B.BNACCREF
FROM LG_020_01_BNFLINE B WHERE FATURA.BNTRANSREF = B.LOGICALREF)) WHEN SATIRLAR.CLIENTREF>0 THEN CARI.CODE
ELSE '' END,

Cari_Hesap_Adı=CASE WHEN SATIRLAR.CLIENTREF>0 THEN CARI.DEFINITION_ WHEN 
FATURA.FROMKASA>0 THEN(SELECT KASA.NAME FROM LG_020_KSCARD KASA WHERE KASA.LOGICALREF =(SELECT B.CARDREF FROM LG_020_01_KSLINES B WHERE FATURA.KASTRANSREF = B.LOGICALREF))
WHEN FATURA.FROMBANK>0 THEN 
(SELECT BANKA.DEFINITION_ FROM LG_020_BANKACC BANKA WHERE BANKA.LOGICALREF =(SELECT B.BNACCREF
FROM LG_020_01_BNFLINE B WHERE FATURA.BNTRANSREF = B.LOGICALREF)) WHEN SATIRLAR.CLIENTREF>0 THEN CARI.DEFINITION_
ELSE '' END,
'Müşteri Kodu'=CS.CODE,'Müşteri Adı'=CS.TITLE,
Fatura_Grup= case when GRPCODE=1 then 'Giren Fatura' when GRPCODE=2 then 'Çıkan Fatura' else '' end, 
Fatura_Türü= CASE WHEN FATURA.TRCODE=1 THEN 'Satın Alma Faturası' 
WHEN FATURA.TRCODE=2 THEN 'Perakende Satış İade Faturası' 
WHEN FATURA.TRCODE=3 THEN 'Toptan Satış İade Faturası' 
WHEN FATURA.TRCODE=4 THEN 'Alınan Hizmet Faturası' 
WHEN FATURA.TRCODE=5 THEN 'Alınan Proforma Fatura' 
WHEN FATURA.TRCODE=6 THEN 'Alım İade Faturası' 
WHEN FATURA.TRCODE=7 THEN 'Perakende Satış Faturası' 
WHEN FATURA.TRCODE=8 THEN 'Toptan Satış Faturası' 
WHEN FATURA.TRCODE=9 THEN 'Verilen Hizmet Faturası' 
WHEN FATURA.TRCODE=10 THEN 'Verilen Proforma Fatura' 
WHEN FATURA.TRCODE=13 THEN 'Alınan Fiyat Farkı Faturası' 
WHEN FATURA.TRCODE=14 THEN 'Verilen Fiyat Farkı Faturası' 
WHEN FATURA.TRCODE=26 THEN 'Müstahsil Makbuzu' 
ELSE ''END,
Logo_Kullanıcı=ISNULL(KUL.NAME,''),
Ekleme_Tarihi=CONVERT(DATETIME,FATURA.CAPIBLOCK_CREADEDDATE,104),
Satış_Temsilcisi=ISNULL(LG_SLSMAN.DEFINITION_,''),
Ambar_Kodu=SATIRLAR.SOURCEINDEX,
Fatura_Tarihi=CONVERT(DATETIME,FATURA.DATE_,104),
Fatura_Belge_No=FATURA.DOCODE,
Fatura_Fiş_No=FATURA.FICHENO,
Satır_Kodu=CASE WHEN SATIRLAR.LINETYPE=0 THEN  'Stok' WHEN SATIRLAR.LINETYPE=4 THEN 'Hizmet' 
WHEN SATIRLAR.LINETYPE=3 THEN 'Masraf' ELSE '' END,
Stok_Hizmet_Kodu=CASE WHEN SATIRLAR.LINETYPE=0 THEN  KART.CODE WHEN SATIRLAR.LINETYPE=4 THEN HİZ.CODE ELSE '' END,
Stok_Hizmet_Adı=CASE WHEN SATIRLAR.LINETYPE=0 THEN  KART.NAME WHEN SATIRLAR.LINETYPE=4 THEN HİZ.DEFINITION_ ELSE '' END,
Miktar=SATIRLAR.AMOUNT,
Birim=UNITSETL.CODE,
Birim_Fiyat=SATIRLAR.PRICE,
Birim_Tutar=SATIRLAR.TOTAL,
İnidirm_Tutarı=(SATIRLAR.TOTAL-SATIRLAR.VATMATRAH),
İndirim_Oranı=ISNULL((SATIRLAR.TOTAL-SATIRLAR.VATMATRAH)/ NULLIF((SATIRLAR.TOTAL),''),''),
Net_Tutarı=SATIRLAR.VATMATRAH,
Kdv_Oranı=SATIRLAR.VAT,
Kdv_Tutarı=SATIRLAR.VATAMNT,
Genel_Toplam=(SATIRLAR.VATMATRAH+SATIRLAR.VATAMNT),
Açıklama=FATURA.GENEXP1,
Muhasebe_Fiş_No=ISNULL(FİŞ.FICHENO,'')


           
FROM
LG_020_01_INVOICE FATURA LEFT OUTER JOIN
LG_020_01_STLINE SATIRLAR ON SATIRLAR.INVOICEREF = FATURA.LOGICALREF  LEFT OUTER JOIN
LG_020_ITEMS KART ON SATIRLAR.STOCKREF=KART.LOGICALREF LEFT OUTER JOIN
LG_020_CLCARD CARI ON CARI.LOGICALREF=SATIRLAR.CLIENTREF  LEFT OUTER JOIN
LG_SLSMAN ON LG_SLSMAN.LOGICALREF=SATIRLAR.SALESMANREF LEFT OUTER JOIN
LG_020_UNITSETL UNITSETL ON SATIRLAR.UOMREF = UNITSETL.LOGICALREF 
LEFT OUTER JOIN L_CAPIUSER AS KUL ON  FATURA.CAPIBLOCK_CREATEDBY=KUL.NR
LEFT OUTER JOIN LG_020_01_EMFICHE FİŞ ON FİŞ.LOGICALREF=FATURA.ACCFICHEREF
LEFT OUTER JOIN LG_020_SRVCARD HİZ ON HİZ.LOGICALREF=SATIRLAR.STOCKREF
LEFT OUTER JOIN LG_CSTVND CS      ON CS.LOGICALREF=CARI.LOGICALREF
WHERE SATIRLAR.LINETYPE IN (0,4) AND FATURA.CANCELLED=0 AND  SATIRLAR.CANCELLED=0  AND SATIRLAR.BILLED=1 

ORDER BY
FATURA.DATE_ DESC,
FATURA.FICHENO,
FATURA.DOCODE,
SATIRLAR.INVOICELNNO

Bu daha ayrıntılısı bir kontrol edin.

[Arkadasca]

Bu daha ayrıntılısı bir kontrol edin.

Merhabalar,

İlginiz ve paylaşımınız için çok teşekkür ederim.

Sizin en son göndermiş olduğunuz gelen ve giden faturalarını dökümünü veriyor.

Sıfırdan bütük olan Muhasebe borç alacak bakiye ile, Sıfırdan bütük olan finans borç alacak bakiye karşılaştırmak istiyorum. VBA İle aylık veya haftalık raporlama yapmam gerek...

Bunun için siz ne tür bir çalışma yapıyorsunuz?

En kolay ve en hızlı nasıl çözebilirim?