private void afterNovo() { using (TFInfracoes fInfracao = new TFInfracoes()) { if (fInfracao.ShowDialog() == DialogResult.OK) { if (fInfracao.rInfracoes != null) { //Buscar config abast CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg = CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar(fInfracao.rInfracoes.Cd_empresa, string.Empty, string.Empty, string.Empty, null); if (!string.IsNullOrEmpty(lCfg[0].Tp_duplicata)) { using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata()) { fDup.vCd_empresa = fInfracao.rInfracoes.Cd_empresa; fDup.vNm_empresa = fInfracao.rInfracoes.Nm_empresa; if (lCfg.Count > 0) { fDup.vTp_docto = lCfg[0].Tp_doctostr; fDup.vDs_tpdocto = lCfg[0].Ds_tpdocto; fDup.vTp_duplicata = lCfg[0].Tp_duplicata; fDup.vDs_tpduplicata = lCfg[0].Ds_tpduplicata; fDup.vTp_mov = "P"; fDup.vCd_historico = lCfg[0].Cd_historico; fDup.vDs_historico = lCfg[0].Ds_historico; fDup.vDt_emissao = fInfracao.rInfracoes.Dt_infracaostr; fDup.vVl_documento = fInfracao.rInfracoes.Vl_infracao; fDup.vNr_docto = fInfracao.rInfracoes.Cd_infracao; fDup.vSt_ecf = true; if (fDup.ShowDialog() == DialogResult.OK) { if (fDup.dsDuplicata.Count > 0) { fInfracao.rInfracoes.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata; } } } } } try { CamadaNegocio.Frota.Cadastros.TCN_Infracoes.Gravar(fInfracao.rInfracoes, null); MessageBox.Show("Infração gravada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); this.LimparRegistro(); id_infracao.Text = fInfracao.rInfracoes.Id_infracaostr; this.afterBusca(); } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } } } }
private void FaturarComissao() { using (TFFaturarComissao fFat = new TFFaturarComissao()) { if (fFat.ShowDialog() == DialogResult.OK) { if (fFat.lComissao != null) { try { //Chamar tela de duplicata para comissao using (Financeiro.TFLanDuplicata fDuplicata = new Financeiro.TFLanDuplicata()) { fDuplicata.vNr_pedido = null; fDuplicata.vCd_empresa = fFat.lComissao[0].Cd_empresa; fDuplicata.vNm_empresa = fFat.lComissao[0].Nm_empresa; fDuplicata.vCd_clifor = fFat.lComissao[0].Cd_vendedor; fDuplicata.vNm_clifor = fFat.lComissao[0].Nm_vendedor; fDuplicata.vCd_endereco = fFat.lComissao[0].Cd_endvendedor; fDuplicata.vTp_mov = "P"; fDuplicata.vVl_documento = fFat.lComissao.Sum(p => p.Vl_saldofaturar); fDuplicata.cd_empresa.Enabled = false; fDuplicata.bb_empresa.Enabled = false; fDuplicata.cd_clifor.Enabled = false; fDuplicata.bb_clifor.Enabled = false; fDuplicata.cd_endereco.Enabled = false; fDuplicata.bb_endereco.Enabled = false; fDuplicata.vl_documento_index.Enabled = false; if (fDuplicata.ShowDialog() == System.Windows.Forms.DialogResult.OK) { CamadaNegocio.Faturamento.Comissao.TCN_Fechamento_Comissao.ProcessarComissao(fFat.lComissao, fDuplicata.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata, null); MessageBox.Show("Comissões processadas com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); this.afterBusca(); } else { throw new Exception("Obrigatorio informar financeiro para processar comissões."); } } } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } } } }
private void BB_Gravar_Click(object sender, EventArgs e) { if (bsExecDespesa.Current != null) { using (Financeiro.TFLanDuplicata dp = new Financeiro.TFLanDuplicata()) { dp.vVl_documento = (bsExecDespesa.Current as TRegistro_ExecDespesas).vl_executado; dp.vCd_empresa = (bsExecDespesa.Current as TRegistro_ExecDespesas).Cd_empresa; //Buscar Moeda Padrao CamadaDados.Financeiro.Cadastros.TList_Moeda tabela = CamadaNegocio.ConfigGer.TCN_CadParamGer_X_Empresa.BuscarMoedaPadrao((bsExecDespesa.Current as TRegistro_ExecDespesas).Cd_empresa, null); if (tabela != null) { if (tabela.Count > 0) { dp.vCd_moeda = tabela[0].Cd_moeda; dp.vDs_moeda = tabela[0].Ds_moeda_singular; dp.vSigla_moeda = tabela[0].Sigla; dp.vCd_moeda_padrao = tabela[0].Cd_moeda; dp.vDs_moeda_padrao = tabela[0].Ds_moeda_singular; dp.vSigla_moeda_padrao = tabela[0].Sigla; } } dp.vDt_emissao = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy"); if (dp.ShowDialog() == DialogResult.OK) { CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata rDup = new CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata(); rDup = dp.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata; (bsExecDespesa.Current as TRegistro_ExecDespesas).rDuplicata = rDup; (bsExecDespesa.Current as TRegistro_ExecDespesas).nr_lancto = Convert.ToDecimal(dp.nr_lancto); (bsExecDespesa.Current as TRegistro_ExecDespesas).Id_orcamento = rdespesa.Id_orcamento; (bsExecDespesa.Current as TRegistro_ExecDespesas).Cd_empresa = rdespesa.Cd_empresa; (bsExecDespesa.Current as TRegistro_ExecDespesas).Nr_versao = rdespesa.Nr_versao; (bsExecDespesa.Current as TRegistro_ExecDespesas).id_despesa = Convert.ToDecimal(rdespesa.Id_despesa); TCN_ExecDespesas.Gravar(bsExecDespesa.Current as TRegistro_ExecDespesas, null); this.DialogResult = DialogResult.OK; MessageBox.Show("Duplicata gravada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); } } } }
private void bbBuscar_Click(object sender, EventArgs e) { if (bsDespesas.Current != null) { if (panelDados2.validarCampoObrigatorio()) { if (tp_pagamento.SelectedIndex.Equals(0) && string.IsNullOrWhiteSpace(cd_fornecedor.Text)) { MessageBox.Show("Obrigatório informar fornecedor para tipo de pagamento selecionado.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); cd_fornecedor.Focus(); return; } else if (tp_pagamento.SelectedIndex.Equals(1) && string.IsNullOrWhiteSpace(cd_funcionario.Text)) { MessageBox.Show("Obrigatório informar funcionário para tipo de pagamento selecionado.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); cd_funcionario.Focus(); return; } (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).Cd_empresa = vCd_Empresa; (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).Id_orcamentostr = vId_Orcamento; (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).Nr_versaostr = vNr_Versao; //Buscar config abast CamadaDados.Empreendimento.Cadastro.TList_CadCFGEmpreendimento lCfg = CamadaNegocio.Empreendimento.Cadastro.TCN_CadCFGEmpreendimento.Busca((bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).Cd_empresa, string.Empty, null); if (lCfg.Count > 0) { if (string.IsNullOrEmpty(lCfg[0].tp_dup)) { MessageBox.Show("Não existe Tp.duplicata na CFG.empreendimento cadastrada!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } else { MessageBox.Show("Não existe CFG.empreendimento cadastrado para a empresa informada!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } //Despesa de funcionário com abatimento de adiantamento if (tp_pagamento.SelectedIndex.Equals(1)) { //Buscar conf. adiantamento CamadaDados.Financeiro.Cadastros.TList_ConfigAdto lCnfAdto = CamadaNegocio.Financeiro.Cadastros.TCN_CadConfigAdto.Buscar(vCd_Empresa, string.Empty, string.Empty, string.Empty, string.Empty, 0, string.Empty, null); if (lCnfAdto.Count.Equals(0)) { MessageBox.Show("Não existe CFG.adiantamento cadastrado para a empresa informada!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata rDup = new CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata(); rDup.Cd_empresa = vCd_Empresa; rDup.Cd_clifor = cd_funcionario.Text; object lEndClifor = new CamadaDados.Financeiro.Cadastros.TCD_CadEndereco().BuscarEscalar(new Utils.TpBusca[] { new Utils.TpBusca() { vNM_Campo = "a.cd_clifor", vOperador = "=", vVL_Busca = "'" + rDup.Cd_clifor.Trim() + "'" } }, "a.cd_endereco"); if (!lEndClifor.Equals(null)) { rDup.Cd_endereco = lEndClifor.ToString().Trim(); } rDup.Tp_docto = 2; //Duplicata rDup.Tp_duplicata = "01"; rDup.Tp_mov = lCnfAdto[0].Tp_mov_ADTO_C; rDup.Cd_historico = rDup.Cd_historico_Dup = vCd_Historico = lCnfAdto[0].Cd_historico_ADTO_C; rDup.Cd_portador = lCnfAdto[0].CD_Portador; rDup.Dt_emissao = (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).Dt_execucao; rDup.Vl_documento = (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).vl_executado; rDup.Nr_docto = (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).Nr_docto; DataTable rCond = new CamadaDados.Financeiro.Cadastros.TCD_CadCondPgto().Buscar(null, 1); rDup.Cd_condpgto = rCond.Rows[0].ItemArray[0].ToString(); rDup.Cd_moeda = rCond.Rows[0].ItemArray[5].ToString(); rDup.Cd_juro = rCond.Rows[0].ItemArray[9].ToString(); rDup.Qt_parcelas = 0; DataTable cd_contager = new CamadaDados.Financeiro.Cadastros.TCD_CadContaGer().Buscar(null, 1); if (cd_contager != null) { rDup.Cd_contager = cd_contager.Rows[0].ItemArray[0].ToString(); } rDup.Parcelas.Add(new CamadaDados.Financeiro.Duplicata.TRegistro_LanParcela() { Vl_parcela = rDup.Vl_documento, Dt_vencto = rDup.Dt_emissao, Cd_parcela = 1 }); rDup.lCred.AddRange(CamadaNegocio.Financeiro.Adiantamento.TCN_LanAdiantamento.Buscar(string.Empty, rDup.Cd_empresa, rDup.Cd_clifor, string.Empty, "'C'", string.Empty, decimal.Zero, string.Empty, string.Empty, decimal.Zero, decimal.Zero, false, false, true, string.Empty, false, false, string.Empty, string.Empty, 0, string.Empty, null)); if (rDup.lCred.Count.Equals(0)) { MessageBox.Show("Funcionário não possui adiantamento quitado para efetuar o débito de saldo.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } //Validar saldo a devolver do funcionário rDup.lCred.ForEach(p => { if (rDup.Vl_documento <= p.Vl_total_devolver) { rDup.cVl_adiantamento = rDup.Vl_documento; } }); if (rDup.cVl_adiantamento.Equals(0)) { MessageBox.Show("Crédito do funcionário é menor do que o valor da despesa."); return; } (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).rDuplicata = rDup; } else { //Procedimento para despesa da empresa using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata()) { fDup.vCd_empresa = vCd_Empresa; fDup.vNm_empresa = vNm_empresa; fDup.vCd_clifor = tp_pagamento.SelectedIndex.Equals(1) ? cd_funcionario.Text : cd_fornecedor.Text; fDup.vNm_clifor = tp_pagamento.SelectedIndex.Equals(1) ? nm_funcionario.Text : nm_fornecedor.Text; //Buscar endereco CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(fDup.vCd_clifor, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 1, null); if (lEnd.Count > 0) { fDup.vCd_endereco = lEnd[0].Cd_endereco; fDup.vDs_endereco = lEnd[0].Ds_endereco; } if (lCfg.Count > 0) { if (string.IsNullOrEmpty(lCfg[0].tp_dup)) { MessageBox.Show("Não existe Tp.duplicata na CFG.empreendimento cadastrada!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } fDup.vTp_docto = lCfg[0].tp_docto; fDup.vDs_tpdocto = lCfg[0].ds_docto; fDup.vTp_duplicata = string.Empty; fDup.vDs_tpduplicata = string.Empty; fDup.vTp_mov = "P"; fDup.vDt_emissao = (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).Dt_execucaostr; fDup.vVl_documento = (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).vl_executado; fDup.vNr_docto = (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).Nr_docto; fDup.St_bloquearccusto = true; if (fDup.ShowDialog() == DialogResult.OK) { if (fDup.dsDuplicata.Count > 0) { (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).rDuplicata = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata; } vCd_Historico = fDup.vCd_historico; } } else { MessageBox.Show("Não existe configuração frota para lançar duplicata!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } } if (CamadaNegocio.ConfigGer.TCN_CadParamGer.BuscaVL_Bool("CRESULTADO_EMPRESA", vCd_Empresa, null).Trim().ToUpper().Equals("S")) { //Verificar se historico possui centro resultado cadastrado object obj = new CamadaDados.Financeiro.Cadastros.TCD_CadHistorico().BuscarEscalar( new Utils.TpBusca[] { new Utils.TpBusca() { vNM_Campo = "a.cd_historico", vOperador = "=", vVL_Busca = "'" + vCd_Historico.Trim() + "'" } }, "a.cd_centroresult"); if (obj == null ? false : !string.IsNullOrEmpty(obj.ToString())) { (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).lCCusto.Add( new CamadaDados.Financeiro.CCustoLan.TRegistro_LanCCustoLancto() { Cd_empresa = vCd_Empresa, Cd_centroresult = obj.ToString(), Vl_lancto = (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).vl_executado, Dt_lancto = (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).Dt_execucao, Tp_registro = "A" }); } else { using (Financeiro.TFRateioCResultado fRateio = new Financeiro.TFRateioCResultado()) { fRateio.vVl_Documento = (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).vl_executado; fRateio.Tp_mov = "P"; fRateio.Dt_movimento = (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).Dt_execucao; if (fRateio.ShowDialog() == DialogResult.OK) { (bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas).lCCusto = fRateio.lCResultado; } else { return; } } } } try { CamadaNegocio.Empreendimento.TCN_ExecDespesas.Gravar(bsDespesas.Current as CamadaDados.Empreendimento.TRegistro_ExecDespesas, null); MessageBox.Show("Despesa gravada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); this.DialogResult = DialogResult.OK; } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } } }
private void Processar() { if (bsAcerto.Current != null) { if ((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).St_registro.Trim().ToUpper().Equals("P")) { MessageBox.Show("Acerto ja se encontra PROCESSADO.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } if (MessageBox.Show("Confirma processamento do acerto?", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.Yes) { if ((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_sobradinheiro > decimal.Zero) { using (Financeiro.TFLanCaixa fCaixa = new Financeiro.TFLanCaixa()) { fCaixa.Text = "CAIXA SOBRA DINHEIRO"; fCaixa.dsLanCaixa.AddNew(); (fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Cd_Empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa; (fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Nm_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_empresa; //buscar cfg frota CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg = CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa, string.Empty, string.Empty, string.Empty, null); if (lCfg.Count > 0) { if (!string.IsNullOrEmpty(lCfg[0].Cd_contager)) { (fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Cd_ContaGer = lCfg[0].Cd_contager; (fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Ds_ContaGer = lCfg[0].Ds_contager; fCaixa.CD_ContaGer.Enabled = false; fCaixa.BB_ContaGer.Enabled = false; } } fCaixa.RB_Receber.Checked = true; fCaixa.RB_Pagar.Enabled = false; fCaixa.RB_Receber.Enabled = false; (fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Vl_RECEBER = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_sobradinheiro; fCaixa.VL_Receber.Enabled = false; if (fCaixa.ShowDialog() == DialogResult.OK) { if (fCaixa.dsLanCaixa.Current != null) { (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa = fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa; if (MessageBox.Show("Deseja gerar credito com a sobra de dinheiro?", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.Yes) { (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto = new CamadaDados.Financeiro.Adiantamento.TRegistro_LanAdiantamento(); (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa; (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_clifor = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_motorista; //endereco CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_clifor, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 1, null); if (lEnd.Count > 0) { (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.CD_Endereco = lEnd[0].Cd_endereco; } (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Tp_movimento = "C"; (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Dt_lancto = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa.Dt_lancto; (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Vl_adto = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa.Vl_RECEBER; (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.ST_ADTO = "A"; (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.TP_Lancto = "R"; (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_contager_qt = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa.Cd_ContaGer; } } else { MessageBox.Show("Obrigatorio informar caixa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } else { MessageBox.Show("Obrigatorio informar caixa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } } if ((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_resultado < decimal.Zero) { using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata()) { fDup.Text = "DUPLICATA A PAGAR PARA O MOTORISTA"; //Empresa fDup.vCd_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa; fDup.vNm_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_empresa; fDup.cd_empresa.Enabled = false; fDup.bb_empresa.Enabled = false; //Cliente fDup.vCd_clifor = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_motorista; fDup.vNm_clifor = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_motorista; fDup.cd_clifor.Enabled = false; fDup.bb_clifor.Enabled = false; //endereco CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(fDup.vCd_clifor, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 1, null); if (lEnd.Count > 0) { fDup.vCd_endereco = lEnd[0].Cd_endereco; fDup.vDs_endereco = lEnd[0].Ds_endereco; fDup.cd_endereco.Enabled = false; fDup.bb_endereco.Enabled = false; } fDup.vTp_mov = "P"; fDup.vVl_documento = Math.Abs((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_resultado); fDup.vl_documento_index.Enabled = false; fDup.vNr_docto = "AC" + (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Id_acertostr; fDup.vDt_emissao = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy"); if (fDup.ShowDialog() == DialogResult.OK) { if (fDup.dsDuplicata.Count > 0) { (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata; } } else { if (MessageBox.Show("Deseja Processar o Acerto sem gerar Financeiro!.", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.No) { return; } } } } (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).lCartaFrete.ForEach(p => { using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata()) { fDup.Text = "DUPLICATA CARTA FRETE Nº" + p.Nr_cartafretestr; //Empresa fDup.vCd_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa; fDup.vNm_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_empresa; fDup.cd_empresa.Enabled = false; fDup.bb_empresa.Enabled = false; fDup.vTp_mov = "P"; fDup.vVl_documento = p.Vl_documento; fDup.vl_documento_index.Enabled = false; fDup.vNr_docto = "CARTAFRETE" + p.Nr_cartafretestr; fDup.vDt_emissao = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy"); if (fDup.ShowDialog() == DialogResult.OK) { if (fDup.dsDuplicata.Count > 0) { p.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata; } } else { if (MessageBox.Show("Deseja Processar o Acerto sem gerar Financeiro!.", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.No) { return; } } } }); try { CamadaNegocio.Frota.TCN_AcertoMotorista.ProcessarAcerto(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista, null); MessageBox.Show("Acerto processado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); this.LimparFiltros(); id_acerto.Text = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Id_acertostr; cd_empresa.Text = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa; this.afterBusca(); } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } } }
private void afterNovo() { using (TFAbastAvulso fAbast = new TFAbastAvulso()) { if (fAbast.ShowDialog() == DialogResult.OK) { if (fAbast.rAbast != null) { if (fAbast.rAbast.Tp_abastecimento.Trim().ToUpper().Equals("T") && fAbast.rAbast.Tp_pagamento.Trim().ToUpper().Equals("E")) { //Buscar config abast CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg = CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar(fAbast.rAbast.Cd_empresa, string.Empty, string.Empty, string.Empty, null); if (!string.IsNullOrEmpty(lCfg[0].Tp_duplicata) && !string.IsNullOrEmpty(fAbast.vCd_clifor)) { using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata()) { fDup.vCd_empresa = fAbast.rAbast.Cd_empresa; fDup.vNm_empresa = fAbast.rAbast.Nm_empresa; fDup.vCd_clifor = fAbast.vCd_clifor; fDup.vNm_clifor = fAbast.rAbast.Nm_fornecedor; fDup.vCd_endereco = fAbast.vCd_endereco; fDup.vDs_endereco = fAbast.vDs_endereco; if (lCfg.Count > 0) { fDup.vTp_docto = lCfg[0].Tp_doctostr; fDup.vDs_tpdocto = lCfg[0].Ds_tpdocto; fDup.vTp_duplicata = lCfg[0].Tp_duplicata; fDup.vDs_tpduplicata = lCfg[0].Ds_tpduplicata; fDup.vTp_mov = "P"; fDup.vCd_historico = lCfg[0].Cd_historico; fDup.vDs_historico = lCfg[0].Ds_historico; fDup.vDt_emissao = fAbast.rAbast.Dt_abastecimentostr; fDup.vVl_documento = fAbast.rAbast.Vl_subtotal; fDup.vNr_docto = fAbast.rAbast.Nr_notafiscal; fDup.vSt_ecf = true; if (fDup.ShowDialog() == DialogResult.OK) { if (fDup.dsDuplicata.Count > 0) { fAbast.rAbast.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata; } } } } } } try { fAbast.rAbast.Tp_captura = "M"; fAbast.rAbast.Tp_registro = "A"; CamadaNegocio.Frota.TCN_AbastVeiculo.Gravar(fAbast.rAbast, null); MessageBox.Show("Abastecimento gravado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); LimparFiltros(); id_abastecimento.Text = fAbast.rAbast.Id_abastecimentostr; afterBusca(); } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } } } }
private void afterNovo() { using (TFOutrasReceitas fReceita = new TFOutrasReceitas()) { if (fReceita.ShowDialog() == DialogResult.OK) { if (fReceita.rReceita != null) { try { if (fReceita.vl_docto != decimal.Zero) { //Lançar Duplicata using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata()) { fDup.vSt_ctrc = true; fDup.vCd_empresa = fReceita.rReceita.Cd_empresa; fDup.vNm_empresa = fReceita.rReceita.Nm_empresa; fDup.vCd_clifor = fReceita.rReceita.Cd_clifor; fDup.vNm_clifor = fReceita.rReceita.Nm_clifor; //Buscar endereco clifor CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(fReceita.rReceita.Cd_clifor, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 1, null); if (lEnd.Count > 0) { fDup.vCd_endereco = lEnd[0].Cd_endereco; fDup.vDs_endereco = lEnd[0].Ds_endereco; } fDup.vTp_mov = "R"; //Buscar TP.Duplicata CamadaDados.Financeiro.Cadastros.TList_CadTpDuplicata lTpDup = new CamadaDados.Financeiro.Cadastros.TCD_CadTpDuplicata().Select( new Utils.TpBusca[] { new Utils.TpBusca() { vNM_Campo = "a.tp_mov", vOperador = "=", vVL_Busca = "'R'" } }, 1, string.Empty); fDup.vTp_duplicata = lTpDup.Count > 0 ? lTpDup[0].Tp_duplicata : string.Empty; fDup.vDs_tpduplicata = lTpDup.Count > 0 ? lTpDup[0].Ds_tpduplicata : string.Empty; fDup.vDt_emissao = fReceita.rReceita.Dt_receitastr; fDup.vVl_documento = fReceita.vl_docto; fDup.vNr_docto = "RECEITA" + fReceita.rReceita.Dt_receitastr; if (fDup.ShowDialog() == DialogResult.OK) { if (fDup.dsDuplicata.Count > 0) { fReceita.rReceita.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata; } else { MessageBox.Show("Obrigatório gravar Duplicata para lançar receita!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } else { MessageBox.Show("Obrigatório gravar Duplicata para lançar receita!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } } CamadaNegocio.Frota.TCN_OutrasReceitas.Gravar(fReceita.rReceita, null); MessageBox.Show("Receita gravada com sucesso!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); this.LimparCampos(); id_receita.Text = fReceita.rReceita.Id_receitastr; cd_empresa.Text = fReceita.rReceita.Cd_empresa; this.afterBusca(); } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } } } }
public override void afterGrava() { try { base.afterGrava(); if (validaGravaPsAvulsa()) { if ((ps_bruto.Value > 0) && (ps_tara.Value > 0) && (vl_taxa.Value > 0)) { //Buscar configuracao financeira CamadaDados.Balanca.Cadastros.TList_CFGFinPsAvulsa lCfg = CamadaNegocio.Balanca.Cadastros.TCN_CFGFinPsAvulsa.Buscar((bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Cd_empresa, (bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Tp_pesagem, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 0, string.Empty, null); if (lCfg.Count < 1) { MessageBox.Show("Não existe configuração para gerar financeiro para a pesagem avulsa.\r\n" + "Configuração obrigtoria para gerar financeiro da taxa. Ticket não será fechado.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } else { //Gerar financeiro da taxa using (Financeiro.TFLanDuplicata fDuplicata = new Financeiro.TFLanDuplicata()) { fDuplicata.vCd_empresa = lCfg[0].Cd_empresa; fDuplicata.vNm_empresa = lCfg[0].Nm_empresa; fDuplicata.vCd_clifor = (bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Cd_clifor.Trim() != string.Empty ? (bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Cd_clifor : lCfg[0].Cd_cliforpadrao; fDuplicata.vNm_clifor = (bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Cd_clifor.Trim() != string.Empty ? (bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Nm_clifor : lCfg[0].Nm_cliforpadrao; if ((bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Cd_clifor.Trim() != string.Empty) { //Buscar primeiro endereco do cadastro do cliente CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar((bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Cd_clifor, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 1, null); if (lEnd.Count > 0) { fDuplicata.vCd_endereco = lEnd[0].Cd_endereco; fDuplicata.vDs_endereco = lEnd[0].Ds_endereco; } } else { fDuplicata.vCd_endereco = lCfg[0].Cd_endpadrao; fDuplicata.vDs_endereco = lCfg[0].Ds_endpadrao; } fDuplicata.vTp_docto = lCfg[0].Tp_doctostr; fDuplicata.vDs_tpdocto = lCfg[0].Ds_tpdocto; fDuplicata.vTp_duplicata = lCfg[0].Tp_duplicata; fDuplicata.vDs_tpduplicata = lCfg[0].Ds_tpduplicata; fDuplicata.vTp_mov = lCfg[0].Tp_mov; fDuplicata.vCd_condpgto = lCfg[0].Cd_condpgto; fDuplicata.vDs_condpgto = lCfg[0].Ds_condpgto; fDuplicata.vCd_contagerliq = lCfg[0].Cd_contager; fDuplicata.vCd_juro = lCfg[0].Cd_juro; fDuplicata.vDs_juro = lCfg[0].Ds_juro; fDuplicata.vCd_moeda = lCfg[0].Cd_moeda; fDuplicata.vDs_moeda = lCfg[0].Ds_moeda; fDuplicata.vCd_portador = lCfg[0].Cd_portador; fDuplicata.vDs_portador = lCfg[0].Ds_portador; fDuplicata.vNr_docto = (bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Id_ticket.ToString(); fDuplicata.vDt_emissao = (bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Dt_brutostring; fDuplicata.vVl_documento = (bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Vl_taxa; fDuplicata.vDs_observacao = "TAXA COBRANCA PESAGEM AVULSA DO CLIENTE " + (bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Nm_clifor.Trim(); fDuplicata.vCd_historico = lCfg[0].Cd_historico; fDuplicata.vDs_historico = lCfg[0].Ds_historico; fDuplicata.vSt_ctrc = true; if (fDuplicata.ShowDialog() == DialogResult.OK) { if (fDuplicata.dsDuplicata.Current != null) { (bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).lDup.Add( (fDuplicata.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata)); } else { MessageBox.Show("Obrigatorio informar financeiro para fechar pesagem avulsa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } else { MessageBox.Show("Obrigatorio informar financeiro para fechar pesagem avulsa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } } } CamadaNegocio.Balanca.TCN_PesagemAvulsa.Gravar(bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa, null); bsPsAvulsa.ResetCurrentItem(); if ((ps_bruto.Value > 0) && (ps_tara.Value > 0)) { MessageBox.Show("Pesagem Finalizada com Sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); } else if (TpModo.Equals(TTpModo.tm_Insert)) { MessageBox.Show("Pesagem aberta com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); } else { MessageBox.Show("Pesagem alterada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); } bsPsAvulsa.ResetCurrentItem(); TpModo = TTpModo.tm_Standby; ativaPage((bsPsAvulsa.Current as CamadaDados.Balanca.TRegistro_PesagemAvulsa).Tp_modo); modoBotoes(); pTopEsquerdo.HabilitarControls(false, TpModo); pPsAvulsa.HabilitarControls(false, TpModo); if (tcCentral.TabPages.Contains(tpPesagem)) { tcCentral.SelectedTab = tpPesagem; } } } catch (Exception ex) { MessageBox.Show(ex.Message.Trim()); } }
private void afterGrava() { if (bsItens.Current == null) { MessageBox.Show("Obrigatório informar novo item para realizar troca.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } if (string.IsNullOrEmpty(edtMotivoTroca.Text)) { MessageBox.Show("Obrigatório informar motivo da troca.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); edtMotivoTroca.Focus(); return; } //Buscar local de armazenagem object obj = new CamadaDados.Estoque.Cadastros.TCD_CadLocalArm_X_Produto().BuscarEscalar( new TpBusca[] { new TpBusca { vNM_Campo = "a.cd_produto", vOperador = "=", vVL_Busca = "'" + (bsItens.Current as TRegistro_Orcamento_Item).Cd_produto.Trim() + "'" } }, "a.cd_local"); if (obj == null ? true : string.IsNullOrEmpty(obj.ToString())) { (bsItens.Current as TRegistro_Orcamento_Item).Cd_local = new CamadaDados.Faturamento.Cadastros.TCD_CFGOrcamento().BuscarEscalar( new TpBusca[] { new TpBusca { vNM_Campo = "a.cd_empresa", vOperador = "=", vVL_Busca = "'" + rOrc.Cd_empresa.Trim() + "'" } }, "a.cd_local")?.ToString(); } else { (bsItens.Current as TRegistro_Orcamento_Item).Cd_local = obj.ToString(); } if (rItemTroca.Vl_subtotalliq < (bsItens.Current as TRegistro_Orcamento_Item).Vl_subtotalliq) { using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata()) { fDup.vCd_empresa = rOrc.Cd_empresa; fDup.vNm_empresa = rOrc.Nm_empresa; fDup.vCd_clifor = rOrc.Cd_clifor; fDup.vNm_clifor = rOrc.Nm_clifor; fDup.vCd_endereco = rOrc.Cd_endereco; fDup.vDs_endereco = rOrc.Ds_endereco; fDup.vTp_mov = "R"; fDup.vNr_docto = rOrc.Nr_orcamentostr; fDup.vVl_documento = (bsItens.Current as TRegistro_Orcamento_Item).Vl_subtotalliq - rItemTroca.Vl_subtotalliq; fDup.cd_empresa.Enabled = false; fDup.bb_empresa.Enabled = false; fDup.cd_clifor.Enabled = false; fDup.bb_clifor.Enabled = false; fDup.cd_endereco.Enabled = false; fDup.bb_endereco.Enabled = false; fDup.vl_documento_index.Enabled = false; if (fDup.ShowDialog() == DialogResult.OK) { if (fDup.dsDuplicata.Current != null) { rDup = fDup.dsDuplicata.Current as TRegistro_LanDuplicata; } else { MessageBox.Show("Obrigatório gerar duplicata para saldo devedor.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } else { MessageBox.Show("Obrigatório gerar duplicata para saldo devedor.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } } if (!CamadaNegocio.Diversos.TCN_Usuario_RegraEspecial.ValidaRegra(Utils.Parametros.pubLogin, "PERMITIR TROCA ITEM PROPOSTA", null)) { using (Parametros.Diversos.TFRegraUsuario fRegra = new Parametros.Diversos.TFRegraUsuario()) { fRegra.Login = Utils.Parametros.pubLogin; fRegra.Ds_regraespecial = "PERMITIR TROCA ITEM PROPOSTA"; if (fRegra.ShowDialog() == DialogResult.Cancel) { MessageBox.Show("Obrigatório informar LOGIN com permissão para realizar troca", "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); return; } else { pLogin = fRegra.Login; } } } DialogResult = DialogResult.OK; }
private void btn_manutencao_Click(object sender, EventArgs e) { if (bsPneus.Current != null) { if ((bsPneus.Current as TRegistro_LanPneu).St_registro.ToUpper().Equals("M")) { MessageBox.Show("Pneu já se encontra em MANUTENÇÃO!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } else if ((bsPneus.Current as TRegistro_LanPneu).St_registro.ToUpper().Equals("R")) { int hodometro = 0; using (Componentes.TFQuantidade fQtde = new Componentes.TFQuantidade()) { fQtde.Ds_label = "Hodometro final"; TpBusca[] tpBuscas = new TpBusca[0]; Estruturas.CriarParametro(ref tpBuscas, "a.cd_empresa", (bsPneus.Current as TRegistro_LanPneu).Cd_empresa); Estruturas.CriarParametro(ref tpBuscas, "a.id_pneu", (bsPneus.Current as TRegistro_LanPneu).Id_pneustr); Estruturas.CriarParametro(ref tpBuscas, "a.id_veiculo", (bsPneus.Current as TRegistro_LanPneu).Id_veiculo); Estruturas.CriarParametro(ref tpBuscas, "a.id_rodado", (bsPneus.Current as TRegistro_LanPneu).Id_rodado); fQtde.Vl_default = Convert.ToDecimal(new CamadaDados.Frota.TCD_MovPneu().BuscarEscalar(tpBuscas, "a.hodometro", "id_mov desc").ToString()); fQtde.Vl_Minimo = fQtde.Vl_default; fQtde.Casas_decimais = 0; fQtde.St_permitirValorZero = false; if (fQtde.ShowDialog() == DialogResult.OK) { hodometro = Convert.ToInt32(fQtde.Quantidade); } else { MessageBox.Show("Obrigatório informar hodometro para desativação!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } TCN_LanPneu.EnvioAlmoxarifado(bsPneus.Current as TRegistro_LanPneu, hodometro, null); } try { using (TFDadosMovPneu fDadosMovPneu = new TFDadosMovPneu()) { if (fDadosMovPneu.ShowDialog() == DialogResult.OK) { if (fDadosMovPneu.rMovPneu != null) { try { TList_CfgFrota lCfg = TCN_CfgFrota.Buscar((bsPneus.Current as TRegistro_LanPneu).Cd_empresa, string.Empty, string.Empty, string.Empty, null); if (!string.IsNullOrEmpty(lCfg[0].Tp_duplicata)) { using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata()) { fDup.vCd_empresa = (bsPneus.Current as TRegistro_LanPneu).Cd_empresa; fDup.vNm_empresa = (bsPneus.Current as TRegistro_LanPneu).Nm_empresa; fDup.vCd_clifor = string.Empty; fDup.vNm_clifor = string.Empty; //Buscar endereco clifor oficina CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(fDup.vCd_clifor, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 1, null); if (lEnd.Count > 0) { fDup.vCd_endereco = lEnd[0].Cd_endereco; fDup.vDs_endereco = lEnd[0].Ds_endereco; } if (lCfg.Count > 0) { fDup.vTp_docto = lCfg[0].Tp_doctostr; fDup.vDs_tpdocto = lCfg[0].Ds_tpdocto; fDup.vTp_duplicata = lCfg[0].Tp_duplicata; fDup.vDs_tpduplicata = lCfg[0].Ds_tpduplicata; fDup.vTp_mov = "P"; fDup.vCd_historico = lCfg[0].Cd_historico; fDup.vDs_historico = lCfg[0].Ds_historico; fDup.vDt_emissao = fDadosMovPneu.rMovPneu.Dt_movimentostr; fDup.vVl_documento = fDadosMovPneu.rMovPneu.Valor_OS; fDup.vNr_docto = fDadosMovPneu.rMovPneu.Nr_OS; fDup.vSt_ecf = true; if (fDup.ShowDialog() == DialogResult.OK) { if (fDup.dsDuplicata.Count > 0) { fDadosMovPneu.rMovPneu.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata; } } else { MessageBox.Show("Obrigatório informar duplicata!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } } } fDadosMovPneu.rMovPneu.Cd_empresa = (bsPneus.Current as TRegistro_LanPneu).Cd_empresa; fDadosMovPneu.rMovPneu.Cd_produto = (bsPneus.Current as TRegistro_LanPneu).Cd_produto; fDadosMovPneu.rMovPneu.Id_pneu = (bsPneus.Current as TRegistro_LanPneu).Id_pneu; fDadosMovPneu.rMovPneu.St_rodando = "N"; CamadaNegocio.Frota.TCN_MovPneu.GravarManutencao(fDadosMovPneu.rMovPneu, (bsPneus.Current as TRegistro_LanPneu), null); MessageBox.Show("Pneu enviado para a manutenção!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); afterBusca(); } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } } } } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } }
private void afterGrava() { if (bsAbastComposto.Count > 0) { CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata rDup = null; if ((bsAbastComposto.List as IEnumerable <CamadaDados.Frota.TRegistro_AbastVeiculo>).ToList().Exists(x => x.Tp_pagamento.Trim().ToUpper().Equals("E"))) { using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata()) { fDup.vCd_empresa = (bsAbastComposto.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).Cd_empresa; fDup.vNm_empresa = (bsAbastComposto.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).Nm_empresa; fDup.vCd_clifor = (bsAbastComposto.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).Cd_fornecedor; fDup.vNm_clifor = (bsAbastComposto.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).Nm_fornecedor; //Buscar config abast CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg = CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar((bsAbastComposto.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).Cd_empresa, string.Empty, string.Empty, string.Empty, null); if (lCfg.Count > 0) { if (string.IsNullOrEmpty(lCfg[0].Tp_duplicata)) { MessageBox.Show("Não existe Tp.duplicata na CFG.Frota cadastrada!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } fDup.vTp_docto = lCfg[0].Tp_doctostr; fDup.vDs_tpdocto = lCfg[0].Ds_tpdocto; fDup.vTp_duplicata = lCfg[0].Tp_duplicata; fDup.vDs_tpduplicata = lCfg[0].Ds_tpduplicata; fDup.vTp_mov = "P"; fDup.vCd_historico = lCfg[0].Cd_historico; fDup.vDs_historico = lCfg[0].Ds_historico; fDup.vDt_emissao = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy"); fDup.vVl_documento = (bsAbastComposto.List as IEnumerable <CamadaDados.Frota.TRegistro_AbastVeiculo>).ToList().Where(x => x.Tp_pagamento.Trim().ToUpper().Equals("E")).Sum(x => x.Vl_subtotal); fDup.vNr_docto = "AGPABAST"; fDup.vSt_ecf = true; fDup.St_bloquearccusto = true; //Centro Resultado sera lancado pelo modulo frota fDup.St_editardataemissao = true; if (fDup.ShowDialog() == DialogResult.OK) { if (fDup.dsDuplicata.Count > 0) { rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata; rDup.Vl_documento_padrao = (bsAbastComposto.List as IEnumerable <CamadaDados.Frota.TRegistro_AbastVeiculo>).ToList().Where(x => x.Tp_pagamento.Trim().ToUpper().Equals("E")).Sum(x => x.Vl_subtotal); rDup.Parcelas[0].Vl_parcela_padrao = rDup.Parcelas[0].Vl_parcela; } } } else { MessageBox.Show("Não existe configuração frota para lançar duplicata!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } } try { CamadaNegocio.Frota.TCN_AbastVeiculo.Gravar((bsAbastComposto.List as IEnumerable <CamadaDados.Frota.TRegistro_AbastVeiculo>).ToList(), rDup, null); MessageBox.Show("Abastecimentos gravados com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); bb_novo_abastecimento.Enabled = true; bb_alterar_abastecimento.Enabled = true; bb_gravar_abastecimento.Enabled = false; bb_excluir_abastecimento.Enabled = true; bsAbastComposto.Clear(); pAbastecimento.HabilitarControls(false, Utils.TTpModo.tm_Standby); pAbastecimento.LimparRegistro(); } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } }
private void GerarDup() { if (bsLocTerceiro.Current != null) { if ((bsLocTerceiro.Current as TRegistro_LocTerceiro).St_permutabool) { MessageBox.Show("Não é possível gerar financeiro de contrato que possui permuta!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } if (!(bsLocTerceiro.Current as TRegistro_LocTerceiro).St_registro.Trim().ToUpper().Equals("C")) { using (Financeiro.TFLanDuplicata fDuplicata = new Financeiro.TFLanDuplicata()) { fDuplicata.vCd_empresa = (bsLocTerceiro.Current as TRegistro_LocTerceiro).Cd_empresa; fDuplicata.vNm_empresa = (bsLocTerceiro.Current as TRegistro_LocTerceiro).Nm_empresa; fDuplicata.vCd_clifor = (bsLocTerceiro.Current as TRegistro_LocTerceiro).Cd_fornecedor; fDuplicata.vNm_clifor = (bsLocTerceiro.Current as TRegistro_LocTerceiro).Nm_fornecedor; fDuplicata.vCd_endereco = (bsLocTerceiro.Current as TRegistro_LocTerceiro).Cd_endereco; fDuplicata.vDs_endereco = (bsLocTerceiro.Current as TRegistro_LocTerceiro).Ds_endereco; //Buscar Moeda Padrao TList_Moeda tabela = CamadaNegocio.ConfigGer.TCN_CadParamGer_X_Empresa.BuscarMoedaPadrao((bsLocTerceiro.Current as TRegistro_LocTerceiro).Cd_empresa, null); if (tabela != null) { if (tabela.Count > 0) { fDuplicata.vCd_moeda = tabela[0].Cd_moeda; fDuplicata.vDs_moeda = tabela[0].Cd_moeda; } } fDuplicata.vTp_mov = "P"; fDuplicata.vVl_documento = (bsLocTerceiro.Current as TRegistro_LocTerceiro).Vl_contrato; fDuplicata.vDt_emissao = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy"); fDuplicata.vSt_finPed = true; if (fDuplicata.ShowDialog() == DialogResult.OK) { try { (bsLocTerceiro.Current as TRegistro_LocTerceiro).lDup.Add( fDuplicata.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata); CamadaNegocio.Locacao.TCN_LocTerceiro.GravaDuplicata(bsLocTerceiro.Current as TRegistro_LocTerceiro, null); afterBusca(); } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } else { MessageBox.Show("Obrigatorio informar Financeiro para Gerar Duplicata!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } } else { MessageBox.Show("Não é possivel Gerar Duplicata em Pedido Cancelado!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } }
private void afterNovo() { using (TFManutencao fManut = new TFManutencao()) { if (fManut.ShowDialog() == DialogResult.OK) { if (fManut.rManutencao != null) { if (!fManut.st_consumointerno && !string.IsNullOrEmpty(fManut.rManutencao.Cd_cliforOficina)) { //Buscar config abast CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg = CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar(fManut.rManutencao.Cd_empresa, string.Empty, string.Empty, string.Empty, null); if (!string.IsNullOrEmpty(lCfg[0].Tp_duplicata)) { using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata()) { fDup.vCd_empresa = fManut.rManutencao.Cd_empresa; fDup.vNm_empresa = fManut.rManutencao.Nm_empresa; fDup.vCd_clifor = fManut.rManutencao.Cd_cliforOficina; fDup.vNm_clifor = fManut.rManutencao.Nm_cliforOficina; //Buscar endereco clifor oficina CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(fManut.rManutencao.Cd_cliforOficina, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 1, null); if (lEnd.Count > 0) { fDup.vCd_endereco = lEnd[0].Cd_endereco; fDup.vDs_endereco = lEnd[0].Ds_endereco; } if (lCfg.Count > 0) { fDup.vTp_docto = lCfg[0].Tp_doctostr; fDup.vDs_tpdocto = lCfg[0].Ds_tpdocto; fDup.vTp_duplicata = lCfg[0].Tp_duplicata; fDup.vDs_tpduplicata = lCfg[0].Ds_tpduplicata; fDup.vTp_mov = "P"; fDup.vCd_historico = lCfg[0].Cd_historico; fDup.vDs_historico = lCfg[0].Ds_historico; fDup.vDt_emissao = fManut.rManutencao.Dt_realizadastr; fDup.vVl_documento = fManut.rManutencao.Vl_realizada; fDup.vNr_docto = fManut.rManutencao.Nr_notafiscal; fDup.vSt_ecf = true; if (fDup.ShowDialog() == DialogResult.OK) { if (fDup.dsDuplicata.Count > 0) { fManut.rManutencao.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata; } } } } } } try { CamadaNegocio.Frota.Cadastros.TCN_ManutencaoVeiculo.Gravar(fManut.rManutencao, null); MessageBox.Show("Manutenção gravada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); this.LimparFiltros(); id_manutencao.Text = fManut.rManutencao.Id_manutencaostr; id_veiculo.Text = fManut.rManutencao.Id_veiculostr; this.afterBusca(); } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } } } }
private void afterNovoC() { using (TFDespComposta fDesp = new TFDespComposta()) { if (fDesp.ShowDialog() == DialogResult.OK) { if (fDesp.lManutencao != null) { CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata rDup = null; //Buscar config abast CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg = CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar(fDesp.lManutencao[0].Cd_empresa, string.Empty, string.Empty, string.Empty, null); using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata()) { fDup.vCd_empresa = fDesp.lManutencao[0].Cd_empresa; fDup.vNm_empresa = fDesp.lManutencao[0].Nm_empresa; fDup.vCd_clifor = fDesp.lManutencao[0].Cd_cliforOficina; fDup.vNm_clifor = fDesp.lManutencao[0].Nm_cliforOficina; //Buscar endereco clifor oficina CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(fDesp.lManutencao[0].Cd_cliforOficina, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 1, null); if (lEnd.Count > 0) { fDup.vCd_endereco = lEnd[0].Cd_endereco; fDup.vDs_endereco = lEnd[0].Ds_endereco; } if (lCfg.Count > 0) { if (string.IsNullOrEmpty(lCfg[0].Tp_duplicata)) { MessageBox.Show("Não existe Tp.duplicata na CFG.Frota cadastrada!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } fDup.vTp_docto = lCfg[0].Tp_doctostr; fDup.vDs_tpdocto = lCfg[0].Ds_tpdocto; fDup.vTp_duplicata = lCfg[0].Tp_duplicata; fDup.vDs_tpduplicata = lCfg[0].Ds_tpduplicata; fDup.vTp_mov = "P"; fDup.vCd_historico = lCfg[0].Cd_historico; fDup.vDs_historico = lCfg[0].Ds_historico; fDup.vDt_emissao = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy"); fDup.vVl_documento = (fDesp.lManutencao as IEnumerable <CamadaDados.Frota.Cadastros.TRegistro_ManutencaoVeiculo>) .ToList().Sum(x => x.Vl_realizada); fDup.vNr_docto = "AGPDESP"; //agrupamento despesas fDup.vSt_ecf = true; fDup.St_bloquearccusto = true; //Centro Resultado sera lancado pelo modulo frota if (fDup.ShowDialog() == DialogResult.OK) { if (fDup.dsDuplicata.Count > 0) { rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata; rDup.Vl_documento_padrao = (fDesp.lManutencao as IEnumerable <CamadaDados.Frota.Cadastros.TRegistro_ManutencaoVeiculo>) .ToList().Sum(x => x.Vl_realizada); rDup.Parcelas[0].Vl_parcela_padrao = rDup.Parcelas[0].Vl_parcela; } } else { return; } } else { MessageBox.Show("Não existe configuração frota para lançar duplicata!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } } try { CamadaNegocio.Frota.Cadastros.TCN_ManutencaoVeiculo.Gravar(fDesp.lManutencao, rDup, null); MessageBox.Show("Manutenção gravada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); this.LimparFiltros(); id_manutencao.Text = fDesp.lManutencao[0].Id_manutencaostr; id_veiculo.Text = fDesp.lManutencao[0].Id_veiculostr; this.afterBusca(); } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } } } }