Sayfayı Yazdır | Pencereyi Kapat

Cari Muhasebe açiklamalari

Nereden Yazdırıldığı: ERP Nedir? | Türkiye'nin ERP Forum Platformu
Kategori: ERP Temel Paketler
Forum Adı: ERP Yardımcı Programlar Modülü
Forum Tanımlaması: Yardımcı Programlar Modülü İle İlgili Bilgiler ve Sorular İçin...
URL: http://www.erpne.org/forum_posts.asp?TID=741
Tarih: 22 Kasım 2024 Saat 03:31
Program Versiyonu: Web Wiz Forums 11.10 - http://www.webwizforums.com


Konu: Cari Muhasebe açiklamalari
Mesajı Yazan: Conari
Konu: Cari Muhasebe açiklamalari
Mesaj Tarihi: 28 Şubat 2008 Saat 12:30
Dim Aciklama
Dim FISNO
Dim CARI
Set qry = NETSISCORE.NetLibDB.GetNewQuery
qry.RecSQL ("SELECT CARI_ISIM FROM TBLCASABIT WHERE CARI_KOD = '" & GetProgValue("CARI_KODU") & "'")
CARI = LEFT(qry.FieldByName("CARI_ISIM").AsString,20)
qry.Close
FISNO = RIGHT(GetProgValue("FATIRS_NO"),10)
Set qry = Nothing
Aciklama = CARI & "FT.NIZ No:" & FISNO
RESULT = Aciklama
 
sql i sonlandiramiyor kullanan arkadaslar varmi?



Cevaplar:
Mesajı Yazan: vedat
Mesaj Tarihi: 11 Mart 2008 Saat 16:34
kayit tipi olarak cari genel açiklama seçersen düzgün çalisiyor.


Mesajı Yazan: Conari
Mesaj Tarihi: 12 Mart 2008 Saat 13:41

Kayit tipi Cari açiklama veya stok açiklama olmasi önemli degil,

Çekilen sorguyu sonlandiramadigi için degeri alamiyor ve islem sonlandirilamiyor.Program donuyor dogal olarak.


Mesajı Yazan: Conari
Mesaj Tarihi: 21 Nisan 2008 Saat 17:30
Dll falan degistirdim. Çekler için basit sekilde kullaniyorum. Ama sql li scriptler çalismiyor yada ben eksik düzenliyorum.
 
Hiç uygulayaniniz yokmu?Ermm


Mesajı Yazan: Conari
Mesaj Tarihi: 24 Nisan 2008 Saat 11:24
qry.RecSQL ("SELECT CARI_ISIM FROM TBLCASABIT WHERE CARI_KOD = '" & GetProgValue("CARI_KODU") & "'")
 
sorguda WITH (NOLOCK) kullanmadigim için sanirim olmuyormus.Asagidaki sekilde oldu.
 
qry.RecSQL ("SELECT TOP 1 CARI_ISIM FROM TBLCASABIT WITH (NOLOCK) WHERE CARI_KOD = '" & GetProgValue("CARI_KODU") & "'")
 
 
--------------------------------------------------------------
Dim Aciklama
Dim CARIM
Set qry = NETSISCORE.NetLibDB.GetNewQuery
qry.RecSQL ("SELECT TOP 1 CARI_ISIM FROM TBLCASABIT WITH (NOLOCK) WHERE CARI_KOD = '" & GetProgValue("CARI_KODU") & "'")
CARIM = LEFT(qry.FieldByName("CARI_ISIM").AsString,16)
qry.Close
Set qry = Nothing
Aciklama =CARIM & ".FT.NIZ No: " & RIGHT(GetProgValue("FATIRS_NO"),7)
RESULT = Aciklama
--------------------------------
Numarada çok fazla Sifir var diyorsaniz örnegi kullanabilirsiniz. Afiyet Olsun.


Mesajı Yazan: aslan
Mesaj Tarihi: 26 Mart 2009 Saat 16:10

benim söyle bir sorunum var script calisiyor ama kdvler için bu scripti uyarlayamadim kdv parametrelerim mal bazinda kdv uyguluyoruz scripti ekledigim zaman kdv nin aciklamasini düzeltmiyor



-------------
en büyük aşkım NETSIS


Mesajı Yazan: Conari
Mesaj Tarihi: 26 Mart 2009 Saat 16:36
KDV için ayri, Iskonto için ayri, Ek maliyet için ayri tanimlamalisiniz.
KDV de bu sekilde kullaniyorum.
 
