Example #1
0
 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); }
             }
         }
     }
 }
Example #2
0
 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); }
             }
         }
     }
 }
Example #3
0
        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);
                    }
                }
            }
        }
Example #4
0
        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); }
                }
            }
        }
Example #5
0
 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); }
         }
     }
 }
Example #6
0
 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); }
             }
         }
     }
 }
Example #7
0
 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); }
             }
         }
     }
 }
Example #8
0
        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());
            }
        }
Example #9
0
        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;
        }
Example #10
0
        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); }
            }
        }
Example #11
0
 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); }
     }
 }
Example #12
0
 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;
         }
     }
 }
Example #13
0
        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); }
                    }
                }
            }
        }
Example #14
0
 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); }
             }
         }
     }
 }