SELECT
CSROLL.BRANCH ISYERIKOD,
(SELECT D.NAME FROM L_CAPIDIV D WHERE D.FIRMNR={0} AND D.NR=CSROLL.BRANCH) ISYERI,
CSROLL.DEPARTMENT BOLUMKOD,
(SELECT D.NAME FROM L_CAPIDEPT D WHERE D.FIRMNR={0} AND D.NR=CSROLL.DEPARTMENT) BOLUM,
CSROLL.CYPHCODE YETKIKODU,
CSROLL.ROLLNO BORDRONO,
CSCARD.PORTFOYNO,
CSCARD.NEWSERINO CEKNO,
CSCARD.DUEDATE VADE,
(SELECT B.CODE FROM LG_{0}_BANKACC B WHERE B.LOGICALREF=CSROLL.CARDREF) BANKAKOD,
(SELECT B.DEFINITION_ FROM LG_{0}_BANKACC B WHERE B.LOGICALREF=CSROLL.CARDREF) BANKA,
(SELECT C.CODE FROM LG_{0}_CLCARD C WHERE C.LOGICALREF= (SELECT CSROLL2.CARDREF FROM LG_{0}_{1}_CSROLL CSROLL2 WHERE CSROLL2.TRCODE=1 AND
CSROLL2.LOGICALREF IN (SELECT CSTRANS2.ROLLREF FROM LG_{0}_{1}_CSTRANS CSTRANS2 WHERE CSTRANS2.CSREF =CSCARD.LOGICALREF)) ) CARIKOD,
(SELECT C.DEFINITION_ FROM LG_{0}_CLCARD C WHERE C.LOGICALREF= (SELECT CSROLL2.CARDREF FROM LG_{0}_{1}_CSROLL CSROLL2 WHERE CSROLL2.TRCODE=1 AND
CSROLL2.LOGICALREF IN (SELECT CSTRANS2.ROLLREF FROM LG_{0}_{1}_CSTRANS CSTRANS2 WHERE CSTRANS2.CSREF =CSCARD.LOGICALREF)) ) CARI,
CASE WHEN CSTRANS.TRCODE=5 THEN CSROLL.TOTAL ELSE 0 END TUTAR
FROM LG_{0}_{1}_CSCARD CSCARD LEFT JOIN LG_{0}_{1}_CSTRANS CSTRANS ON CSTRANS.CSREF=CSCARD.LOGICALREF
LEFT JOIN LG_{0}_{1}_CSROLL CSROLL ON CSROLL.LOGICALREF = CSTRANS.ROLLREF
WHERE CSCARD.PORTFOYNO='PORTFOYD' AND CSTRANS.TRCODE IN (5)
LOGO OBJECTS LOGICALREF ALMA
}
if (!KKT.Post())
throw new Exception(GetLastError(KKT));
int LOGICALREF = Convert.ToInt32(KKT.DataFields.DBFieldByName("LOGICALREF").Value);
LOGO_LOGOUT();
LR.LogoObjectResult = true;
LR.LogoObjectResultText = ENCODE("Eklendi.");
return LR;
} catch (Exception E) {
Perkotek PDKS mysql blocklanırsa
Perkotekin altındaki mysql binin içinde cmd yönetici olarak çalıştırılır
mysql -u root -p [enter]
parola [enter]
FLUSH HOSTS; [enter]
MS SQL TO C# CLASS
declare @TableName sysname = 'CFGUSERSLIST'
declare @result varchar(max) = 'public class ' + @TableName + '
{'
select @result = @result + '
public ' + ColumnType + ' ' + ColumnName + ' { get; set; }
'
from
(
select
replace(col.name, ' ', '_') ColumnName,
column_id,
case typ.name
when 'bigint' then 'long'
when 'binary' then 'byte[]'
when 'bit' then 'bool'
when 'char' then 'string'
when 'date' then 'DateTime'
when 'datetime' then 'DateTime'
when 'datetime2' then 'DateTime'
when 'datetimeoffset' then 'DateTimeOffset'
when 'decimal' then 'decimal'
when 'float' then 'float'
when 'image' then 'byte[]'
when 'int' then 'int'
when 'money' then 'decimal'
when 'nchar' then 'char'
when 'ntext' then 'string'
when 'numeric' then 'decimal'
when 'nvarchar' then 'string'
when 'real' then 'double'
when 'smalldatetime' then 'DateTime'
when 'smallint' then 'short'
when 'smallmoney' then 'decimal'
when 'text' then 'string'
when 'time' then 'TimeSpan'
when 'timestamp' then 'DateTime'
when 'tinyint' then 'byte'
when 'uniqueidentifier' then 'Guid'
when 'varbinary' then 'byte[]'
when 'varchar' then 'string'
else 'UNKNOWN_' + typ.name
end +
CASE
WHEN col.is_nullable=1 AND
typ.name NOT IN (
'binary', 'varbinary', 'image',
'text', 'ntext',
'varchar', 'nvarchar', 'char', 'nchar')
THEN '?'
ELSE '' END AS [ColumnType]
from sys.columns col
join sys.types typ on
col.system_type_id = typ.system_type_id AND col.user_type_id = typ.user_type_id
where object_id = object_id(@TableName)
) t
order by column_id
set @result = @result + '
}'
print @result
Flutter json to dart
flutter json dart diline çevirmek için;
1-jsonu bu siteye yapıştır: app.quicktype.io sağ tarafta language dart olmasına dikkat et (https://youtu.be/wc8ecFSu5N8)
2-pubspece dev_dependencisin altına json_model , build_runner , json_serializable (https://youtu.be/KsZQQK1HOu8?t=119) asdasd libin altında jsons klasorunun içinde json içeriğini yapıştır ör(cari.json) ve command pallette çalıştır: flutter packages pub run json_model video: https://youtu.be/KsZQQK1HOu8
DEVEXTREME DEVEXPRESS MVC TURKCE KARAKTER SORUNU
Yukarıdaki sorunun çözümü visual studioda iligli ekranı save as unicode utf 8 yapmaktır
PERKOTEK MYSQL LINK TO SQL SERVER
Perkotek klasorunde mysql binde bu versionda test edildi;
MYSQL Ver 12.22 Distrib 4.0.20a, for Win95/Win98 (i32)
My sql connector mysql-connector-odbc-3.51.30-winx64.msi indirildi
Control panelde system dns yaratıldı;
Sql serverde linked servere sağ tıklayıp new deyip aşağıdaki ayarlar yapıldı
Bunların true olmasına dikkat et;
Tablolar geldi;
Link server üzerinden örnek sorgu çalıştır;
Spye çevir;
C# GRIDVIEW ALTTOPLAM GUNCELLEME
private void gridView1_CustomDrawFooterCell(object sender, DevExpress.XtraGrid.Views.Grid.FooterCellCustomDrawEventArgs e) {
try {
if (e.Column == GR_GECIKMIS_ALACAK_YUZDESI) {
double BAKIYE = double.Parse(gridView1.Columns["BAKIYE"].SummaryItem.SummaryValue.ToString());
double TUTAR = double.Parse(gridView1.Columns["TUTAR"].SummaryItem.SummaryValue.ToString());
double YORAN = Math.Round( (BAKIYE / TUTAR)*100,2);
GridView view = (GridView)sender;
e.Info.DisplayText ="%"+ YORAN.ToString();
}
} catch {
}
}
C# NOTLARIM
Devexpress kullanımında gridview kullanırken setgridvalue kullanmak yerine datatableda gerekli değişiklikleri yaptıktan sonra gridccontrolun datasourceunu datatablea eşitlemek daha sorunsuz olur. Sebebi gridview count kullanırken bazı değerleri setgridvalueda atmamakta ama filtreleyince atmakta.
LOGO SQL MALZEME EKSTRE
/*TEST =
select * from dbo.SELECT_MALZEMEEXTRE_201('01/01/2017',getdate(),'01-YK-0001')*/
/****** Object: UserDefinedFunction [dbo].[SELECT_MALZEMEEXTRE_201] Script Date: 18.8.2020 09:09:02 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE FUNCTION [dbo].[SELECT_MALZEMEEXTRE_201]
(
@BAT DATETIME,
@BIT DATETIME,
@MALZEMEKODU VARCHAR(50)
)
RETURNS TABLE
AS
RETURN
SELECT
X.AMBAR,
x.[Stfıche_Referans] ,
x.[Stlıne_Referans] ,
x.[Fiş No],
x.[Fiş Türü],
x.[Belge No],
x.[Stfıche Tarıh],
x.[Stlıne Tarıh],
x.[Ftıme],
x.[Stok Kodu],
x.[Stok Adı],
x.[Bırım],
x.[Giriş Çıkış],
x.[Miktar],
X.STFICHELNNO,
x.Kalan,
x.[Tutar]
FROM (
SELECT
(SELECT NAME FROM L_CAPIWHOUSE CAPIWHOUSE WHERE CAPIWHOUSE.NR = STLINE.SOURCEINDEX AND CAPIWHOUSE.FIRMNR = 201 ) AMBAR,
STFICHE.LOGICALREF [STFICHE_REFERANS],
STLINE.LOGICALREF [STLINE_REFERANS],
[Fiş No]=STFICHE.FICHENO,
[Fiş Türü]=CASE STFICHE.TRCODE
WHEN 1 then 'Satınalma İrsaliyesi'
WHEN 2 then 'Perakende Satış İade İrsaliyesi'
WHEN 3 then 'Toptan Satış İade İrsaliyesi'
WHEN 4 then 'Konsinye Çıkış İade İrsaliyesi'
WHEN 5 then 'Konsinye Giriş İrsaliyesi'
WHEN 6 then 'Satınalma İade İrsaliyesi'
WHEN 7 then 'Perakende Satış İrsaliyesi'
WHEN 8 then 'Toptan Satış İrsaliyesi'
WHEN 9 then 'Konsinye Çıkış İrsaliyesi'
WHEN 10 then 'Konsinye Giriş İade İrsaliyesi'
WHEN 11 then 'Fire Fişi'
WHEN 12 then 'Sarf Fişi'
WHEN 13 then 'Üretimden Giriş Fişi'
WHEN 14 then 'Devir Fişi'
WHEN 25 then 'Ambar Fişi'
WHEN 26 then 'Muhtahsil İrsaliyesi'
WHEN 50 then 'Sayım Fazlası Fişi'
WHEN 51 then 'Sayım Eksiği Fişi' ELSE '' END,
[Belge No]=STFICHE.DOCODE,
[Stfıche Tarıh]=STFICHE.DATE_,
[Stlıne Tarıh]=STLINE.DATE_,
[Ftıme]=STLINE.FTIME,
[Stok Kodu]=ITEMS.CODE,
[Stok Adı]=ITEMS.NAME,
[Bırım]=BIRIM.CODE,
[Giriş Çıkış]= CASE WHEN STLINE.IOCODE IN(1,2) THEN 'Giriş' when STLINE.IOCODE IN(3,4) THEN 'Çıkış' else '' end,
[Miktar]=CAST((CASE WHEN STLINE.IOCODE IN(1,2) THEN 1 ELSE -1 end) * STLINE.AMOUNT*(CASE WHEN ISNULL(UINFO2,0)=0 THEN 1 ELSE UINFO2 END)/(CASE WHEN ISNULL(UINFO1,0)=0 THEN 1 ELSE UINFO1 END) AS float),
STLINE.STFICHELNNO,
0.00 KALAN,
[Tutar]=(CASE WHEN STLINE.IOCODE IN(1,2) THEN 1 ELSE -1 end) * STLINE.VATMATRAH
FROM LG_201_01_STFICHE STFICHE WITH (NOLOCK)
LEFT OUTER JOIN LG_201_01_STLINE STLINE WITH (NOLOCK) ON STFICHE.LOGICALREF=STLINE.STFICHEREF
LEFT OUTER JOIN LG_201_ITEMS ITEMS WITH (NOLOCK) ON STLINE.STOCKREF =ITEMS.LOGICALREF
LEFT OUTER JOIN LG_201_UNITSETL BIRIM WITH (NOLOCK) ON BIRIM.UNITSETREF= ITEMS.UNITSETREF AND BIRIM.MAINUNIT=1
WHERE
STFICHE.CANCELLED=0 AND STLINE.CANCELLED=0
AND STLINE.LINETYPE=0
AND STLINE.IOCODE IN (1,2,3,4)
AND ITEMS.CODE=@MALZEMEKODU
AND STLINE.LPRODSTAT=0
AND (STLINE.DATE_>=@BAT AND STLINE.DATE_<=@BIT )
)
AS X
GO
Blog of Sem 