Dim Aciklama
Dim CARIM
Set qry = NETSISCORE.NetLibDB.GetNewQuery
qry.RecSQL ("SELECT TOP 1 CARI_ISIM FROM TBLCASABIT WITH (NOLOCK) WHERE CARI_KOD = '" & GetProgValue("CARI_KODU") & "'")
CARIM = LEFT(qry.FieldByName("CARI_ISIM").AsString,16)
qry.Close
Set qry = Nothing
Aciklama =CARIM & ".FT.MIZ No:" & RIGHT(GetProgValue("FATIRS_NO"),7)&" KDVSI"
RESULT = Aciklama


-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: ahbab
Mesaj Tarihi: 17 Şubat 2011 Saat 16:36
bu kodlari nereye  nasil yaziyoruz


Mesajı Yazan: ahbab
Mesaj Tarihi: 17 Şubat 2011 Saat 16:37

.



Mesajı Yazan: Conari
Mesaj Tarihi: 17 Şubat 2011 Saat 17:18
forum_topics.asp?FID=18 - Temelset Yardimci Programlar Modülü
Cari Muhasebe açiklamalari

-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: ahbab
Mesaj Tarihi: 26 Şubat 2011 Saat 10:21
Orjinalini yazan: Conari Conari Yazdı:

KDV için ayri, Iskonto için ayri, Ek maliyet için ayri tanimlamalisiniz.
KDV de bu sekilde kullaniyorum.
 
Dim Aciklama
Dim CARIM
Set qry = NETSISCORE.NetLibDB.GetNewQuery
qry.RecSQL ("SELECT TOP 1 CARI_ISIM FROM TBLCASABIT WITH (NOLOCK) WHERE CARI_KOD = '" & GetProgValue("CARI_KODU") & "'")
CARIM = LEFT(qry.FieldByName("CARI_ISIM").AsString,16)
qry.Close
Set qry = Nothing
Aciklama =CARIM & ".FT.MIZ No:" & RIGHT(GetProgValue("FATIRS_NO"),7)&" KDVSI"
RESULT = Aciklama
selam arkdaslar
cari ve kdv açiklamalarini kisalttim bir de  600 hesap için nasil bir kod olusturabiliriz acaba , bu konu hakkinda bir yardimin olabililrmi conari....


Mesajı Yazan: Conari
Mesaj Tarihi: 28 Şubat 2011 Saat 09:51
ne yazmasini isterdiniz?

-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: yckn
Mesaj Tarihi: 28 Şubat 2011 Saat 11:30
merhaba arkadaslar.
Satis Irsaliyesi kaydi yapildiginda cari hareket açiklamasina aciklama5 alanini da yazdirmak için nasil bir kod yazmaliyiz? 


Mesajı Yazan: Conari
Mesaj Tarihi: 28 Şubat 2011 Saat 11:57

Cümleyi su hale getirin.

("SELECT ACIK5 FROM TBLFATUEK WITH (NOLOCK) WHERE FKOD=1 AND FATIRSNO = '" & GetProgValue("FATIRS_NO")& "'")


-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: ahbab
Mesaj Tarihi: 28 Şubat 2011 Saat 12:17

yukarida verilen kodlarla cari ve kdv yevmiye kayitlarinin açiklamalarini kisaltabildim.

sizden ricam 600 satis hesabinin yevmiye kaydini kisaltabilmek için gerekli olan kod.
 


Mesajı Yazan: yckn
Mesaj Tarihi: 28 Şubat 2011 Saat 12:21
Conari ;
Cevap için tesekkür ederim.
Bir sorunum var
 
modül No:1  Program No:3  Kayit Tipi:Cari Genel Aciklama
 
script :
Dim Aciklama
Dim ACIK
Set qry = NETSISCORE.NetLibDB.GetNewQuery
qry.RecSQL("SELECT ACIK5 FROM TBLFATUEK WITH (NOLOCK) WHERE FKOD=1 AND FATIRSNO = '" & GetProgValue("FATIRS_NO")& "'")
ACIK = qry.FieldByName("ACIK5")
qry.Close
Set qry = Nothing
Aciklama = "IRSALIYEMIZ: " & ACIK
RESULT = Aciklama
 
hata :
Script kodunuz çalistirilirken hata olustu.
Script kodunuz çalistirilirken hata olustu.
Nesne bu özellik veya yöntemi desteklemiyor
Hata Kodu : 438
Satir Sütun : 5 0
Kaynak Açiklama : Microsoft VBScript çalisma hatasi
Açiklama : Nesne bu özellik veya yöntemi desteklemiyor
 
