private void PartlySynchronisation(object sender, EventArgs e) { if (Dp.StartSynchronisation()) { Application.Current.Dispatcher.Invoke(UpdateSyncDate); } }
protected override void GetDataSource(out string DataSource, out string DataSourceOrder, List <FieldParam> Parameters) { DateTime AwalBlnIni = new DateTime(_Tahun, (int)_Bulan, 1); DateTime AkhirBlnIni = AwalBlnIni.AddMonths(1) .AddDays(-1); BaseGL.RingkasanAkun.Update(AkhirBlnIni); string strNilai1 = Dp.GetSqlCoalesce("SaldoAwal", 0); string strNilai2 = Dp.GetSqlCoalesce("MutasiDebit", 0); string strNilai3 = Dp.GetSqlCoalesce("MutasiKredit", 0); Parameters.Add(new FieldParam("0", _Level)); DataSource = string.Concat( "SELECT NoAkun,NamaAkun,LevelAkun,UrutanCetak,Posting,", strNilai1, " as SaldoAwal,", strNilai2, " as MutasiDebit,", strNilai3, " as MutasiKredit,(", strNilai1, "+", strNilai2, "-", strNilai3, ") AS SaldoAkhir FROM (SELECT UrutanCetak,NoAkun,NamaAkun,LevelAkun,Posting,Aktif,(SELECT SUM(Debit-Kredit) FROM (", BaseGL.RingkasanAkun.SqlPosisiAkun(AwalBlnIni, false, "1", Parameters), ") a WHERE a.IdAkun=b.IdAkun OR a.IdAkun LIKE b.IdAkun+'.%') as SaldoAwal,(SELECT SUM(Debit) FROM (", BaseGL.RingkasanAkun.SqlMutasiAkun(AwalBlnIni, AkhirBlnIni, false, "2", Parameters), ") a WHERE a.IdAkun=b.IdAkun OR a.IdAkun LIKE b.IdAkun+'.%') as MutasiDebit,(SELECT SUM(Kredit) FROM (", BaseGL.RingkasanAkun.SqlMutasiAkun(AwalBlnIni, AkhirBlnIni, false, "3", Parameters), ") a WHERE a.IdAkun=b.IdAkun OR a.IdAkun LIKE b.IdAkun+'.%') as MutasiKredit", " FROM Akun b WHERE LevelAkun<=@0) X WHERE Aktif<>0"); DataSourceOrder = "UrutanCetak"; }
protected override void InitUI() { ListAkun = FastLoadEntities <Akun>( "IdAkun,NoAkun,NamaAkun", "Aktif<>0 AND Posting<>0", "NoAkun", true); ListMataUang = FastLoadEntities <MataUang>( "KodeMataUang,NamaMataUang", "Aktif<>0", "KodeMataUang", true); ListDepartemen = FastLoadEntities <Departemen>( "IdDepartemen,KodeDepartemen,NamaDepartemen", "Posting<>0 AND Aktif<>0", "KodeDepartemen", true, true); ListProyek = FastLoadEntities <Proyek>( "IdProyek,KodeProyek,NamaProyek", "Posting<>0 AND Aktif<>0", "KodeProyek", true, true); ListAturan = FastLoadEntities <MasterAturanJurnal>( "AturanJurnal", "Aktif<>0", "AturanJurnal", true, true); ListJenisDokSumber = FastLoadEntities <JenisDokSumberJurnal>( "JenisDokSumber", "Aktif<>0 AND Otomatis=0", "JenisDokSumber", true); _JenisDokSumber = Dp.GetVariable <string>( "JurnalVar", "JenisDokSumber", string.Empty); LastJenisDokSumber = _JenisDokSumber; CheckTransDate = true; }
public void RunStructFldScenario(SimpleTernaryOpTest__DotProductBySelectedQuadruplet_Vector64_UInt32_Vector128_Byte_3 testClass) { var result = Dp.DotProductBySelectedQuadruplet(_fld1, _fld2, _fld3, 3); Unsafe.Write(testClass._dataTable.outArrayPtr, result); testClass.ValidateResult(_fld1, _fld2, _fld3, testClass._dataTable.outArrayPtr); }
public void RunStructFldScenario(SimpleTernaryOpTest__DotProduct_Vector64_Int32 testClass) { var result = Dp.DotProduct(_fld1, _fld2, _fld3); Unsafe.Write(testClass._dataTable.outArrayPtr, result); testClass.ValidateResult(_fld1, _fld2, _fld3, testClass._dataTable.outArrayPtr); }
protected override void GetDataSource(out string DataSource, out string DataSourceOrder, List <FieldParam> Parameters) { string strTemp = string.Empty; string strEmpty = FormatSqlValue(string.Empty, DataType.VarChar); UpdateSaldo(); if (BaseGL.SetingPerusahaan.MultiDepartemen) { strTemp = string.Concat(Dp.GetSqlIifNoFormat("IdDepartemen=" + strEmpty, strEmpty, "(SELECT KodeDepartemen FROM Departemen X WHERE X.IdDepartemen=IdDepartemen)"), " AS KodeDepartemen,"); } if (BaseGL.SetingPerusahaan.MultiProyek) { strTemp = string.Concat(strTemp, Dp.GetSqlIifNoFormat("IdProyek=" + strEmpty, strEmpty, "(SELECT KodeProyek FROM Proyek X WHERE X.IdProyek=IdProyek)"), " AS KodeProyek,"); } Parameters.Add(new FieldParam("0", _TglAwal)); Parameters.Add(new FieldParam("1", _TglAkhir.AddDays(1))); Parameters.Add(new FieldParam("2", _Akun)); DataSource = string.Concat(@"SELECT J.NoJurnal, TglJurnal,JenisDokSumber,NoDokSumber,BuatJurnalPembalik,", strTemp, @"Debit,Kredit,J.Keterangan AS Uraian FROM Jurnal J INNER JOIN JurnalDetil D ON J.NoJurnal=D.NoJurnal WHERE TglJurnal>=@0 AND TglJurnal<@1 AND IdAkun=@2"); DataSourceOrder = "TglJurnal,NoJurnal"; }
protected override void GetDataSource(out string DataSource, out string DataSourceOrder, List <FieldParam> Parameters) { BaseGL.RingkasanAkun.Update(_TglNeraca2 > _TglNeraca1 ? _TglNeraca2 : _TglNeraca1); string NilaiNeraca1 = Dp.GetSqlCoalesce("Neraca1", 0); string NilaiNeraca2 = Dp.GetSqlCoalesce("Neraca2", 0); DataSource = string.Concat( "SELECT NoAkun,NamaAkun,JenisAkun,UrutanKelompok,KelompokAkun,", NilaiNeraca1, " as Neraca1,", NilaiNeraca2, " as Neraca2,", NilaiNeraca2, "-", NilaiNeraca1, " as Selisih,", Dp.GetSqlIifNoFormat(NilaiNeraca1 + "=0", Dp.GetSqlIifNoFormat(NilaiNeraca2 + "<0", "-100", Dp.GetSqlIifNoFormat(NilaiNeraca2 + ">0", "100", "null")), string.Concat("(", NilaiNeraca2, "-", NilaiNeraca1, ")*100/", Dp.GetSqlAbs(NilaiNeraca1))), @" as [% Selisih] FROM (SELECT JenisAkun,UrutanKelompok,KelompokAkun,NoAkun,NamaAkun,Aktif, (SELECT SUM(Debit-Kredit) FROM (", BaseGL.RingkasanAkun.SqlPosisiAkun(_TglNeraca1, false, "1", Parameters), @") p WHERE p.IdAkun=q.IdAkun ) as Neraca1, (SELECT SUM(Debit-Kredit) FROM (", BaseGL.RingkasanAkun.SqlPosisiAkun(_TglNeraca2, false, "2", Parameters), @") r WHERE r.IdAkun=q.IdAkun ) as Neraca2 FROM Akun q WHERE Posting<>0 AND JenisAkun<>", FormatSqlValue(enJenisAkun.Laba__Rugi), ") XX WHERE Aktif<>0"); DataSourceOrder = "UrutanKelompok,NoAkun"; }
protected override void AfterSaveUpdate() { CekIndukProyek(); if (_Posting && Find.IsExists <Proyek>("IdInduk=@0", new FieldParam("0", _IdProyek))) { AddError("Posting", "Proyek Posting Tidak Boleh Mempunyai Anak"); } if (!GetOriginal <Proyek>().Posting&& _KodeProyek != GetOriginal <Proyek>().KodeProyek) { string KodeProyekOrg = GetOriginal <Proyek>().KodeProyek; ExecuteNonQuery(string.Concat( "UPDATE Proyek SET UrutanCetak=@0+", Dp.GetSqlSubString("UrutanCetak", GetOriginal <Proyek>().UrutanCetak.Length + 1, 250), " WHERE UrutanCetak LIKE @1"), new FieldParam("0", UrutanCetak), new FieldParam("1", GetOriginal <Proyek>() .UrutanCetak + "|%")); //ExecuteNonQuery(string.Concat( // "UPDATE Proyek SET KodeProyek=", // FormatSqlValue(_KodeProyek), "+", // DataPersistance.GetSqlSubString("KodeProyek", // KodeProyekOrg.Length + 1, 100), // " WHERE IdProyek LIKE ", // FormatSqlValue(IdProyek + ".%"), " AND ", // DataPersistance.GetSqlSubString("KodeProyek", 1, // KodeProyekOrg.Length), "=", // FormatSqlValue(GetOriginal<Proyek>().KodeProyek))); } }
protected override void EndUI() { ListKas.Close(); ListJenisPenerimaan.Close(); ListDepartemen.Close(); ListProyek.Close(); Dp.SetVariable("PenerimaanKasUmumVar", "IdKas", _IdKas); }
public void RunClassFldScenario() { TestLibrary.TestFramework.BeginScenario(nameof(RunClassFldScenario)); var result = Dp.DotProductBySelectedQuadruplet(_fld1, _fld2, _fld3, 3); Unsafe.Write(_dataTable.outArrayPtr, result); ValidateResult(_fld1, _fld2, _fld3, _dataTable.outArrayPtr); }
protected override void EndUI() { ListKas.Close(); ListJenisPengeluaran.Close(); ListDepartemen.Close(); ListProyek.Close(); Dp.SetVariable("PerintahBayarVar", "IdKas", _IdKas); }
protected override void EndUI() { ListAkun.Close(); ListMataUang.Close(); ListDepartemen.Close(); ListProyek.Close(); ListAturan.Close(); ListJenisDokSumber.Close(); Dp.SetVariable("JurnalVar", "JenisDokSumber", LastJenisDokSumber); }
public string GetSqlSelectDocumentVariableKey( string ModuleName, string VariableName) { return(string.Concat( "SELECT DocumentKey FROM _System_RoleModuleDocument WHERE ProductName=", Dp.FormatSqlValue(BaseFramework.ProductName), " AND RoleName=", Dp.FormatSqlValue(_CurrentRole), " AND ModuleName=", Dp.FormatSqlValue(ModuleName), " AND VariableName=", Dp.FormatSqlValue(VariableName))); }
public void RunStructLclFldScenario() { TestLibrary.TestFramework.BeginScenario(nameof(RunStructLclFldScenario)); var test = TestStruct.Create(); var result = Dp.DotProductBySelectedQuadruplet(test._fld1, test._fld2, test._fld3, 3); Unsafe.Write(_dataTable.outArrayPtr, result); ValidateResult(test._fld1, test._fld2, test._fld3, _dataTable.outArrayPtr); }
public void RunClassLclFldScenario() { TestLibrary.TestFramework.BeginScenario(nameof(RunClassLclFldScenario)); var test = new SimpleTernaryOpTest__DotProductBySelectedQuadruplet_Vector64_UInt32_Vector128_Byte_3(); var result = Dp.DotProductBySelectedQuadruplet(test._fld1, test._fld2, test._fld3, 3); Unsafe.Write(_dataTable.outArrayPtr, result); ValidateResult(test._fld1, test._fld2, test._fld3, _dataTable.outArrayPtr); }
protected override void AfterLoadFound() { ListRole = new List <string>(); DataTable dt = Dp.OpenDataTable( "SELECT RoleName FROM _System_RoleUser WHERE ProductName=@1 AND UserName=@0", new FieldParam("0", UserName), new FieldParam("1", BaseFramework.ProductName)); foreach (DataRow dr in dt.Rows) { ListRole.Add((string)dr[0]); } }
public void RunLclVarScenario_Load() { TestLibrary.TestFramework.BeginScenario(nameof(RunLclVarScenario_Load)); var op1 = AdvSimd.LoadVector64((UInt32 *)(_dataTable.inArray1Ptr)); var op2 = AdvSimd.LoadVector64((Byte *)(_dataTable.inArray2Ptr)); var op3 = AdvSimd.LoadVector128((Byte *)(_dataTable.inArray3Ptr)); var result = Dp.DotProductBySelectedQuadruplet(op1, op2, op3, 3); Unsafe.Write(_dataTable.outArrayPtr, result); ValidateResult(op1, op2, op3, _dataTable.outArrayPtr); }
public void RunLclVarScenario_UnsafeRead() { TestLibrary.TestFramework.BeginScenario(nameof(RunLclVarScenario_UnsafeRead)); var op1 = Unsafe.Read <Vector64 <UInt32> >(_dataTable.inArray1Ptr); var op2 = Unsafe.Read <Vector64 <Byte> >(_dataTable.inArray2Ptr); var op3 = Unsafe.Read <Vector128 <Byte> >(_dataTable.inArray3Ptr); var result = Dp.DotProductBySelectedQuadruplet(op1, op2, op3, 3); Unsafe.Write(_dataTable.outArrayPtr, result); ValidateResult(op1, op2, op3, _dataTable.outArrayPtr); }
protected override string GetBrowseFilter() { switch (FormMode) { case enFormPerintahBayar.PerintahBayar: return(string.Empty); default: //enFormPerintahBayar.PengeluaranUang: return("Status=" + Dp.FormatSqlValue(enStatusPerintahBayar.SudahDibayar)); } }
private void AppendDocuments() { OpenFileDialog openFileDialog = new OpenFileDialog { Title = "Select a picture", Filter = "Image files (*.jpg, *.jpeg, *.jpe, *.jfif, *.png) | *.jpg; *.jpeg; *.jpe; *.jfif; *.png" }; ; if (openFileDialog.ShowDialog() == true) { try { OrderItemReport oir = new OrderItemReport() { //Comment = "Kommentar kksksksksk", //Id = 59, OrderItemId = SelectedDetailed.OrderItemId, ReportDate = new DateTime(), Appendix = new List <OrderItemReportAppendix>() { new OrderItemReportAppendix() { //Id = 10, //OrderItemReportId = 50, Picture = ImageConverter.ImageToByteArray(new BitmapImage(new Uri(openFileDialog.FileName, UriKind.Absolute))) } } }; SelectedDetailed.OrderItemReports.Add(oir); Dp.AddOrderItemReport(oir); //if(Dp.AddOrderItemReport(oir)) // MessageBox.Show("Update erfolgreich!", "Info", MessageBoxButton.OK, MessageBoxImage.Information); //else // MessageBox.Show("Update fehlgeschlagen", "Fehler", MessageBoxButton.OK, MessageBoxImage.Error); if (Dp.UpdateOrderItemData(SelectedDetailed)) { MessageBox.Show("Update erfolgreich!", "Info", MessageBoxButton.OK, MessageBoxImage.Information); } else { MessageBox.Show("Update fehlgeschlagen", "Fehler", MessageBoxButton.OK, MessageBoxImage.Error); } } catch (Exception e) { MessageBox.Show("Laden des Bildes fehlgeschlagen!\n" + e.Message, "Fehler", MessageBoxButton.OK, MessageBoxImage.Error); } } }
public RSAParameters ToRsaParamaters() { return(new RSAParameters { Modulus = Modulus.Reverse().ToArray(), P = P.Reverse().ToArray(), D = D.Reverse().ToArray(), Q = Q.Reverse().ToArray(), InverseQ = Iq.Reverse().ToArray(), Exponent = BitConverter.GetBytes(PubExp).Reverse().ToArray(), DQ = Dq.Reverse().ToArray(), DP = Dp.Reverse().ToArray() }); }
public void RunClsVarScenario() { TestLibrary.TestFramework.BeginScenario(nameof(RunClsVarScenario)); var result = Dp.DotProduct( _clsVar1, _clsVar2, _clsVar3 ); Unsafe.Write(_dataTable.outArrayPtr, result); ValidateResult(_clsVar1, _clsVar2, _clsVar3, _dataTable.outArrayPtr); }
public void RunBasicScenario_UnsafeRead() { TestLibrary.TestFramework.BeginScenario(nameof(RunBasicScenario_UnsafeRead)); var result = Dp.DotProduct( Unsafe.Read <Vector128 <UInt32> >(_dataTable.inArray1Ptr), Unsafe.Read <Vector128 <Byte> >(_dataTable.inArray2Ptr), Unsafe.Read <Vector128 <Byte> >(_dataTable.inArray3Ptr) ); Unsafe.Write(_dataTable.outArrayPtr, result); ValidateResult(_dataTable.inArray1Ptr, _dataTable.inArray2Ptr, _dataTable.inArray3Ptr, _dataTable.outArrayPtr); }
public void RunBasicScenario_Load() { TestLibrary.TestFramework.BeginScenario(nameof(RunBasicScenario_Load)); var result = Dp.DotProduct( AdvSimd.LoadVector128((UInt32 *)(_dataTable.inArray1Ptr)), AdvSimd.LoadVector128((Byte *)(_dataTable.inArray2Ptr)), AdvSimd.LoadVector128((Byte *)(_dataTable.inArray3Ptr)) ); Unsafe.Write(_dataTable.outArrayPtr, result); ValidateResult(_dataTable.inArray1Ptr, _dataTable.inArray2Ptr, _dataTable.inArray3Ptr, _dataTable.outArrayPtr); }
protected override void GetDataSource(out string DataSource, out string DataSourceOrder, List <FieldParam> Parameters) { BaseGL.RingkasanAkun.Update(new DateTime(_Tahun, 12, 31)); Parameters.Add(new FieldParam("0", _LevelCetak)); Parameters.Add(new FieldParam("1", _Tahun)); Parameters.Add(new FieldParam("2", enJenisAkun.Laba__Rugi)); DataSource = Dp.GetSqlSelect <ViewPosisiAkun>(string.Empty, "LevelAkun<=@0 AND Tahun=@1 AND JenisAkun<>@2 AND Aktif<>0"); DataSourceOrder = "UrutanCetak"; }
public void RunStructLclFldScenario_Load() { TestLibrary.TestFramework.BeginScenario(nameof(RunStructLclFldScenario_Load)); var test = TestStruct.Create(); var result = Dp.DotProduct( AdvSimd.LoadVector128((UInt32 *)(&test._fld1)), AdvSimd.LoadVector128((Byte *)(&test._fld2)), AdvSimd.LoadVector128((Byte *)(&test._fld3)) ); Unsafe.Write(_dataTable.outArrayPtr, result); ValidateResult(test._fld1, test._fld2, test._fld3, _dataTable.outArrayPtr); }
private void ApplyChanges() { if (Status.Equals(AllStatuses[3])) { if (MessageBox.Show("Wollen Sie den Auftrag wirklich ablehnen?", "Auftrag ablehnen?", MessageBoxButton.YesNo, MessageBoxImage.Question) == MessageBoxResult.No) { return; } } //OS.AddittionalCost = AddittionalCost; SelectedDetailed.AddittionalCost = AddittionalCost; SelectedDetailed.Finalprice = Finalprice; SelectedDetailed.IsAllInclusive = IsAllInclusive; //SelectedDetailed.IsConfirmed = IsConfirmed; //SelectedDetailed.IsFinished = IsFinished; SelectedDetailed.IsConfirmed = GetConfirmStatus(Status); SelectedDetailed.IsFinished = GetFinishedStatus(Status); SelectedDetailed.PreferedDate = PreferedDate; SelectedDetailed.ServiceProviderComment = ServiceProviderComment; if (IsConfirmed != null && IsConfirmed != "x" && PreferedDate < DateTime.Now) { msg.Send <GenericMessage <string> >(new GenericMessage <string>("past")); } else if (IsConfirmed != null && IsConfirmed != "x" && PreferedDate > DateTime.Now) { msg.Send <GenericMessage <string> >(new GenericMessage <string>("future")); } else { msg.Send <GenericMessage <string> >(new GenericMessage <string>("denied")); } if (Dp.UpdateOrderItemData(SelectedDetailed)) { MessageBox.Show("Update erfolgreich!", "Info", MessageBoxButton.OK, MessageBoxImage.Information); RaisePropertyChanged(nameof(PreferedDate)); //so that the PreferedDate in the DetailView gets actually updated once it's sent to the DB } else { MessageBox.Show("Update fehlgeschlagen", "Fehler", MessageBoxButton.OK, MessageBoxImage.Error); } }
protected override void GetDataSource(out string DataSource, out string DataSourceOrder, List <FieldParam> Parameters) { DataSource = string.Concat( @"SELECT NoAkun,NamaAkun,LevelAkun,UrutanCetak,Posting,", Dp.GetSqlCoalesce("Saldo", 0), @" as Saldo FROM (SELECT UrutanCetak, NoAkun,NamaAkun,LevelAkun,Posting,Aktif,(SELECT SUM(Debit-Kredit) FROM (", BaseGL.RingkasanAkun.SqlPosisiAkun(_TglNeraca, "1", Parameters), @") pp WHERE pp.IdAkun=qq.IdAkun OR pp.IdAkun LIKE qq.IdAkun +'.%') as Saldo FROM Akun qq WHERE LevelAkun<=@0 AND JenisAkun<>", Dp.FormatSqlValue(enJenisAkun.Laba__Rugi), ") zz WHERE Aktif<>0"); Parameters.Add(new FieldParam("0", _LevelCetak)); DataSourceOrder = "UrutanCetak"; }
public bool ChangePassword(string OldPassword, string NewPassword) { if (_CurrentRole.Length == 0) { return(false); } TableDef tdUser = MetaData.GetTableDef(typeof(User)); return(Dp.ExecuteNonQuery(@"UPDATE _System_User SET UserPassword=@0 WHERE UserName=@1 AND UserPassword=@2", new FieldParam("0", NewPassword), new FieldParam("1", _CurrentUser), new FieldParam("2", OldPassword)) > 0); }
public void RunStructFldScenario_Load(SimpleTernaryOpTest__DotProduct_Vector128_UInt32 testClass) { fixed(Vector128 <UInt32> *pFld1 = &_fld1) fixed(Vector128 <Byte> *pFld2 = &_fld2) fixed(Vector128 <Byte> *pFld3 = &_fld3) { var result = Dp.DotProduct( AdvSimd.LoadVector128((UInt32 *)(pFld1)), AdvSimd.LoadVector128((Byte *)(pFld2)), AdvSimd.LoadVector128((Byte *)(pFld3)) ); Unsafe.Write(testClass._dataTable.outArrayPtr, result); testClass.ValidateResult(_fld1, _fld2, _fld3, testClass._dataTable.outArrayPtr); } }