object DMsi: TDMsi OldCreateOrder = False OnCreate = DataModuleCreate OnDestroy = DataModuleDestroy Left = 379 Top = 189 Height = 590 Width = 913 object Bolge: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select * from Bolge') Left = 36 Top = 128 object BolgeKOD: TStringField FieldName = 'KOD' Required = True Size = 3 end object BolgeADI: TStringField FieldName = 'ADI' Size = 30 end end object Magaza: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Kodu,Adi from Magaza') Active = True Left = 84 Top = 128 object MagazaKodu: TStringField FieldName = 'Kodu' Origin = 'Magaza.Kodu' Required = True Size = 6 end object MagazaAdi: TStringField FieldName = 'Adi' Origin = 'Magaza.Adi' Size = 30 end end object Rehber: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Kodu,Adi from Rehber') Left = 36 Top = 176 object RehberKodu: TStringField FieldName = 'Kodu' Required = True Size = 6 end object RehberAdi: TStringField FieldName = 'Adi' Size = 25 end end object ShopMal: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Kodu,tanimi from ShopMal') Left = 84 Top = 176 object ShopMalKodu: TStringField FieldName = 'Kodu' Required = True Size = 15 end object ShopMaltanimi: TStringField FieldName = 'tanimi' Size = 30 end end object Tur: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select * From Tur with (NOLOCK)') Left = 132 Top = 176 object TurKodu: TStringField FieldName = 'Kodu' Size = 6 end object TurAdi: TStringField FieldName = 'Adi' Size = 25 end object TurABebYas1: TSmallintField FieldName = 'ABebYas1' end object TurABebYas2: TSmallintField FieldName = 'ABebYas2' end object TurABebYuzde: TSmallintField FieldName = 'ABebYuzde' end object TurSBebYas1: TSmallintField FieldName = 'SBebYas1' end object TurSBebYas2: TSmallintField FieldName = 'SBebYas2' end object TurSBebYuzde: TSmallintField FieldName = 'SBebYuzde' end object TurACocYas1: TSmallintField FieldName = 'ACocYas1' end object TurACocYas2: TSmallintField FieldName = 'ACocYas2' end object TurACocYuzde: TSmallintField FieldName = 'ACocYuzde' end object TurSCocYas1: TSmallintField FieldName = 'SCocYas1' end object TurSCocYas2: TSmallintField FieldName = 'SCocYas2' end object TurSCocYuzde: TSmallintField FieldName = 'SCocYuzde' end object TurFiyKate: TStringField FieldName = 'FiyKate' Size = 15 end end object DovCins: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select * From DovCins with (NOLOCK)') Left = 187 Top = 176 object DovCinsDoviz: TStringField FieldName = 'Doviz' Required = True Size = 3 end object DovCinsText: TStringField FieldName = 'Text' Size = 25 end end object ShopParam: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select * From ShopParam ') Left = 132 Top = 128 object ShopParamFirmaLogo: TBlobField FieldName = 'FirmaLogo' end object ShopParamFirmaKase: TBlobField FieldName = 'FirmaKase' end object ShopParamBankNo: TSmallintField FieldName = 'BankNo' end object ShopParamKurTipi: TSmallintField FieldName = 'KurTipi' end end object MagTopSat: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Sum(CiroTut) as ToplamCiro,Sum(Ciroiadetut) as Toplamiade' + ',' 'Netciro=(Sum(CiroTut)-Sum(Ciroiadetut)),CiroDov,Magaza from ShpS' + 'at ' 'Group By Magaza,CiroDov' 'Order By Magaza,CiroDov') Active = True Left = 26 Top = 52 object MagTopSatMagaza: TStringField FieldName = 'Magaza' Origin = 'ShpSat.Magaza' Size = 6 end object MagTopSatMagAdi: TStringField FieldKind = fkLookup FieldName = 'MagAdi' LookupDataSet = Magaza LookupKeyFields = 'Kodu' LookupResultField = 'Adi' KeyFields = 'Magaza' Lookup = True end object MagTopSatToplamCiro: TFloatField FieldName = 'ToplamCiro' Origin = '.ToplamCiro' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object MagTopSatCiroDov: TStringField FieldName = 'CiroDov' Origin = 'ShpSat.CiroDov' Size = 3 end object MagTopSatToplamiade: TFloatField FieldName = 'Toplamiade' Origin = '.Toplamiade' ReadOnly = True end object MagTopSatNetciro: TFloatField FieldName = 'Netciro' Origin = '.Netciro' ReadOnly = True end end object MagTopSatDS: TDataSource DataSet = MagTopSat Left = 26 Top = 6 end object MagTopPax: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Sum(GirYet)As ToplamYet , Sum(GirCoc)As ToplamCoc,' ' Sum(GirBeb)As ToplamBeb, Sum(GirMuk) As ToplamGirMuk ,Mag' + 'aza From ShpMag' 'Group By Magaza' 'Order By Magaza') Active = True Left = 102 Top = 52 object MagTopPaxToplamYet: TIntegerField FieldName = 'ToplamYet' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object MagTopPaxToplamCoc: TIntegerField FieldName = 'ToplamCoc' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object MagTopPaxToplamBeb: TIntegerField FieldName = 'ToplamBeb' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object MagTopPaxMagaza: TStringField FieldName = 'Magaza' Size = 6 end object MagTopPaxMagAdi: TStringField FieldKind = fkLookup FieldName = 'MagAdi' LookupDataSet = Magaza LookupKeyFields = 'Kodu' LookupResultField = 'Adi' KeyFields = 'Magaza' Lookup = True end object MagTopPaxToplamGirMuk: TIntegerField FieldName = 'ToplamGirMuk' end end object MagTopPaxDS: TDataSource DataSet = MagTopPax Left = 102 Top = 6 end object MagTopHak: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Sum(KomTut) as ToplamKomisyon,KomDov,Magaza from ShpSat' 'Group By Magaza,KomDov' 'Order By Magaza,KomDov') Active = True Left = 179 Top = 52 object MagTopHakToplamKomisyon: TFloatField FieldName = 'ToplamKomisyon' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object MagTopHakKomDov: TStringField FieldName = 'KomDov' Size = 3 end object MagTopHakMagaza: TStringField FieldName = 'Magaza' Size = 6 end object MagTopHakMagAdi: TStringField FieldKind = fkLookup FieldName = 'MagAdi' LookupDataSet = Magaza LookupKeyFields = 'Kodu' LookupResultField = 'Adi' KeyFields = 'Magaza' Lookup = True end end object MagTopHakDS: TDataSource DataSet = MagTopHak Left = 179 Top = 6 end object MagTopReh: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Sum(CiroTut) As Ciro ,Magaza,Rehber,CiroDov From ShpSat' 'Where not CiroDov is null and not CiroTut is null ' 'Group By Magaza,Rehber,CiroDov' 'Order By Magaza,Rehber,CiroDov') Left = 443 Top = 52 object MagTopRehMagaza: TStringField FieldName = 'Magaza' Size = 6 end object StringField2: TStringField FieldKind = fkLookup FieldName = 'MagAdi' LookupDataSet = Magaza LookupKeyFields = 'Kodu' LookupResultField = 'Adi' KeyFields = 'Magaza' Lookup = True end object MagTopRehRehber: TStringField FieldName = 'Rehber' Size = 6 end object MagTopRehCiro: TFloatField FieldName = 'Ciro' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object MagTopRehCiroDov: TStringField FieldName = 'CiroDov' Size = 3 end object MagTopRehRehAdi: TStringField FieldKind = fkLookup FieldName = 'RehAdi' LookupDataSet = Rehber LookupKeyFields = 'Kodu' LookupResultField = 'Adi' KeyFields = 'Rehber' Lookup = True end end object MagTopRehDS: TDataSource DataSet = MagTopReh Left = 443 Top = 6 end object RehTopSat: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Sum(CiroTut) As Ciro ,Rehber,CiroDov From ShpSat ' 'Where not CiroDov is null and not CiroTut is null ' 'Group By Rehber,CiroDov ' 'Order By Rehber,CiroDov ') Left = 520 Top = 52 object RehTopSatCiro: TFloatField FieldName = 'Ciro' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object RehTopSatRehber: TStringField FieldName = 'Rehber' Size = 6 end object RehTopSatRehAdi: TStringField FieldKind = fkLookup FieldName = 'RehAdi' LookupDataSet = Rehber LookupKeyFields = 'Kodu' LookupResultField = 'Adi' KeyFields = 'Rehber' Lookup = True end object RehTopSatCiroDov: TStringField FieldName = 'CiroDov' Size = 3 end end object RehTopSatDS: TDataSource DataSet = RehTopSat Left = 520 Top = 6 end object HakDag: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Sum(HakKomTut) As Hakedis ,K.Komdov,S.Magaza,K.KomAlan Fr' + 'om ShpSatKom K,ShpSat S' 'Where S.Sira=K.ShpSira and not K.KomDov is null and not HakKomTu' + 't is Null and K.KomDov<>'#39#39' and HakKomTut<>0' 'Group By S.Magaza,K.KomAlan,K.KomDov' 'Order By S.Magaza,K.KomAlan,K.KomDov') Left = 597 Top = 52 object HakDagHakedis: TFloatField FieldName = 'Hakedis' end object HakDagKomdov: TStringField FieldName = 'Komdov' Size = 3 end object HakDagMagaza: TStringField FieldName = 'Magaza' Size = 6 end object HakDagKomAlan: TStringField FieldName = 'KomAlan' Size = 15 end object HakDagMagAdi: TStringField FieldKind = fkLookup FieldName = 'MagAdi' LookupDataSet = Magaza LookupKeyFields = 'Kodu' LookupResultField = 'Adi' KeyFields = 'Magaza' Lookup = True end end object HakDagDS: TDataSource DataSet = HakDag Left = 597 Top = 6 end object RehTopPax: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select ToplamYet = Sum(GirYet)-Sum(GirMuk) , Sum(GirCoc)As Topl' + 'amCoc , Sum(GirBeb)As ToplamBeb,S.Rehber' ', Tipi=1' 'From ShpMag M ,ShpSat S ' 'Where M.Magaza=S.Magaza and M.Tur =S.Tur and M.Bolge = S.Bolge a' + 'nd M.Tarih =S.Tarih and' 'M.Operator=S.Operator and M.MusTipi=S.Mustipi' 'Group By S.Rehber' 'Order By S.Rehber') Left = 665 Top = 52 object RehTopPaxToplamYet: TIntegerField FieldName = 'ToplamYet' end object RehTopPaxToplamCoc: TIntegerField FieldName = 'ToplamCoc' end object RehTopPaxToplamBeb: TIntegerField FieldName = 'ToplamBeb' end object RehTopPaxRehber: TStringField FieldName = 'Rehber' Size = 6 end object RehTopPaxRehAdi: TStringField FieldKind = fkLookup FieldName = 'RehAdi' LookupDataSet = Rehber LookupKeyFields = 'Kodu' LookupResultField = 'Adi' KeyFields = 'Rehber' Lookup = True end object RehTopPaxTipi: TIntegerField FieldName = 'Tipi' ReadOnly = True end end object RehTopPaxDS: TDataSource DataSet = RehTopPax Left = 665 Top = 6 end object HakDagAraTop: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Sum(HakKomTut) As Hakedis ,K.Komdov,S.Magaza From ShpSatK' + 'om K,ShpSat S' 'Where S.Sira=K.ShpSira and not K.KomDov is null and not HakKomTu' + 't is Null and K.KomDov<>'#39#39#39#39' and HakKomTut<>0 and' 'K.Tur =S.Tur and K.Bolge =S.Bolge and K.Tarih =S.Tarih and K.Ope' + 'rator=S.Operator and K.MusTipi=S.MusTipi and Magaza=:Magaza' 'Group By S.Magaza,K.KomDov' 'Order By S.Magaza,K.KomDov') MasterSource = HakDagDS Left = 824 Top = 175 ParamData = < item DataType = ftString Name = 'Magaza' ParamType = ptInput Size = 7 end> object HakDagAraTopHakedis: TFloatField FieldName = 'Hakedis' end object HakDagAraTopKomdov: TStringField FieldName = 'Komdov' Size = 3 end object HakDagAraTopMagaza: TStringField FieldName = 'Magaza' Size = 6 end end object HakDagAraTopDS: TDataSource DataSet = HakDagAraTop Left = 825 Top = 127 end object ShopTopPax: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Tur,Tarih,Bolge,Operator,MusTipi,Sum(Yet) As TurYet,Sum(C' + 'oc) As TurCoc,Sum(Beb) As TurBeb From ShpBas' 'Group By Tur,Tarih,Bolge,Operator,MusTipi') Left = 745 Top = 52 object ShopTopPaxTur: TStringField FieldName = 'Tur' Required = True Size = 6 end object ShopTopPaxTarih: TDateTimeField FieldName = 'Tarih' Required = True DisplayFormat = 'dd/mm/yy' EditMask = '99/99/99!' end object ShopTopPaxBolge: TStringField FieldName = 'Bolge' Required = True Size = 3 end object ShopTopPaxOperator: TStringField FieldName = 'Operator' Required = True Size = 6 end object ShopTopPaxMusTipi: TStringField FieldName = 'MusTipi' Required = True Size = 6 end object ShopTopPaxTurYet: TIntegerField FieldName = 'TurYet' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###' end object ShopTopPaxTurCoc: TIntegerField FieldName = 'TurCoc' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###' end object ShopTopPaxTurBeb: TIntegerField FieldName = 'TurBeb' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###' end end object ShopTopPaxDS: TDataSource DataSet = ShopTopPax Left = 745 Top = 6 end object TurOp: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Kodu,Adi From TurOp with (NOLOCK)') Left = 187 Top = 128 object TurOpKodu: TStringField FieldName = 'Kodu' Required = True Size = 6 end object TurOpAdi: TStringField FieldName = 'Adi' Size = 25 end end object ShopMusTip: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select * From ShopMusTip with (NOLOCK)') Left = 241 Top = 176 object ShopMusTipKodu: TStringField FieldName = 'Kodu' Required = True Size = 6 end object ShopMusTipTanimi: TStringField FieldName = 'Tanimi' Size = 30 end end object PaxDetail: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Sum(GirYet) As GirYet,Sum(GirCoc) As GirCoc,Sum(GirBeb) A' + 's GirBeb,Magaza from ShpMag' 'Where Tur=:Tur and Bolge=:Bolge and Tarih=:Tarih and Operator=:O' + 'perator and MusTipi=:MusTipi' 'Group By Tur,Tarih,Bolge,Operator,MusTipi,Magaza') MasterSource = ShopTopPaxDS Left = 819 Top = 52 ParamData = < item DataType = ftString Name = 'Tur' ParamType = ptInput Size = 7 end item DataType = ftString Name = 'Bolge' ParamType = ptInput Size = 4 end item DataType = ftDateTime Name = 'Tarih' ParamType = ptInput end item DataType = ftString Name = 'Operator' ParamType = ptInput Size = 7 end item DataType = ftString Name = 'MusTipi' ParamType = ptInput Size = 7 end> object PaxDetailGirYet: TIntegerField FieldName = 'GirYet' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###' end object PaxDetailGirCoc: TIntegerField FieldName = 'GirCoc' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###' end object PaxDetailGirBeb: TIntegerField FieldName = 'GirBeb' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###' end object PaxDetailMagaza: TStringField FieldName = 'Magaza' Size = 6 end end object PaxDetailDS: TDataSource DataSet = PaxDetail Left = 819 Top = 6 end object DovKur: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Top 1 * From Doviz' 'Where BankNo = :BankNo and Tarih <= :Tarih' 'Order by Tarih Desc' '' '') Left = 241 Top = 128 ParamData = < item DataType = ftUnknown Name = 'BankNo' ParamType = ptInput end item DataType = ftUnknown Name = 'Tarih' ParamType = ptInput end> object DovKurTarih: TDateTimeField FieldName = 'Tarih' Required = True end object DovKurDA_DEM: TFloatField FieldName = 'DA_DEM' end object DovKurDA_USD: TFloatField FieldName = 'DA_USD' end object DovKurDA_FRF: TFloatField FieldName = 'DA_FRF' end object DovKurDA_GBP: TFloatField FieldName = 'DA_GBP' end object DovKurDA_BEF: TFloatField FieldName = 'DA_BEF' end object DovKurDA_ATS: TFloatField FieldName = 'DA_ATS' end object DovKurDA_CHF: TFloatField FieldName = 'DA_CHF' end object DovKurDA_ITL: TFloatField FieldName = 'DA_ITL' end object DovKurDA_NLG: TFloatField FieldName = 'DA_NLG' end object DovKurDA_SEK: TFloatField FieldName = 'DA_SEK' end object DovKurDA_NOK: TFloatField FieldName = 'DA_NOK' end object DovKurDA_AUD: TFloatField FieldName = 'DA_AUD' end object DovKurDA_CAD: TFloatField FieldName = 'DA_CAD' end object DovKurDA_DKK: TFloatField FieldName = 'DA_DKK' end object DovKurDA_FIM: TFloatField FieldName = 'DA_FIM' end object DovKurDA_JPY: TFloatField FieldName = 'DA_JPY' end object DovKurDA_SAR: TFloatField FieldName = 'DA_SAR' end object DovKurDA_ESP: TFloatField FieldName = 'DA_ESP' end object DovKurDA_EUR: TFloatField FieldName = 'DA_EUR' end object DovKurDS_DEM: TFloatField FieldName = 'DS_DEM' end object DovKurDS_USD: TFloatField FieldName = 'DS_USD' end object DovKurDS_FRF: TFloatField FieldName = 'DS_FRF' end object DovKurDS_GBP: TFloatField FieldName = 'DS_GBP' end object DovKurDS_BEF: TFloatField FieldName = 'DS_BEF' end object DovKurDS_ATS: TFloatField FieldName = 'DS_ATS' end object DovKurDS_CHF: TFloatField FieldName = 'DS_CHF' end object DovKurDS_ITL: TFloatField FieldName = 'DS_ITL' end object DovKurDS_NLG: TFloatField FieldName = 'DS_NLG' end object DovKurDS_SEK: TFloatField FieldName = 'DS_SEK' end object DovKurDS_NOK: TFloatField FieldName = 'DS_NOK' end object DovKurDS_AUD: TFloatField FieldName = 'DS_AUD' end object DovKurDS_CAD: TFloatField FieldName = 'DS_CAD' end object DovKurDS_DKK: TFloatField FieldName = 'DS_DKK' end object DovKurDS_FIM: TFloatField FieldName = 'DS_FIM' end object DovKurDS_JPY: TFloatField FieldName = 'DS_JPY' end object DovKurDS_SAR: TFloatField FieldName = 'DS_SAR' end object DovKurDS_ESP: TFloatField FieldName = 'DS_ESP' end object DovKurDS_EUR: TFloatField FieldName = 'DS_EUR' end object DovKurEA_DEM: TFloatField FieldName = 'EA_DEM' end object DovKurEA_USD: TFloatField FieldName = 'EA_USD' end object DovKurEA_FRF: TFloatField FieldName = 'EA_FRF' end object DovKurEA_GBP: TFloatField FieldName = 'EA_GBP' end object DovKurEA_BEF: TFloatField FieldName = 'EA_BEF' end object DovKurEA_ATS: TFloatField FieldName = 'EA_ATS' end object DovKurEA_CHF: TFloatField FieldName = 'EA_CHF' end object DovKurEA_ITL: TFloatField FieldName = 'EA_ITL' end object DovKurEA_NLG: TFloatField FieldName = 'EA_NLG' end object DovKurEA_SEK: TFloatField FieldName = 'EA_SEK' end object DovKurEA_NOK: TFloatField FieldName = 'EA_NOK' end object DovKurEA_AUD: TFloatField FieldName = 'EA_AUD' end object DovKurEA_CAD: TFloatField FieldName = 'EA_CAD' end object DovKurEA_DKK: TFloatField FieldName = 'EA_DKK' end object DovKurEA_FIM: TFloatField FieldName = 'EA_FIM' end object DovKurEA_JPY: TFloatField FieldName = 'EA_JPY' end object DovKurEA_SAR: TFloatField FieldName = 'EA_SAR' end object DovKurEA_ESP: TFloatField FieldName = 'EA_ESP' end object DovKurEA_EUR: TFloatField FieldName = 'EA_EUR' end object DovKurES_DEM: TFloatField FieldName = 'ES_DEM' end object DovKurES_USD: TFloatField FieldName = 'ES_USD' end object DovKurES_FRF: TFloatField FieldName = 'ES_FRF' end object DovKurES_GBP: TFloatField FieldName = 'ES_GBP' end object DovKurES_BEF: TFloatField FieldName = 'ES_BEF' end object DovKurES_ATS: TFloatField FieldName = 'ES_ATS' end object DovKurES_CHF: TFloatField FieldName = 'ES_CHF' end object DovKurES_ITL: TFloatField FieldName = 'ES_ITL' end object DovKurES_NLG: TFloatField FieldName = 'ES_NLG' end object DovKurES_SEK: TFloatField FieldName = 'ES_SEK' end object DovKurES_NOK: TFloatField FieldName = 'ES_NOK' end object DovKurES_AUD: TFloatField FieldName = 'ES_AUD' end object DovKurES_CAD: TFloatField FieldName = 'ES_CAD' end object DovKurES_DKK: TFloatField FieldName = 'ES_DKK' end object DovKurES_FIM: TFloatField FieldName = 'ES_FIM' end object DovKurES_JPY: TFloatField FieldName = 'ES_JPY' end object DovKurES_SAR: TFloatField FieldName = 'ES_SAR' end object DovKurES_ESP: TFloatField FieldName = 'ES_ESP' end object DovKurES_EUR: TFloatField FieldName = 'ES_EUR' end object DovKurBankNo: TSmallintField FieldName = 'BankNo' Required = True end end object MagTopOrtMas: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select ToplamYet = Sum(GirYet) - Sum(GirMuk),Magaza From ShpMag' 'Group by Magaza' 'Order By Magaza') Left = 354 Top = 52 object MagTopOrtMasMagaza: TStringField FieldName = 'Magaza' Size = 6 end object MagTopOrtMasMagAdi: TStringField FieldKind = fkLookup FieldName = 'MagAdi' LookupDataSet = Magaza LookupKeyFields = 'Kodu' LookupResultField = 'Adi' KeyFields = 'Magaza' Lookup = True end object MagTopOrtMasToplamYet: TIntegerField FieldName = 'ToplamYet' end end object MagTopOrtMasDS: TDataSource DataSet = MagTopOrtMas Left = 353 Top = 6 end object OtelTopSat: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Otel' ' ,Case When 1=1 THEN BilSatReh Else Rehber End SecRehber' ' ,Sum(IsNull(CiroTut,0)) As ToplamCiro,Sum(IsNull(Ciroiade' + 'Tut,0)) As ToplamIade' ' ,Sum(IsNull(KomTut,0)) As ToplamKomisyon ,Sum(IsNull(ShpP' + 'ax,0)) As ToplamPax,CiroDov ' ' ,OtelBolge = (Select Bolge From Otel Where Otel.Otel=ShpS' + 'at.Otel)' ' ,OtelBolgeAdi = (Select ADI From Bolge where Bolge.KOD=(S' + 'elect Bolge From Otel Where Otel.Otel=ShpSat.Otel))' 'From Shpsat' ' Where not Otel is null and not CiroDov is null' 'Group by Otel,CiroDov,Case When 1=1 THEN BilSatReh Else Rehber ' + 'End') Left = 344 Top = 175 object OtelTopSatotel: TStringField FieldName = 'otel' Origin = 'Shpsat.Otel' Size = 6 end object OtelTopSatToplamCiro: TFloatField FieldName = 'ToplamCiro' Origin = '.ToplamCiro' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object OtelTopSatToplamIade: TFloatField FieldName = 'ToplamIade' Origin = '.ToplamIade' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object OtelTopSatToplamKomisyon: TFloatField FieldName = 'ToplamKomisyon' Origin = '.ToplamKomisyon' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object OtelTopSatOtelAdi: TStringField DisplayWidth = 35 FieldKind = fkLookup FieldName = 'OtelAdi' LookupDataSet = Otel LookupKeyFields = 'Otel' LookupResultField = 'Adi' KeyFields = 'otel' Lookup = True end object OtelTopSatCiroDov: TStringField FieldName = 'CiroDov' Origin = 'Shpsat.CiroDov' Size = 3 end object OtelTopSatToplamPax: TIntegerField FieldName = 'ToplamPax' Origin = '.ToplamPax' end object OtelTopSatOtelBolge: TStringField FieldName = 'OtelBolge' ReadOnly = True Size = 3 end object OtelTopSatOtelBolgeAdi: TStringField FieldName = 'OtelBolgeAdi' ReadOnly = True Size = 30 end object OtelTopSatSecRehber: TStringField FieldName = 'SecRehber' ReadOnly = True Size = 6 end end object OtelTopSatDS: TDataSource DataSet = OtelTopSat Left = 346 Top = 128 end object Otel: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Otel,Adi From Otel' '') Left = 291 Top = 176 object OtelOtel: TStringField FieldName = 'Otel' Origin = 'Otel.Otel' Required = True Size = 6 end object OtelAdi: TStringField FieldName = 'Adi' Origin = 'Otel.Adi' Size = 30 end end object OtelsizTopSat: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Otel, Sum(IsNull(CiroTut,0)) As ToplamCiro,Sum(IsNull(Cir' + 'oiadeTut,0)) As ToplamIade,' ' Sum(IsNull(KomTut,0)) As ToplamKomisyon ,Sum(IsNull(ShpPa' + 'x,0)) As ToplamPax,CiroDov from Shpsat' ' Where Otel is null and not CiroDov is null' 'Group by Otel,CiroDov') Left = 422 Top = 176 object StringField1: TStringField FieldName = 'otel' Size = 6 end object FloatField1: TFloatField FieldName = 'ToplamCiro' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object FloatField2: TFloatField FieldName = 'ToplamIade' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object FloatField3: TFloatField FieldName = 'ToplamKomisyon' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object StringField3: TStringField DisplayWidth = 35 FieldKind = fkLookup FieldName = 'OtelAdi' LookupDataSet = Otel LookupKeyFields = 'Otel' LookupResultField = 'Adi' KeyFields = 'otel' Lookup = True end object StringField4: TStringField FieldName = 'CiroDov' Size = 3 end object OtelsizTopSatToplamPax: TIntegerField FieldName = 'ToplamPax' end end object OtelsizTopSatDS: TDataSource DataSet = OtelsizTopSat Left = 420 Top = 128 end object OtelTopsatListeAltiTop: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Sum(IsNull(CiroTut,0)) As ToplamCiro,Sum(IsNull(CiroiadeT' + 'ut,0)) As ToplamIade,' ' Sum(IsNull(KomTut,0)) As ToplamKomisyon ,Sum(IsNull(ShpPa' + 'x,0)) As ToplamPax,CiroDov from Shpsat' ' Where not Otel is null and not CiroDov is null' 'Group by CiroDov') Left = 528 Top = 176 object FloatField4: TFloatField FieldName = 'ToplamCiro' Origin = '.ToplamCiro' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object FloatField5: TFloatField FieldName = 'ToplamIade' Origin = '.ToplamIade' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object FloatField6: TFloatField FieldName = 'ToplamKomisyon' Origin = '.ToplamKomisyon' DisplayFormat = '#,##0.00;;'#39#39 EditFormat = '#,###.##' end object StringField7: TStringField FieldName = 'CiroDov' Origin = 'Shpsat.CiroDov' Size = 3 end object OtelTopsatListeAltiTopToplamPax: TIntegerField FieldName = 'ToplamPax' Origin = '.ToplamPax' end end object OtelTopsatListeAltiTopDS: TDataSource DataSet = OtelTopsatListeAltiTop Left = 526 Top = 128 end object ShopMizan: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'select Mustipi,Magaza,Bolge,' ' Sum(CiroTut) as ToplamCiro,CiroDov,'#9 ' Sum(CiroiadeTut) as Toplamiade,NetCiro=(Sum(CiroTut)-Sum(Ciroia' + 'deTut)),' ' Sum(KrdTut) as ToplamKredili,KrdDov,' ' Sum(KomTut) as ToplamKomisyon,KomDov' 'from ShpSat ' 'Where not Tur is null ' 'Group by Mustipi,Magaza,Bolge,ciroDov,KrdDov,KomDov' 'Order By Mustipi,Magaza,Bolge') Left = 744 Top = 247 object ShopMizanMustipi: TStringField FieldName = 'Mustipi' Origin = '.Mustipi' Size = 6 end object ShopMizanMagaza: TStringField FieldName = 'Magaza' Origin = '.Magaza' Size = 6 end object ShopMizanBolge: TStringField FieldName = 'Bolge' Origin = '.Bolge' Size = 3 end object ShopMizanToplamCiro: TFloatField FieldName = 'ToplamCiro' Origin = '.' ReadOnly = True end object ShopMizanCiroDov: TStringField FieldName = 'CiroDov' Origin = '.CiroDov' Size = 3 end object ShopMizanToplamiade: TFloatField FieldName = 'Toplamiade' Origin = '.' ReadOnly = True end object ShopMizanNetCiro: TFloatField FieldName = 'NetCiro' Origin = '.' ReadOnly = True end object ShopMizanToplamKredili: TFloatField FieldName = 'ToplamKredili' Origin = '.' ReadOnly = True end object ShopMizanKrdDov: TStringField FieldName = 'KrdDov' Origin = '.KrdDov' Size = 3 end object ShopMizanToplamKomisyon: TFloatField FieldName = 'ToplamKomisyon' Origin = '.' ReadOnly = True end object ShopMizanKomDov: TStringField FieldName = 'KomDov' Origin = '.KomDov' Size = 3 end object ShopMizanMagazaLoop: TStringField FieldKind = fkLookup FieldName = 'MagazaLoop' LookupDataSet = Magaza LookupKeyFields = 'Kodu' LookupResultField = 'Adi' KeyFields = 'Magaza' Size = 30 Lookup = True end end object ShopMizanDS: TDataSource DataSet = ShopMizan Left = 743 Top = 203 end object MagGrp: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select * from MagazaGrp') Left = 323 Top = 232 object StringField5: TStringField FieldName = 'Adi' Required = True Size = 6 end object StringField6: TStringField FieldName = 'Magaza' Required = True Size = 6 end end object BolgeGrp: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select * from BolgeGrp') Left = 387 Top = 232 object BolgeGrpAdi: TStringField FieldName = 'Adi' Size = 6 end object BolgeGrpBolge: TStringField FieldName = 'Bolge' Size = 6 end end object TuropTopSat: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Operator, Sum(IsNull(CiroTut,0)) As ToplamCiro,Sum(IsNull' + '(CiroiadeTut,0)) As ToplamIade,' ' Sum(IsNull(KomTut,0)) As ToplamKomisyon ,' ' ToplamPax = (select ToplamPax=(Yet+Coc+Beb) from shpbas w' + 'here Tur=S.Tur and Tarih=S.Tarih and Operator=S.Operator)' ' ,CiroDov from Shpsat S' ' Where IsNull(Operator,'#39#39')<>'#39#39' and IsNull(CiroDov,'#39#39')<>'#39#39 'Group by S.Operator,S.CiroDov,S.Tur,S.Tarih') Left = 261 Top = 52 object TuropTopSatOperator: TStringField FieldName = 'Operator' Size = 6 end object TuropTopSatToplamCiro: TFloatField FieldName = 'ToplamCiro' ReadOnly = True end object TuropTopSatToplamIade: TFloatField FieldName = 'ToplamIade' ReadOnly = True end object TuropTopSatToplamKomisyon: TFloatField FieldName = 'ToplamKomisyon' ReadOnly = True end object TuropTopSatToplamPax: TSmallintField FieldName = 'ToplamPax' ReadOnly = True end object TuropTopSatCiroDov: TStringField FieldName = 'CiroDov' Size = 3 end end object TuropTopSatDS: TDataSource DataSet = TuropTopSat Left = 261 Top = 6 end object TurOpGrp: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select distinct adi From TurOpGrp with (NOLOCK)' 'order by adi') Active = True Left = 133 Top = 228 object TurOpGrpadi: TStringField FieldName = 'adi' Origin = 'TurOpGrp.adi' Size = 6 end end object MagIcmSat: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'SELECT sum(isnull(CiroNet, 0)) CiroNetToplam' #9' , CiroDov,Magaza' #9' , sum(isnull(RehHakTut, 0)) + sum(isnull(BilRehHakTut, 0)) + s' + 'um(isnull(DigerRehHakTut, 0)) + sum(isnull(ExtraHakTut, 0)) + su' + 'm(isnull(AcentaHakTut, 0)) as HakedisTut' 'FROM' #9'(SELECT '#39'S'#39' Tipi,m.Magaza' #9#9' , isnull(s.CiroTut, 0) AS CiroNet' #9#9' , CiroDov = (CASE' #9#9#9#9#9#9' WHEN isnull(s.CiroDov, '#39#39') = '#39#39' THEN' #9#9#9#9#9#9#9' KrdDov' #9#9#9#9#9#9' ELSE' #9#9#9#9#9#9#9' s.CiroDov' #9#9#9#9#9' END)' #9#9' , RehHakTut = (SELECT sum(isnull(k.HakKomTut, 0))' #9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9' ShpSatKom K, ShopKomAl a' #9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9' AND A.RehTip = '#39'TUR'#39') - isnull((SELECT isnull(sum(isnull' + '(k.HakKomTut, 0)), 0)' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' ShpSatKrdKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND A.RehTip = '#39'TUR'#39'), 0) + isnull((SELECT isnu' + 'll(sum(isnull(k.HakKomTut, 0)), 0)' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' ShpIadKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND A.RehTip = '#39'TUR'#39'), 0)' #9#9' , BilRehHakTut = (SELECT sum(isnull(k.HakKomTut, 0))' #9#9#9#9#9#9#9'FROM' #9#9#9#9#9#9#9#9'ShpSatKom K, ShopKomAl a' #9#9#9#9#9#9#9'WHERE' #9#9#9#9#9#9#9#9's.Tur = K.Tur' #9#9#9#9#9#9#9#9'AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9'AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9'AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9'AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9'AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9'AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9'AND A.RehTip = '#39'OTEL'#39') - isnull((SELECT isnull(sum(isnul' + 'l(k.HakKomTut, 0)), 0)' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' ShpSatKrdKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND A.RehTip = '#39'OTEL'#39'), 0) + isnull((SELECT is' + 'null(sum(isnull(k.HakKomTut, 0)), 0)' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' ShpIadKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND A.RehTip = '#39'OTEL'#39'), 0)' #9#9' , DigerRehHakTut = (SELECT sum(isnull(k.HakKomTut, 0))' #9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9' ShpSatKom K, ShopKomAl a' #9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9' AND A.RehTip = '#39'DIGER'#39') - isnull((SELECT isnull(sum(is' + 'null(k.HakKomTut, 0)), 0)' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9'FROM' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9'ShpSatKrdKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9'WHERE' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9's.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9'AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9'AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9'AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9'AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9'AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9'AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9'AND A.RehTip = '#39'DIGER'#39'), 0) + isnull((SELECT i' + 'snull(sum(isnull(k.HakKomTut, 0)), 0)' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' ShpIadKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND A.RehTip = '#39'DIGER'#39'), 0)' #9#9' , ExtraHakTut = (SELECT sum(isnull(k.HakKomTut, 0))' #9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9' ShpSatKom K, ShopKomAl a' #9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9' AND (isnull(Extra, '#39'N'#39') = '#39'Y'#39 #9#9#9#9#9#9#9' OR isnull(Extra, '#39'N'#39') = '#39'y'#39')) - isnull((SELECT isnull(' + 'sum(isnull(k.HakKomTut, 0)), 0)' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' ShpSatKrdKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND (isnull(Extra, '#39'N'#39') = '#39'Y'#39 #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' OR isnull(Extra, '#39'N'#39') = '#39'y'#39')), 0) + isnull(' + '(SELECT isnull(sum(isnull(k.HakKomTut, 0)), 0)' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' ShpIadKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND (isnull(Extra, '#39'N'#39') = '#39'Y'#39 #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' OR isnull(Extra, '#39'N'#39') = '#39'y'#39')), ' + '0)' #9#9' , AcentaHakTut = (SELECT sum(isnull(k.HakKomTut, 0))' #9#9#9#9#9#9#9'FROM' #9#9#9#9#9#9#9#9'ShpSatKom K, ShopKomAl a' #9#9#9#9#9#9#9'WHERE' #9#9#9#9#9#9#9#9's.Tur = K.Tur' #9#9#9#9#9#9#9#9'AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9'AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9'AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9'AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9'AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9'AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9'AND (NOT (isnull(Extra, '#39'N'#39') = '#39'Y'#39 #9#9#9#9#9#9#9#9'OR isnull(Extra, '#39'N'#39') = '#39'y'#39'))' #9#9#9#9#9#9#9#9'AND NOT (RehTip IS NOT NULL' #9#9#9#9#9#9#9#9'AND RehTip <> '#39#39')) - isnull((SELECT isnull(sum(isnull(k.' + 'HakKomTut, 0)), 0)' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' ShpSatKrdKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND (NOT (isnull(Extra, '#39'N'#39') = '#39'Y'#39 #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' OR isnull(Extra, '#39'N'#39') = '#39'y'#39'))' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND NOT (RehTip IS NOT NULL' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND RehTip <> '#39#39')), 0) + isnull((SELECT isnull(' + 'sum(isnull(k.HakKomTut, 0)), 0)' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' ShpIadKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND (NOT (isnull(Extra, '#39'N'#39') = '#39'Y'#39 #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' OR isnull(Extra, '#39'N'#39') = '#39'y'#39'))' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND NOT (RehTip IS NOT NULL' #9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9' AND RehTip <> '#39#39')), 0)' #9' FROM' #9#9' ShpMag m, ShpSat s' #9' WHERE' #9#9' m.Tur = s.Tur' #9#9' AND m.Magaza = '#39'029207'#39 #9#9' AND m.Bolge = s.Bolge' #9#9' AND m.Tarih = s.Tarih' #9#9' AND m.Sira = s.MgzSira' #9#9' AND s.Operator = M.Operator' #9#9' AND s.MusTipi = M.MusTipi' #9#9' AND s.Tarih BETWEEN '#39'10/01/2014'#39' AND '#39'10/01/2014'#39' UNION ALL' #9' SELECT '#39'T'#39' Tipi,m.Magaza' #9#9' , isnull(s.CiroTut, 0) AS CiroNet' #9#9' , CiroDov = KrdDov' #9#9' , RehHakTut = (SELECT sum(isnull(k.HakKomTut, 0))' #9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9' ShpSatKrdKom K, ShopKomAl a' #9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9' AND A.RehTip = '#39'TUR'#39')' #9#9' , BilRehHakTut = (SELECT sum(isnull(k.HakKomTut, 0))' #9#9#9#9#9#9#9'FROM' #9#9#9#9#9#9#9#9'ShpSatKrdKom K, ShopKomAl a' #9#9#9#9#9#9#9'WHERE' #9#9#9#9#9#9#9#9's.Tur = K.Tur' #9#9#9#9#9#9#9#9'AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9'AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9'AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9'AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9'AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9'AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9'AND A.RehTip = '#39'OTEL'#39')' #9#9' , DigerRehHakTut = (SELECT sum(isnull(k.HakKomTut, 0))' #9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9' ShpSatKrdKom K, ShopKomAl a' #9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9' AND A.RehTip = '#39'DIGER'#39')' #9#9' , ExtraHakTut = (SELECT sum(isnull(k.HakKomTut, 0))' #9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9' ShpSatKrdKom K, ShopKomAl a' #9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9' AND (isnull(Extra, '#39'N'#39') = '#39'Y'#39 #9#9#9#9#9#9#9' OR isnull(Extra, '#39'N'#39') = '#39'y'#39'))' #9#9' , AcentaHakTut = (SELECT sum(isnull(k.HakKomTut, 0))' #9#9#9#9#9#9#9'FROM' #9#9#9#9#9#9#9#9'ShpSatKrdKom K, ShopKomAl a' #9#9#9#9#9#9#9'WHERE' #9#9#9#9#9#9#9#9's.Tur = K.Tur' #9#9#9#9#9#9#9#9'AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9'AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9'AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9'AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9'AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9'AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9'AND (NOT (isnull(Extra, '#39'N'#39') = '#39'Y'#39 #9#9#9#9#9#9#9#9'OR isnull(Extra, '#39'N'#39') = '#39'y'#39'))' #9#9#9#9#9#9#9#9'AND NOT (RehTip IS NOT NULL' #9#9#9#9#9#9#9#9'AND RehTip <> '#39#39'))' #9' FROM' #9#9' ShpMag m, ShpSat s' #9' WHERE' #9#9' m.Tur = s.Tur' #9#9' AND m.Magaza = '#39'029207'#39 #9#9' AND m.Bolge = s.Bolge' #9#9' AND m.Tarih = s.Tarih' #9#9' AND m.Sira = s.MgzSira' #9#9' AND S.Operator = M.Operator' #9#9' AND S.MusTipi = M.MusTipi' #9#9' AND isnull(KrdTut, 0) > 0' #9#9' AND s.ThsTarih BETWEEN '#39'10/01/2014'#39' AND '#39'10/01/2014'#39' UNION AL' + 'L' #9' SELECT '#39'U'#39' Tipi,m.Magaza' #9#9' , isnull(s.CiroiadeTut, 0) AS CiroNet' #9#9' , CiroDov = (CASE' #9#9#9#9#9#9' WHEN isnull(s.CiroDov, '#39#39') = '#39#39' THEN' #9#9#9#9#9#9#9' KrdDov' #9#9#9#9#9#9' ELSE' #9#9#9#9#9#9#9' s.CiroDov' #9#9#9#9#9' END)' #9#9' , RehHakTut = 0 - isnull((SELECT isnull(sum(isnull(k.HakKomT' + 'ut, 0)), 0)' #9#9#9#9#9#9#9#9#9'FROM' #9#9#9#9#9#9#9#9#9#9'ShpIadKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9'WHERE' #9#9#9#9#9#9#9#9#9#9's.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9'AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9'AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9'AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9'AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9'AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9'AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9'AND A.RehTip = '#39'TUR'#39'), 0)' #9#9' , BilRehHakTut = 0 - isnull((SELECT isnull(sum(isnull(k.HakK' + 'omTut, 0)), 0)' #9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9' ShpIadKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9' AND A.RehTip = '#39'OTEL'#39'), 0)' #9#9' , DigerRehHakTut = 0 - isnull((SELECT isnull(sum(isnull(k.Ha' + 'kKomTut, 0)), 0)' #9#9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9#9' ShpIadKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9#9' AND A.RehTip = '#39'DIGER'#39'), 0)' #9#9' , ExtraHakTut = 0 - isnull((SELECT isnull(sum(isnull(k.HakKo' + 'mTut, 0)), 0)' #9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9' ShpIadKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9' AND (isnull(Extra, '#39'N'#39') = '#39'Y'#39 #9#9#9#9#9#9#9#9#9#9' OR isnull(Extra, '#39'N'#39') = '#39'y'#39')), 0)' #9#9' , AcentaHakTut = 0 - isnull((SELECT isnull(sum(isnull(k.HakK' + 'omTut, 0)), 0)' #9#9#9#9#9#9#9#9#9' FROM' #9#9#9#9#9#9#9#9#9#9' ShpIadKom K, ShopKomAl a' #9#9#9#9#9#9#9#9#9' WHERE' #9#9#9#9#9#9#9#9#9#9' s.Tur = K.Tur' #9#9#9#9#9#9#9#9#9#9' AND s.Tarih = K.Tarih' #9#9#9#9#9#9#9#9#9#9' AND s.Bolge = K.Bolge' #9#9#9#9#9#9#9#9#9#9' AND s.Operator = K.Operator' #9#9#9#9#9#9#9#9#9#9' AND s.MusTipi = K.MusTipi' #9#9#9#9#9#9#9#9#9#9' AND S.Sira = K.ShpSira' #9#9#9#9#9#9#9#9#9#9' AND k.KomAlan = a.Kodu' #9#9#9#9#9#9#9#9#9#9' AND (NOT (isnull(Extra, '#39'N'#39') = '#39'Y'#39 #9#9#9#9#9#9#9#9#9#9' OR isnull(Extra, '#39'N'#39') = '#39'y'#39'))' #9#9#9#9#9#9#9#9#9#9' AND NOT (RehTip IS NOT NULL' #9#9#9#9#9#9#9#9#9#9' AND RehTip <> '#39#39')), 0)' #9' FROM' #9#9' ShpMag m, ShpSat s' #9' WHERE' #9#9' m.Tur = s.Tur' #9#9' AND m.Magaza = '#39'029207'#39 #9#9' AND m.Bolge = s.Bolge' #9#9' AND m.Tarih = s.Tarih' #9#9' AND m.Sira = s.MgzSira' #9#9' AND s.Operator = M.Operator' #9#9' AND s.MusTipi = M.MusTipi' #9#9' AND s.iadeTar BETWEEN '#39'10/01/2014'#39' AND '#39'10/01/2014'#39') X' 'GROUP BY' #9'CiroDov,Magaza') MasterSource = MagIcmDS DetailFields = 'Magaza' Left = 103 Top = 387 object MagIcmSatCiroNetToplam: TFloatField FieldName = 'CiroNetToplam' ReadOnly = True end object MagIcmSatCiroDov: TStringField FieldName = 'CiroDov' ReadOnly = True Size = 3 end object MagIcmSatHakedisTut: TFloatField FieldName = 'HakedisTut' ReadOnly = True end object MagIcmSatMagaza: TStringField FieldName = 'Magaza' ReadOnly = True Size = 6 end end object MagIcmSatDS: TDataSource DataSet = MagIcmSat Left = 104 Top = 329 end object MagIcm: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'Select Magaza' ' , sum(GirYet) AS ToplamYet' #9' , sum(GirCoc) AS ToplamCoc' #9' , sum(GirBeb) AS ToplamBeb' #9' , sum(KatilanPax) AS KatilanPax' ' , FireAdet = (sum(KatilanPax) - sum(GirYet))' #9' , FireOran =((sum(GirYet)*100) / sum(KatilanPax))' #9'from (' 'SELECT Magaza' ' , GirYet' #9' , GirCoc' #9' , GirBeb' #9' , KatilanPax = (' #9#9#9#9#9#9'SELECT sum(isnull(Yet,0)) from ShpBas B ' #9#9#9#9#9#9#9'WHERE B.Tur=s.Tur AND B.Bolge=s.Bolge and B.Operator=s.Op' + 'erator AND B.MusTipi=s.MusTipi' #9#9#9#9' )' 'FROM' #9'ShpMag s' 'WHERE' #9'1 = 1' ') x' 'group by Magaza') Left = 30 Top = 390 object MagIcmMagaza: TStringField FieldName = 'Magaza' Size = 6 end object MagIcmToplamYet: TIntegerField FieldName = 'ToplamYet' ReadOnly = True end object MagIcmToplamCoc: TIntegerField FieldName = 'ToplamCoc' ReadOnly = True end object MagIcmToplamBeb: TIntegerField FieldName = 'ToplamBeb' ReadOnly = True end object MagIcmMagazaAdi: TStringField FieldKind = fkLookup FieldName = 'MagazaAdi' LookupDataSet = Magaza LookupKeyFields = 'Kodu' LookupResultField = 'Adi' KeyFields = 'Magaza' Lookup = True end object MagIcmKatilanPax: TIntegerField FieldName = 'KatilanPax' ReadOnly = True end object MagIcmFireAdet: TIntegerField FieldName = 'FireAdet' ReadOnly = True end object MagIcmFireOran: TIntegerField FieldName = 'FireOran' ReadOnly = True end end object MagIcmDS: TDataSource DataSet = MagIcm Left = 30 Top = 329 end object AyBasTut: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'SELECT Magaza,sum(AyBasTut) as AyBasTut, AyBasDov' 'FROM ShpMag s' 'WHERE Magaza=:Magaza and NOT AyBasDov IS NULL AND NOT AyBasTut I' + 'S NULL' 'GROUP BY Magaza,AyBasDov' 'ORDER BY Magaza,AyBasDov') MasterSource = MagIcmDS DetailFields = 'Magaza' Active = True Left = 261 Top = 393 ParamData = < item DataType = ftString Name = 'Magaza' ParamType = ptInput Size = 6 Value = 'BATIK' end> object AyBasTutMagaza: TStringField FieldName = 'Magaza' Size = 6 end object AyBasTutAyBasTut: TFloatField FieldName = 'AyBasTut' ReadOnly = True end object AyBasTutAyBasDov: TStringField FieldName = 'AyBasDov' Size = 3 end end object AyBasTutDS: TDataSource DataSet = AyBasTut Left = 255 Top = 331 end object GarantiliSat: TMSQuery Connection = mDM.MSConnection SQL.Strings = ( 'SELECT Magaza,sum(GirYet * GarHakKont) as GarantiliTut, GarHakDo' + 'v' 'FROM ShpMag s' 'WHERE Magaza=:Magaza and NOT GarHakDov IS NULL' 'GROUP BY Magaza,GarHakDov' 'ORDER BY Magaza,GarHakDov') MasterSource = MagIcmDS DetailFields = 'Magaza' Active = True Left = 329 Top = 395 ParamData = < item DataType = ftString Name = 'Magaza' ParamType = ptInput Size = 6 Value = 'BATIK' end> object GarantiliSatMagaza: TStringField FieldName = 'Magaza' Size = 6 end object GarantiliSatGarantiliTut: TFloatField FieldName = 'GarantiliTut' ReadOnly = True end object GarantiliSatGarHakDov: TStringField FieldName = 'GarHakDov' Size = 3 end end object Garantili_DS: TDataSource DataSet = GarantiliSat Left = 326 Top = 336 end end