hatayi nasil düzeltebiliriz ?


Mesajı Yazan: Conari
Mesaj Tarihi: 28 Şubat 2011 Saat 13:03
ACIK = qry.FieldByName("ACIK5").asstring
olmali.


-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: Conari
Mesaj Tarihi: 28 Şubat 2011 Saat 13:06
Entegrasyon stok Genel açiklama kisminda yukaridaki gibi kullanabilirsiniz.

-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: ahbab
Mesaj Tarihi: 28 Şubat 2011 Saat 13:47
tesekkür ederim.


Mesajı Yazan: yckn
Mesaj Tarihi: 28 Şubat 2011 Saat 14:09
Orjinalini yazan: Conari Conari Yazdı:

ACIK = qry.FieldByName("ACIK5").asstring
olmali.
Tesekkür ederim.Simdi sorun çikarmadi


Mesajı Yazan: ggkorkmaz
Mesaj Tarihi: 17 Ağustos 2011 Saat 12:03
slm...
 
 
satis faturalarini islkerken cari açiklamaya su ifadenin gelmesini istiyorum
sizden ricam yapabilirsem çok iyi olur...
 
 
Fatura Üst bilgilerde Aciklama Kismina plaka yaziliyor
daha sonra miktar ve net fiyat gelecek
 
 
örnek:
 
FT.MIZ PLK : 31AA580 / Miktar 27.500*0,15
 
kolay gelsin..
yapana iskenderun döneri yollicam :)
 
 
 
 


-------------
GÖKHAN


Mesajı Yazan: Conari
Mesaj Tarihi: 18 Ağustos 2011 Saat 17:31
yollamazsan??

-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: ggkorkmaz
Mesaj Tarihi: 20 Ağustos 2011 Saat 11:33
vallahi yollarim yeterki yap benim için cok onemli
 
 
hatta sana adres veririm istanbulda benim hesabima iskenderun doner yersin
 
 
kolay gelsin..


-------------
GÖKHAN


Mesajı Yazan: Conari
Mesaj Tarihi: 22 Ağustos 2011 Saat 08:37

En kisa sürede beklerim. :)-- Çift kisilik tabii..

Yardimci programlarda Cari Muhasebe Açiklama tanimlamalarina girip,
Modül >>1
Program No >>1
Kayit Tipi >> Cari Genel Açiklama seçerek
asagidakini Script Kodunuzu buradan girin yazan yere(Mavi ile yazili) tiklayip yapistirin. Kayit edildigine emin olun.
 
--------------------------------------------------------------------------------------
Dim Aciklama
Dim Fiyat
Dim Mik
Dim Plk
Set qry = NETSISCORE.NetLibDB.GetNewQuery
qry.RecSQL ("SELECT TOP 1 sthar_nf, sthar_gcmik FROM TBLSTHAR WITH (NOLOCK) WHERE STHAR_ACIKLAMA = '" & GetProgValue("CARI_KODU") & "' AND FISNO='" & GetProgValue("FATIRS_NO") & "'")
    Mik = qry.FieldByName("STHAR_GCMIK").AsSTRing
    Fiyat = qry.FieldByName("STHAR_NF").AsSTRing
qry.Close
qry.RecSQL ("SELECT ACIK1 FROM TBLFATUEK WITH (NOLOCK) WHERE FATIRSNO='" & GetProgValue("FATIRS_NO") & "' AND FKOD=1 ")
    PLK = qry.FieldByName("ACIK1").AsSTRing
qry.Close
Set qry = Nothing
    Aciklama ="FT.MIZ PLK No: " & PLK & " / Miktar " & Mik & "*"& Fiyat
    RESULT = Aciklama


-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: tlosfethiye
Mesaj Tarihi: 22 Ağustos 2011 Saat 11:22
merhaba,
 
benim istanbulla bir baglantim yok, ancak
 
fethiye ye gelirseniz ben size deniz kiyisinda mangal sefasi yaparim.


-------------
Recep TEKE
ASR Danişmanlik


Mesajı Yazan: Conari
Mesaj Tarihi: 22 Ağustos 2011 Saat 14:30
Orjinalini yazan: tlosfethiye tlosfethiye Yazdı:

merhaba,
 
benim istanbulla bir baglantim yok, ancak
 
fethiye ye gelirseniz ben size deniz kiyisinda mangal sefasi yaparim.
Deme yawww.  3-4 hafta önce oradaydim :) Sözünüzü seneye alayim..
 
 


-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: ggkorkmaz
Mesaj Tarihi: 22 Ağustos 2011 Saat 16:57

