Logo(tiger) ve Excel

A

alico

Katılım
27 Ocak 2005
Mesajlar
10
Öncelikle sayfanızın nimetlerinden oldukca fazla yararlanıyorum bunun için cok teşekkür ederim herkese.
Soruma gelince excel'de sunu yapmak istiyorum.
plasiyeradı - müşterisi-bakiyesi
müşterileri satıcı ile baglantı kurdum logo da 3 kolon lu bir rapor almak istiyorum
yardım ederseniz sevinirim.
Kolay gelsin herkese
 
R

Rafet

Altın Üye
Katılım
24 Mart 2005
Mesajlar
230
Excel Vers. ve Dili
Ofice 2010 - Türkçe
Altın Üyelik Bitiş Tarihi
01-12-2025
SQL WİEV ini yazdınız ve EXCEL e nasıl aktaracağınızı mı soruyorsunuz.

Yapmak istediğiniz nedir? Acıklar mısınız.

Eğer öyle ise sitedede paylaştığım ve aşagıdakı lınkte bulunan Animasonu izleyiniz.

Tıklayın (Turbo Upload'dan)

Kolay gelsin.
 
Son düzenleme:
A

alico

Katılım
27 Ocak 2005
Mesajlar
10
Hayır daha sql ini yazamadım bir örnekle yaparsanız memnun olurum
kolay gelsin
 
R

red_lion_72

Katılım
8 Temmuz 2004
Mesajlar
254
Excel Vers. ve Dili
office 2007-mssql 2008 R2
Selam,

Kolon başlıklarını yazarmısınız?

Kolay gelsin.
 
A

alico

Katılım
27 Ocak 2005
Mesajlar
10
selam hocam;
kolan başlıkları
plasiyer_adı / müşterisi / bakiyesi / ortalama vadesi

bir tane daha var ama bu biraz sor (nasıl yapılacagını anlatırsanız ben yaparım)

plasiyer_adı / malzeme_sınıfı / alt_malzemeleri / haftalık_satısı / müşterisi

bunları plasiyer satıs ve tahsılat tahmını yapacagı için istiyorum.ve logo ya bu sene başladık.
yardımlarınız için teşekkürler
 
R

red_lion_72

Katılım
8 Temmuz 2004
Mesajlar
254
Excel Vers. ve Dili
office 2007-mssql 2008 R2
Selam,

Bu çok kolay gibi görünüyor. Ama anlayamadığım zaten bakiye varmış neden bir daha istiyorsunuz? Bakiyeyi biz mi hesaplıyacağız? Ya yada ortalama vadesini? Ben kolon isimleri derken database'inizdeki kolon isimlerini kastetmiştim:)


Kolay gelsin.
 
E

Eserbil

Katılım
25 Ocak 2007
Mesajlar
4
Excel Vers. ve Dili
Excel 2003 Türkçe
Bu sorunun cevaplanabilmesi için öncelikle Logo Tiger'ın veri tabanını tanımak lazım. Logo Tiger'da table'lar çok çeşitli ve birbirleri arasındaki bağlantılar çok komplike. Bu bakımdan yapabilinecek şey şu. Logo'nun yardım Ana Başlıklarda İçindekiler sekmesinde sırası ile Araçlar-Aktarımlar-ilgili modül(mesela Malzemeler) seçilir. Bu Aktarımlar kısmında ticari programdaki arayüzlerdeki bilgilerin hangisinin hangi Table'a denk geldiğini görebilirsiniz. Bundan yola çıkarak bir sonuca ulaşmak mümkün ama bundan sonrası SQL bilgisine dayanıyor. İyi çalışmalar.
 
A

alico

Katılım
27 Ocak 2005
Mesajlar
10
Selamlar arkadaşlar saolun
gerçekten çok karışıkmış ama çözdüm
 
E

eaydin

Katılım
12 Ekim 2006
Mesajlar
2
Excel Vers. ve Dili
2003 Türkçe
Merhaba Alico , 3 gündür Microsoft Zirve 2007 de olduğum için siteye giremedim

alico' Alıntı:
Selamlar arkadaşlar saolun
gerçekten çok karışıkmış ama çözdüm
Genişletmek için tıkla ...
Merhaba Alico , 3 gündür Microsoft Zirve 2007 de olduğum için siteye giremedim...

araştırdığın konunun makrosunu bir yere kadar yazdım gerisini artık sen halledersin....

Makroda Alico olarak gecen bölümler DB adı........SIVIL ise Server adıdır...
kolay gelsin...

Sub Alico()
'
' Alico Makro
' Makro linux tarafından 26.01.2007 tarihinde kaydedildi.
'

'
With ActiveSheet.QueryTables.Add(Connection:=Array( _
"OLEDB;Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa;Data Source=SIVIL;Use Procedure for Prepare=1;Auto Translate=True;Pack" _
, _
"et Size=4096;Workstation ID=SIVIL;Use Encryption for Data=False;Tag with column collation when possible=False;Initial Catalog=NO" _
, "RMPVC"), Destination:=Range("A1"))
.CommandType = xlCmdTable
.CommandText = Array("""ALİCO"".""dbo"".""LG_SLSMAN""")
.Name = "+Yeni SQL Server Bağlantısı"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.SourceConnectionFile = _
"C:\Documents and Settings\Cotanak\Belgelerim\Veri Kaynaklarım\SIVIL ALİCO LG_SLSMAN.odc"
.Refresh BackgroundQuery:=False
End With
Sheets("Sayfa2").Select
With ActiveSheet.QueryTables.Add(Connection:=Array( _
"OLEDB;Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa;Data Source=SIVIL;Use Procedure for Prepare=1;Auto Translate=True;Pack" _
, _
"et Size=4096;Workstation ID=SIVIL;Use Encryption for Data=False;Tag with column collation when possible=False;Initial Catalog=NO" _
, "RMPVC"), Destination:=Range("A1"))
.CommandType = xlCmdTable
.CommandText = Array("""ALİCO"".""dbo"".""LG_SLSCLREL""")
.Name = "+Yeni SQL Server Bağlantısı"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.SourceConnectionFile = _
"C:\Documents and Settings\Cotanak\Belgelerim\Veri Kaynaklarım\SIVIL ALİCO LG_SLSCLREL.odc"
.Refresh BackgroundQuery:=False
End With
Sheets("Sayfa3").Select
With ActiveSheet.QueryTables.Add(Connection:=Array( _
"OLEDB;Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa;Data Source=SIVIL;Use Procedure for Prepare=1;Auto Translate=True;Pack" _
, _
"et Size=4096;Workstation ID=SIVIL;Use Encryption for Data=False;Tag with column collation when possible=False;Initial Catalog=NO" _
, "RMPVC"), Destination:=Range("A1"))
.CommandType = xlCmdTable
.CommandText = Array("""ALİCO"".""dbo"".""LG_086_CLCARD""")
.Name = "+Yeni SQL Server Bağlantısı"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.SourceConnectionFile = _
"C:\Documents and Settings\Cotanak\Belgelerim\Veri Kaynaklarım\SIVIL ALİCO LG_086_CLCARD.odc"
.Refresh BackgroundQuery:=False
End With
Sheets("Sayfa3").Select
Sheets.Add
Sheets("Sayfa4").Select
Sheets.Add
With ActiveSheet.QueryTables.Add(Connection:=Array( _
"OLEDB;Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa;Data Source=SIVIL;Use Procedure for Prepare=1;Auto Translate=True;Pack" _
, _
"et Size=4096;Workstation ID=SIVIL;Use Encryption for Data=False;Tag with column collation when possible=False;Initial Catalog=NO" _
, "RMPVC"), Destination:=Range("A1"))
.CommandType = xlCmdTable
.CommandText = Array("""ALİCO"".""dbo"".""LG_086_01_CLTOTFIL""")
.Name = "+Yeni SQL Server Bağlantısı"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.SourceConnectionFile = _
"C:\Documents and Settings\Cotanak\Belgelerim\Veri Kaynaklarım\SIVIL ALİCO LG_086_01_CLTOTFIL.odc"
.Refresh BackgroundQuery:=False
End With
Sheets("Sayfa4").Select
Columns("A:A").ColumnWidth = 11.29
Columns("A:A").ColumnWidth = 9.71
Columns("A:A").ColumnWidth = 11.57
Columns("A:A").ColumnWidth = 10.57
ActiveCell.FormulaR1C1 = "Plasiyer"
Range("B1").Select
ActiveCell.FormulaR1C1 = "Ch Ünvanı"
Range("C1").Select
ActiveCell.FormulaR1C1 = "Bakiye"
Range("C1").Select
Columns("C:C").ColumnWidth = 15
Columns("B:B").ColumnWidth = 15
Range("B1").Select
Columns("A:A").ColumnWidth = 9.86
Columns("B:B").ColumnWidth = 19
Columns("C:C").ColumnWidth = 22.57
Range("A2").Select
ActiveCell.FormulaR1C1 = ""
Range("A1").Select
End Sub
 
A

alico

Katılım
27 Ocak 2005
Mesajlar
10
Teşekkür ederim
Sayın;aydın
Kolay gelsin İyi çalışmalar.
 
M

Maksim

Katılım
21 Haziran 2007
Mesajlar
97
Excel Vers. ve Dili
Rusca 2003
Herkese merhaba.
Bir sorunum var.
Query Analyzer de sonuc almak istiyorum.
Fiş No,Fiş Tarihi,Belge,Carihesab,Satici İsmi,İndirimsiz Tutar,İndirim tutarı,İnririmden sonra.
Bu raporu şöyle almaya çalışıyorum.Ve aliyorum

SELECT GRPCODE,TRCODE,FICHENO,DATE_,DOCODE,DEFINITION_,SALESMANREF,TOTALDISCOUNTED,
TOTALDISCOUNTS,NETTOTAL FROM LG_001_02_INVOICE INV LEFT OUTER
JOIN LG_001_CLCARD CLCARD ON INV.CLIENTREF=CLCARD.LOGICALREF
Şimdi istediyim bu ki, Satiş elemanlari kod ile deyil İsim ile raporlansin.
Yani bu kodu SELECT DEFINITION_ FROM LG_001_02_INVOICE INV LEFT OUTER JOIN LG_SLSMAN SLS ON (INV.SALESMANREF=SLS.CODE)
Yukarıdaki koda bağlamam lazim.
Bu konuda bana yarim edersinizmi?
HEPİNİZE KOLAY GELSİN
 
L

lsuersoy

Katılım
29 Haziran 2005
Mesajlar
158
Excel Vers. ve Dili
MS Office Professional Plus 2013 64 Bit -Eng
MSSQL 2012 R2 64 Bit
Maksim' Alıntı:
Herkese merhaba.
Bir sorunum var.
Query Analyzer de sonuc almak istiyorum.
Fiş No,Fiş Tarihi,Belge,Carihesab,Satici İsmi,İndirimsiz Tutar,İndirim tutarı,İnririmden sonra.
Bu raporu şöyle almaya çalışıyorum.Ve aliyorum

SELECT GRPCODE,TRCODE,FICHENO,DATE_,DOCODE,DEFINITION_,SALESMANREF,TOTALDISCOUNTED,
TOTALDISCOUNTS,NETTOTAL FROM LG_001_02_INVOICE INV LEFT OUTER
JOIN LG_001_CLCARD CLCARD ON INV.CLIENTREF=CLCARD.LOGICALREF
Şimdi istediyim bu ki, Satiş elemanlari kod ile deyil İsim ile raporlansin.
Yani bu kodu SELECT DEFINITION_ FROM LG_001_02_INVOICE INV LEFT OUTER JOIN LG_SLSMAN SLS ON (INV.SALESMANREF=SLS.CODE)
Yukarıdaki koda bağlamam lazim.
Bu konuda bana yarim edersinizmi?
HEPİNİZE KOLAY GELSİN
Genişletmek için tıkla ...
Merhaba Gorki Kardeş ;

Mesajını yeni gördüm.Aşağıdaki kod işini görecektir.

SELECT INV.GRPCODE, INV.TRCODE, INV.FICHENO, INV.DATE_, INV.DOCODE, CLCARD.DEFINITION_, INV.TOTALDISCOUNTED, INV.TOTALDISCOUNTS,
INV.NETTOTAL, LG_SLSMAN.DEFINITION_ AS SATICI_ADI
FROM LG_001_01_INVOICE INV INNER JOIN
LG_SLSMAN ON INV.SALESMANREF = LG_SLSMAN.LOGICALREF LEFT OUTER JOIN
LG_001_CLCARD CLCARD ON INV.CLIENTREF = CLCARD.LOGICALREF
 
Cevap yazmak için giriş yap yada kayıt ol.
Üst