Conari Harikasin tesekürler.

Adresini yaz bana..
 
Kolay gelsin
 
 


-------------
GÖKHAN


Mesajı Yazan: Conari
Mesaj Tarihi: 22 Ağustos 2011 Saat 17:11
Ne adresini yazayim??

-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: ggkorkmaz
Mesaj Tarihi: 22 Ağustos 2011 Saat 17:28
Orjinalini yazan: Conari Conari Yazdı:

Ne adresini yazayim??
dönerin gidecegi adres...

-------------
GÖKHAN


Mesajı Yazan: Conari
Mesaj Tarihi: 23 Ağustos 2011 Saat 08:10
Sen Mekan söyle ben oraya giderim..:)

-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: tlosfethiye
Mesaj Tarihi: 23 Ağustos 2011 Saat 10:58
insallah, conari

-------------
Recep TEKE
ASR Danişmanlik


Mesajı Yazan: Conari
Mesaj Tarihi: 23 Ağustos 2011 Saat 12:24
Orjinalini yazan: tlosfethiye tlosfethiye Yazdı:

insallah, conari
Imkan bulabilirsek

-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: Conari
Mesaj Tarihi: 25 Ağustos 2011 Saat 16:04
Orjinalini yazan: Conari Conari Yazdı:

Sen Mekan söyle ben oraya giderim..:)
Bir ses seda yok.

-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: ggkorkmaz
Mesaj Tarihi: 25 Ağustos 2011 Saat 16:46
Orjinalini yazan: Conari Conari Yazdı:

Orjinalini yazan: Conari Conari Yazdı:

Sen Mekan söyle ben oraya giderim..:)
Bir ses seda yok.
 
suan uzaklardayim unuttum sanma..:)


-------------
GÖKHAN


Mesajı Yazan: Conari
Mesaj Tarihi: 08 Eylül 2011 Saat 17:43
Orjinalini yazan: ggkorkmaz ggkorkmaz Yazdı:

Orjinalini yazan: Conari Conari Yazdı:

Orjinalini yazan: Conari Conari Yazdı:

Sen Mekan söyle ben oraya giderim..:)
Bir ses seda yok.
 
suan uzaklardayim unuttum sanma..:)
 
Kurban gelmeden yeseydik su iskenderi LOL


-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: emiray
Mesaj Tarihi: 08 Eylül 2011 Saat 19:57
Üstad,
sen bana PM den kordinatlarini yaz. Ben sana bir tane 2'lik sasal göndereyim. O iskenderin hararetini ancak keser. LOL http://www.fotocunuz.com/view.php?filename=463526610fotocunuz4678Eylul2011Persembe440sasal.jpg">


-------------
netsis bir tutkudur.Yaşamak Lazım


Mesajı Yazan: Conari
Mesaj Tarihi: 09 Eylül 2011 Saat 12:26
Orjinalini yazan: emiray emiray Yazdı:

Üstad,
sen bana PM den kordinatlarini yaz. Ben sana bir tane 2'lik sasal göndereyim. O iskenderin hararetini ancak keser. LOL http://www.fotocunuz.com/view.php?filename=463526610fotocunuz4678Eylul2011Persembe440sasal.jpg">
Deme yaww Cry
 
Big%20smile


-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: Conari
Mesaj Tarihi: 23 Kasım 2011 Saat 15:19
Orjinalini yazan: emiray emiray Yazdı:

Üstad,
sen bana PM den kordinatlarini yaz. Ben sana bir tane 2'lik sasal göndereyim. O iskenderin hararetini ancak keser. LOL http://www.fotocunuz.com/view.php?filename=463526610fotocunuz4678Eylul2011Persembe440sasal.jpg">
harbiden de öyle oldu.

-------------
Netsisden vazgeçemiyorum. Beni engelliyor..


Mesajı Yazan: efbu
Mesaj Tarihi: 10 Ocak 2012 Saat 13:49
Mrb arkadaslar,

Bu bölüme bir script yazdim. Satis Faturasinda girilen açiklamalardan birisini cari genel açiklamasina atiyorum. Düzgün çalisiyor. Ancak daha sonradan faturada numara degisikligi yaptigim zaman Netsis takiliyor. Update için trigger olusturmuyor mu bu alan ?

-------------
eFBu



Sayfayı Yazdır | Pencereyi Kapat

Forum Software by Web Wiz Forums® version 11.10 - http://www.webwizforums.com
Copyright ©2001-2017 Web Wiz Ltd. - https://www.webwiz.net