Esempio n. 1
0
        private void Busca_Endereco_Transportadora(string CD_Transportadora)
        {
            if (CD_Transportadora != "")
            {
                CamadaDados.Financeiro.Cadastros.TList_CadEndereco List_Endereco =
                    CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(CD_Transportadora,
                                                                              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,
                                                                              0,
                                                                              null);

                if (List_Endereco.Count == 1)
                {
                    if (string.IsNullOrEmpty(DS_Endereco_Transp.Text))
                    {
                        DS_Endereco_Transp.Text = List_Endereco[0].Ds_endereco.Trim();
                    }
                }
            }
        }
Esempio n. 2
0
 private void BuscarEndereco()
 {
     if (!string.IsNullOrEmpty(cd_clifor.Text))
     {
         CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
             CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(cd_clifor.Text,
                                                                       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)
         {
             cd_endereco.Text = lEnd[0].Cd_endereco;
             ds_endereco.Text = lEnd[0].Ds_endereco;
         }
     }
 }
Esempio n. 3
0
 private void BuscarEndereco()
 {
     if (!string.IsNullOrEmpty(CD_Clifor.Text))
     {
         CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
             CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(CD_Clifor.Text,
                                                                       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)
         {
             CD_Endereco.Text = lEnd[0].Cd_endereco;
             DS_Endereco.Text = lEnd[0].Ds_endereco;
             DS_Cidade.Text   = lEnd[0].DS_Cidade;
             UF.Text          = lEnd[0].UF;
         }
     }
 }
Esempio n. 4
0
        private void Busca_Endereco_Clifor()
        {
            if (!string.IsNullOrEmpty(cd_clifor.Text))
            {
                CamadaDados.Financeiro.Cadastros.TList_CadEndereco List_Endereco =
                    CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(cd_clifor.Text,
                                                                              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,
                                                                              0,
                                                                              null);

                if (List_Endereco.Count == 1)
                {
                    if (string.IsNullOrEmpty(cd_endereco.Text))
                    {
                        cd_endereco.Text = List_Endereco[0].Cd_endereco.Trim();
                        ds_endereco.Text = List_Endereco[0].Ds_endereco.Trim();
                    }
                }
            }
        }
Esempio n. 5
0
 private void BuscarEndTransp()
 {
     if (cd_transportadora.Text.Trim() != string.Empty)
     {
         CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
             CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(cd_transportadora.Text,
                                                                       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,
                                                                       string.Empty,
                                                                       1,
                                                                       null);
         if (lEnd.Count > 0)
         {
             cd_endtransp.Text = lEnd[0].Cd_endereco;
             ds_endtransp.Text = lEnd[0].Ds_endereco;
         }
     }
 }
Esempio n. 6
0
 private void BuscarEndClifor()
 {
     if (CD_Clifor.Text.Trim() != string.Empty)
     {
         CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
             CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(CD_Clifor.Text,
                                                                       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,
                                                                       string.Empty,
                                                                       1,
                                                                       null);
         if (lEnd.Count > 0)
         {
             CD_Endereco.Text = lEnd[0].Cd_endereco;
             DS_Endereco.Text = lEnd[0].Ds_endereco;
         }
     }
 }
Esempio n. 7
0
 private void CD_Clifor_Leave(object sender, EventArgs e)
 {
     FormBusca.UtilPesquisa.EDIT_LeaveClifor("a.cd_clifor|=|'" + CD_Clifor.Text.Trim() + "'",
                                             new Componentes.EditDefault[] { CD_Clifor, NM_Clifor }, new CamadaDados.Financeiro.Cadastros.TCD_CadClifor());
     if (!string.IsNullOrEmpty(CD_Clifor.Text))
     {
         CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
             CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(CD_Clifor.Text,
                                                                       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)
         {
             cd_endereco.Text = lEnd[0].Cd_endereco;
             ds_endereco.Text = lEnd[0].Ds_endereco;
             fone_clifor.Text = lEnd[0].Fone;
         }
         //Buscar Historico Cliente
         bsServico.DataSource = new CamadaDados.Servicos.TCD_LanServicosPecas().Select(
             new TpBusca[]
         {
             new TpBusca()
             {
                 vNM_Campo = "a.cd_empresa",
                 vOperador = "=",
                 vVL_Busca = "'" + this.pCd_empresa.Trim() + "'"
             },
             new TpBusca()
             {
                 vNM_Campo = "os.cd_clifor",
                 vOperador = "=",
                 vVL_Busca = "'" + CD_Clifor.Text.Trim() + "'"
             }
         }, 0, string.Empty, "os.dt_abertura desc");
         bsServico_PositionChanged(this, new EventArgs());
     }
 }
Esempio n. 8
0
        private void Busca_Endereco_Clifor()
        {
            if (rPedido.CD_Clifor != "")
            {
                CamadaDados.Financeiro.Cadastros.TList_CadEndereco List_Endereco =
                    CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(rPedido.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,
                                                                              0,
                                                                              null);

                if (List_Endereco.Count > 0)
                {
                    if (List_Endereco.Exists(p => p.St_enderecoentregabool))
                    {
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Logradouroent  = List_Endereco.Find(p => p.St_enderecoentregabool).Ds_endereco;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Numeroent      = List_Endereco.Find(p => p.St_enderecoentregabool).Numero;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Complementoent = List_Endereco.Find(p => p.St_enderecoentregabool).Ds_complemento;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Bairroent      = List_Endereco.Find(p => p.St_enderecoentregabool).Bairro;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Cd_cidadeent   = List_Endereco.Find(p => p.St_enderecoentregabool).Cd_cidade;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Ds_cidadeent   = List_Endereco.Find(p => p.St_enderecoentregabool).DS_Cidade;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Uf_ent         = List_Endereco.Find(p => p.St_enderecoentregabool).UF;
                    }
                    else if (List_Endereco.Count == 1)
                    {
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Logradouroent  = List_Endereco[0].Ds_endereco;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Numeroent      = List_Endereco[0].Numero;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Complementoent = List_Endereco[0].Ds_complemento;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Bairroent      = List_Endereco[0].Bairro;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Cd_cidadeent   = List_Endereco[0].Cd_cidade;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Ds_cidadeent   = List_Endereco[0].DS_Cidade;
                        (bsOrdem.Current as CamadaDados.Faturamento.Pedido.TRegistro_OrdemCarregamento).Uf_ent         = List_Endereco[0].UF;
                    }
                }
            }
        }
Esempio n. 9
0
 private void BuscarEndEntrega()
 {
     //Busca Endereço
     CamadaDados.Financeiro.Cadastros.TList_CadEndereco List_Endereco =
         CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(rPrevenda != null ? rPrevenda.Cd_clifor : rPedido != null ? rPedido.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,
                                                                   string.Empty,
                                                                   0,
                                                                   null);
     if (List_Endereco.Count > 0)
     {
         if (List_Endereco.Count == 1)
         {
             ds_endereco.Text = List_Endereco[0].Ds_endereco.Trim();
             Numero.Text      = List_Endereco[0].Numero.Trim();
             Bairro.Text      = List_Endereco[0].Bairro.Trim();
             Referencia.Text  = List_Endereco[0].Proximo.Trim();
             cidade.Text      = List_Endereco[0].DS_Cidade.Trim();
             uf.Text          = List_Endereco[0].UF.Trim();
             Fone.Text        = List_Endereco[0].Fone.Trim();
         }
         else if (List_Endereco.Exists(p => p.St_enderecoentregabool))
         {
             ds_endereco.Text = List_Endereco.Find(p => p.St_enderecoentregabool).Ds_endereco.Trim();
             Numero.Text      = List_Endereco.Find(p => p.St_enderecoentregabool).Numero.Trim();
             Bairro.Text      = List_Endereco.Find(p => p.St_enderecoentregabool).Bairro.Trim();
             Referencia.Text  = List_Endereco.Find(p => p.St_enderecoentregabool).Proximo.Trim();
             cidade.Text      = List_Endereco.Find(p => p.St_enderecoentregabool).DS_Cidade.Trim();
             uf.Text          = List_Endereco.Find(p => p.St_enderecoentregabool).UF.Trim();
             Fone.Text        = List_Endereco.Find(p => p.St_enderecoentregabool).Fone.Trim();
         }
     }
 }
Esempio n. 10
0
        private void abrirmapa()
        {
            CamadaDados.Restaurante.Cadastro.TList_CFG lcfg = new CamadaDados.Restaurante.Cadastro.TList_CFG();
            lcfg = CamadaNegocio.Restaurante.Cadastro.TCN_CFG.Buscar(string.Empty, null);
            CamadaDados.Financeiro.Cadastros.TList_CadEndereco end = new CamadaDados.Financeiro.Cadastros.TList_CadEndereco();
            end = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(lcfg[0].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);

            CamadaDados.Financeiro.Cadastros.TList_CadEndereco endclif = new CamadaDados.Financeiro.Cadastros.TList_CadEndereco();
            endclif = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar((bsPreVenda.Current as TRegistro_PreVenda).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);

            using (Proc_Commoditties.FLocalizacaoGoogleMaps proc = new Proc_Commoditties.FLocalizacaoGoogleMaps())
            {
                proc.pOrigem = end[0].DS_Cidade + " " + end[0].Ds_endereco + " " + end[0].Numero
                               + " " + end[0].Cep;
                proc.pDestino = endclif[0].DS_Cidade + " " + endclif[0].Ds_endereco + " " + endclif[0].Numero
                                + " " + endclif[0].Cep;

                if (proc.ShowDialog() == DialogResult.OK)
                {
                }
            }
        }
Esempio n. 11
0
        private void Busca_Endereco_Clifor()
        {
            if (Cd_cliforent.Text != "")
            {
                CamadaDados.Financeiro.Cadastros.TList_CadEndereco List_Endereco =
                    CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(Cd_cliforent.Text,
                                                                              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,
                                                                              0,
                                                                              null);

                if (List_Endereco.Count > 0)
                {
                    Cd_enderecoent.Text = List_Endereco[0].Cd_endereco.Trim();
                    logradouroent.Text  = List_Endereco[0].Ds_endereco.Trim();
                    numeroent.Text      = List_Endereco[0].Numero;
                    complementoent.Text = List_Endereco[0].Ds_complemento;
                    bairroent.Text      = List_Endereco[0].Bairro;
                    cd_cidadent.Text    = List_Endereco[0].Cd_cidade;
                    ds_cidadeent.Text   = List_Endereco[0].DS_Cidade.Trim();
                    uf_ent.Text         = List_Endereco[0].UF.Trim();
                    Cd_ufent.Text       = List_Endereco[0].Cd_uf;
                }
            }
        }
Esempio n. 12
0
        private void InformarValor(string portador)
        {
            if (lPortador.Count > 0)
            {
                if (Math.Round(pVl_receber, 2) > Math.Round(lPortador.Sum(p => p.Vl_pagtoPDV), 2))
                {
                    if (portador.ToUpper().Trim().Equals("CH"))//Cheque
                    {
                        using (Financeiro.TFLanListaCheques fListaCheques = new Financeiro.TFLanListaCheques())
                        {
                            fListaCheques.Tp_mov     = "R";
                            fListaCheques.Cd_empresa = pCd_empresa;
                            fListaCheques.St_pdv     = true;
                            //Buscar Config PDV Empresa
                            CamadaDados.Faturamento.Cadastros.TList_CFGCupomFiscal lCfg =
                                CamadaNegocio.Faturamento.Cadastros.TCN_CFGCupomFiscal.Buscar(pCd_empresa, null);
                            if (lCfg.Count > 0)
                            {
                                fListaCheques.Cd_contager = lCfg[0].Cd_contaoperacional;
                                fListaCheques.Ds_contager = lCfg[0].Ds_contaoperacional;
                            }
                            fListaCheques.Cd_clifor        = pCd_clifor;
                            fListaCheques.Cd_historico     = rCfg.Cd_historicocaixa;
                            fListaCheques.Ds_historico     = rCfg.Ds_historicocaixa;
                            fListaCheques.Cd_portador      = lPortador.Find(p => p.St_controletitulobool).Cd_portador;
                            fListaCheques.Ds_portador      = lPortador.Find(p => p.St_controletitulobool).Ds_portador;
                            fListaCheques.Nm_clifor        = pNm_clifor;
                            fListaCheques.Dt_emissao       = CamadaDados.UtilData.Data_Servidor();
                            fListaCheques.Vl_totaltitulo   = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
                            fListaCheques.St_bloquearTroco = St_ReprocessaFin;
                            if (fListaCheques.ShowDialog() == DialogResult.OK)
                            {
                                lPortador.Find(p => p.St_controletitulobool).lCheque      = fListaCheques.lCheques;
                                lPortador.Find(p => p.St_controletitulobool).Vl_pagtoPDV +=
                                    fListaCheques.lCheques.Sum(p => p.Vl_titulo);
                                CalcularTroco(portador);
                                ConfirmarFin();
                            }
                            else
                            {
                                MessageBox.Show("Cheque não foi lançado... Liquidação não será efetivada! ");
                                return;
                            }
                        }
                    }
                    else if (portador.ToUpper().Trim().Equals("CC"))//Cartao Credito
                    {
                        //Buscar dados fatura cartao credito
                        using (TFLanCartaoPDV fCartao = new TFLanCartaoPDV())
                        {
                            fCartao.pCd_empresa      = pCd_empresa;
                            fCartao.D_C              = "C";
                            fCartao.Vl_saldofaturar  = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
                            fCartao.St_bloquearTroco = St_ReprocessaFin;
                            if (fCartao.ShowDialog() == DialogResult.OK)
                            {
                                fCartao.lFatura.ForEach(p => lPortador.Find(x => x.St_cartaocreditobool).lFatura.Add(p));
                                lPortador.Find(p => p.St_cartaocreditobool).Vl_pagtoPDV += fCartao.lFatura.Sum(p => p.Vl_fatura);
                                CalcularTroco(portador);
                                ConfirmarFin();
                            }
                        }
                    }
                    else if (portador.ToUpper().Trim().Equals("CD"))//Cartao Debito
                    {
                        //Buscar dados fatura cartao credito
                        using (TFLanCartaoPDV fCartao = new TFLanCartaoPDV())
                        {
                            fCartao.pCd_empresa      = pCd_empresa;
                            fCartao.D_C              = "D";
                            fCartao.Vl_saldofaturar  = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
                            fCartao.St_bloquearTroco = St_ReprocessaFin;
                            if (fCartao.ShowDialog() == DialogResult.OK)
                            {
                                fCartao.lFatura.ForEach(p => lPortador.Find(x => x.St_cartaocreditobool).lFatura.Add(p));
                                lPortador.Find(p => p.St_cartaocreditobool).Vl_pagtoPDV += fCartao.lFatura.Sum(p => p.Vl_fatura);
                                CalcularTroco(portador);
                                ConfirmarFin();
                            }
                        }
                    }
                    else if (portador.ToUpper().Trim().Equals("DU"))//Duplicata
                    {
                        //Buscar portador duplicata
                        CamadaDados.Financeiro.Cadastros.TList_CadPortador lDup =
                            new CamadaDados.Financeiro.Cadastros.TCD_CadPortador().Select(
                                new Utils.TpBusca[]
                        {
                            new Utils.TpBusca()
                            {
                                vNM_Campo = "isnull(a.tp_portadorPDV, '')",
                                vOperador = "=",
                                vVL_Busca = "'P'"
                            }
                        }, 1, string.Empty, string.Empty);
                        if (lDup.Count.Equals(0))
                        {
                            MessageBox.Show("Não existe portador duplicata configurado no sistema.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                            return;
                        }
                        if (string.IsNullOrEmpty(pCd_clifor))
                        {
                            MessageBox.Show("Não é permitido venda a prazo sem identificar cliente.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                            return;
                        }
                        //Abrir tela Duplicata
                        if (pCd_clifor == rCfg.Cd_clifor)
                        {
                            Componentes.EditDefault CD_Clifor = new Componentes.EditDefault();
                            CD_Clifor.NM_Campo      = "CD_Clifor";
                            CD_Clifor.NM_CampoBusca = "CD_Clifor";
                            DataRowView linha = FormBusca.UtilPesquisa.BTN_BuscaClifor(new Componentes.EditDefault[] { CD_Clifor }, string.Empty);
                            if (linha != null)
                            {
                                pCd_clifor = linha["cd_clifor"].ToString();
                                pNm_clifor = linha["Nm_clifor"].ToString();
                            }
                            else
                            {
                                MessageBox.Show("Obrigatório informar cliente para gerar duplicata!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                                return;
                            }
                        }
                        //Verificar credito
                        CamadaDados.Financeiro.Duplicata.TRegistro_DadosBloqueio rDados =
                            new CamadaDados.Financeiro.Duplicata.TRegistro_DadosBloqueio();
                        if (CamadaNegocio.Financeiro.Duplicata.TCN_DadosBloqueio.VerificarBloqueioCredito(pCd_clifor,
                                                                                                          pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV),
                                                                                                          true,
                                                                                                          ref rDados,
                                                                                                          null))
                        {
                            using (Financeiro.TFLan_BloqueioCredito fBloq = new Financeiro.TFLan_BloqueioCredito())
                            {
                                fBloq.rDados    = rDados;
                                fBloq.Vl_fatura = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
                                fBloq.ShowDialog();
                                if (!fBloq.St_desbloqueado)
                                {
                                    MessageBox.Show("Não é permitido realizar venda para cliente com restrição crédito.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                                    return;
                                }
                            }
                        }
                        //Abrir tela Duplicata
                        CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata rDup = new CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata();
                        rDup.Cd_empresa = pCd_empresa;
                        rDup.Nm_empresa = pNm_empresa;
                        rDup.Cd_clifor  = pCd_clifor;
                        rDup.Nm_clifor  = pNm_clifor;
                        //Buscar cond pagamento
                        CamadaDados.Financeiro.Cadastros.TList_CadCondPgto lCond =
                            CamadaNegocio.Financeiro.Cadastros.TCN_CadCondPgto.Buscar(string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      1,
                                                                                      decimal.Zero,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      1,
                                                                                      string.Empty,
                                                                                      null);
                        if (lCond.Count > 0)
                        {
                            rDup.Cd_condpgto      = lCond[0].Cd_condpgto;
                            rDup.Qt_parcelas      = lCond[0].Qt_parcelas;
                            rDup.Qt_dias_desdobro = lCond[0].Qt_diasdesdobro;
                        }
                        //Buscar endereco clifor
                        if (!string.IsNullOrEmpty(pCd_clifor))
                        {
                            CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
                                CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(pCd_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)
                            {
                                pCd_endereco = rDup.Cd_endereco = lEnd[0].Cd_endereco;
                                pDs_endereco = rDup.Ds_endereco = lEnd[0].Ds_endereco;
                            }
                        }
                        rDup.Tp_docto       = rCfg.Tp_docto;
                        rDup.Ds_tpdocto     = rCfg.Ds_tpdocto;
                        rDup.Tp_duplicata   = rCfg.Tp_duplicata;
                        rDup.Ds_tpduplicata = rCfg.Ds_tpduplicata;
                        rDup.Tp_mov         = "R";
                        rDup.Cd_historico   = rCfg.Cd_historico;
                        rDup.Ds_historico   = rCfg.Ds_historico;
                        //Buscar Moeda Padrao
                        CamadaDados.Financeiro.Cadastros.TList_Moeda tabela =
                            CamadaNegocio.ConfigGer.TCN_CadParamGer_X_Empresa.BuscarMoedaPadrao(pCd_empresa, null);
                        if (tabela != null)
                        {
                            if (tabela.Count > 0)
                            {
                                rDup.Cd_moeda    = tabela[0].Cd_moeda;
                                rDup.Ds_moeda    = tabela[0].Ds_moeda_singular;
                                rDup.Sigla_moeda = tabela[0].Sigla;
                            }
                        }
                        rDup.Id_configBoleto     = rCfg.Id_config;
                        rDup.Nr_docto            = "PDC123";//pNr_cupom; //Numero Cupom
                        rDup.Dt_emissaostring    = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy");
                        rDup.Vl_documento        = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
                        rDup.Vl_documento_padrao = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);

                        rDup.Parcelas.Add(new CamadaDados.Financeiro.Duplicata.TRegistro_LanParcela()
                        {
                            Cd_parcela        = 1,
                            Dt_vencto         = lCond.Count > 0 ? rDup.Dt_emissao.Value.AddDays(double.Parse(lCond[0].Qt_diasdesdobro.ToString())) : rDup.Dt_emissao,
                            Vl_parcela        = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV),
                            Vl_parcela_padrao = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV)
                        });
                        lPortador.Find(p => p.Tp_portadorpdv.ToUpper().Equals("P")).lDup.Add(rDup);
                        lPortador.Find(p => p.Tp_portadorpdv.ToUpper().Equals("P")).Vl_pagtoPDV = rDup.Vl_documento_padrao;
                        ConfirmarFin();
                    }
                    else if (portador.ToUpper().Trim().Equals("DV"))//Devolucao Credito
                    {
                        //Devolucao de credito
                        using (Financeiro.TFSaldoCreditos fSaldo = new Financeiro.TFSaldoCreditos())
                        {
                            fSaldo.Cd_empresa    = pCd_empresa;
                            fSaldo.Cd_clifor     = pCd_clifor;
                            fSaldo.Vl_financeiro = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
                            fSaldo.Tp_mov        = "'R'";
                            if (fSaldo.ShowDialog() == DialogResult.OK)
                            {
                                if (fSaldo.lSaldo != null)
                                {
                                    lPortador.Find(p => p.St_devcreditobool).lCred       = fSaldo.lSaldo;
                                    lPortador.Find(p => p.St_devcreditobool).Vl_pagtoPDV =
                                        fSaldo.lSaldo.Sum(p => p.Vl_processar);
                                    CalcularTroco(portador);
                                    ConfirmarFin();
                                }
                            }
                            else
                            {
                                return;
                            }
                        }
                    }
                    else
                    {
                        //Portador Dinheiro
                        using (Componentes.TFQuantidade fQtde = new Componentes.TFQuantidade())
                        {
                            fQtde.Casas_decimais = 2;
                            fQtde.Vl_default     = pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV);
                            fQtde.Vl_saldo       = St_ReprocessaFin ? pVl_receber - lPortador.Sum(p => p.Vl_pagtoPDV) : decimal.Zero;
                            fQtde.Ds_label       = "Valor Recebido";
                            if (fQtde.ShowDialog() == DialogResult.OK)
                            {
                                lPortador.Find(p => !p.St_devcreditobool &&
                                               !p.St_entregafuturabool &&
                                               !p.St_controletitulobool &&
                                               !p.St_cartaocreditobool &&
                                               !p.St_cartafretebool &&
                                               !p.Tp_portadorpdv.Equals("P")).Vl_pagtoPDV += fQtde.Quantidade;
                                CalcularTroco(portador);
                                ConfirmarFin();
                            }
                        }
                    }
                }
                else
                {
                    MessageBox.Show("Não existe mais saldo para receber.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                }
            }
        }
Esempio n. 13
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); }
             }
         }
     }
 }
Esempio n. 14
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());
            }
        }
Esempio n. 15
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); }
            }
        }
Esempio n. 16
0
        private void ImportNfe(string path)
        {
            if (string.IsNullOrEmpty(path))
            {
                return;
            }
            using (TFImportarNFeCTe fImport = new TFImportarNFeCTe())
            {
                //Leitura do arquivo XML
                XmlDocument xml = new XmlDocument();
                xml.Load(path);
                XmlNodeList lNo = xml.GetElementsByTagName("infNFe");
                if (lNo.Count.Equals(0))
                {
                    MessageBox.Show("XML Invalido.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Error);
                    return;
                }
                #region Identificação NFe
                lNo = xml.GetElementsByTagName("ide");
                if (lNo.Count > 0)
                {
                    string tp_mov = string.Empty;
                    foreach (XmlNode no in lNo[0].ChildNodes)
                    {
                        if (no.LocalName.Equals("nNF"))
                        {
                            nr_notafiscal.Text = no.InnerText;
                        }
                        else if (no.LocalName.Equals("dhEmi"))
                        {
                            dt_requisicao.Text = DateTime.Parse(no.InnerText).ToString("dd/MM/yyyy");
                        }
                    }
                }
                #endregion
                #region Emitente NFe
                lNo = xml.GetElementsByTagName("emit");
                //Criar classe Clifor
                rCliforEmit =
                    new CamadaDados.Financeiro.Cadastros.TRegistro_CadClifor();
                //Criar classe Endereco
                CamadaDados.Financeiro.Cadastros.TRegistro_CadEndereco rEndCliforEmit =
                    new CamadaDados.Financeiro.Cadastros.TRegistro_CadEndereco();
                if (lNo.Count > 0)
                {
                    foreach (XmlNode no in lNo[0].ChildNodes)
                    {
                        if (no.LocalName.Equals("CNPJ"))
                        {
                            rCliforEmit.Nr_cgc    = no.InnerText;
                            rCliforEmit.Tp_pessoa = "J";
                        }
                        else if (no.LocalName.Equals("CPF"))
                        {
                            rCliforEmit.Nr_cpf    = no.InnerText;
                            rCliforEmit.Tp_pessoa = "F";
                        }
                        else if (no.LocalName.Equals("xNome"))
                        {
                            rCliforEmit.Nm_clifor = no.InnerText;
                        }
                        else if (no.LocalName.Equals("xFant"))
                        {
                            rCliforEmit.Nm_fantasia = no.InnerText;
                        }
                        else if (no.LocalName.Equals("IE"))
                        {
                            rEndCliforEmit.Insc_estadual = no.InnerText;
                        }
                    }
                    //Buscar fornecedor
                    lFornec =
                        CamadaNegocio.Financeiro.Cadastros.TCN_CadClifor.Busca_Clifor(string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.IsNullOrEmpty(rCliforEmit.Nr_cgc.SoNumero()) ? string.Empty : Convert.ToUInt64(rCliforEmit.Nr_cgc).ToString(@"00\.000\.000\/0000\-00"),
                                                                                      string.IsNullOrEmpty(rCliforEmit.Nr_cpf.SoNumero()) ? string.Empty : Convert.ToUInt64(rCliforEmit.Nr_cpf).ToString(@"000\.000\.000\-00"),
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      false,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      1,
                                                                                      null);
                }
                #endregion

                #region Endereco Emitente NFe
                lNo = xml.GetElementsByTagName("enderEmit");
                if (lNo.Count > 0)
                {
                    foreach (XmlNode no in lNo[0].ChildNodes)
                    {
                        if (no.LocalName.Equals("xLgr"))
                        {
                            rEndCliforEmit.Ds_endereco = no.InnerText;
                        }
                        else if (no.LocalName.Equals("nro"))
                        {
                            rEndCliforEmit.Numero = no.InnerText;
                        }
                        else if (no.LocalName.Equals("xCpl"))
                        {
                            rEndCliforEmit.Ds_complemento = no.InnerText;
                        }
                        else if (no.LocalName.Equals("xBairro"))
                        {
                            rEndCliforEmit.Bairro = no.InnerText;
                        }
                        else if (no.LocalName.Equals("cMun"))
                        {
                            rEndCliforEmit.Cd_cidade = no.InnerText;
                        }
                        else if (no.LocalName.Equals("xMun"))
                        {
                            rEndCliforEmit.DS_Cidade = no.InnerText;
                        }
                        else if (no.LocalName.Equals("CEP"))
                        {
                            rEndCliforEmit.Cep = no.InnerText;
                        }
                        else if (no.LocalName.Equals("fone"))
                        {
                            rEndCliforEmit.Fone = no.InnerText;
                        }
                        else if (no.LocalName.Equals("UF"))
                        {
                            rEndCliforEmit.UF = no.InnerText;
                        }
                    }
                    //Buscar endereco fornecedor
                    if (lFornec.Count > 0)
                    {
                        CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
                            CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(lFornec[0].Cd_clifor,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.IsNullOrEmpty(rEndCliforEmit.Cep.SoNumero()) ? string.Empty : rEndCliforEmit.Cep,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      1,
                                                                                      null);
                    }
                }
                #endregion

                #region Destinatario NFe
                lNo = xml.GetElementsByTagName("dest");
                if (lNo.Count > 0)
                {
                    string cnpj_dest = string.Empty;
                    foreach (XmlNode no in lNo[0].ChildNodes)
                    {
                        if (no.LocalName.Equals("CNPJ"))
                        {
                            cnpj_dest = no.InnerText;
                        }
                    }
                    if (new CamadaDados.Diversos.TCD_CadEmpresa().BuscarEscalar(
                            new TpBusca[]
                    {
                        new TpBusca()
                        {
                            vNM_Campo = string.Empty,
                            vOperador = "exists",
                            vVL_Busca = "(select 1 from VTB_FIN_Clifor x " +
                                        "where a.cd_clifor = x.cd_clifor " +
                                        "and x.nr_cgc = '" + rCliforEmit.Nr_cgc.Trim() + "')"
                        }
                    }, "1") == null)
                    {
                        MessageBox.Show("Destinatário do XML não se encontra cadastrado como empresa!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                    }
                    rCliforEmit.lEndereco.Add(rEndCliforEmit);
                    if (lFornec.Count > 0)
                    {
                        (bsAbastecimento.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).Cd_fornecedor = lFornec[0].Cd_clifor;
                        nm_fornecedor.Text = lFornec[0].Nm_clifor;
                    }
                }
                #endregion

                #region Itens da NFe
                //Buscar Combustivel
                lNo = xml.GetElementsByTagName("det");
                if (lNo.Count == 1)
                {
                    foreach (XmlNode no in lNo)
                    {
                        rItem = new CamadaDados.Faturamento.NotaFiscal.TRegistro_ItensXMLNFe();
                        foreach (XmlNode noF in no.ChildNodes)
                        {
                            if (noF.LocalName.Equals("prod"))
                            {
                                foreach (XmlNode noP in noF.ChildNodes)
                                {
                                    if (noP.LocalName.Equals("cProd"))
                                    {
                                        rItem.Cd_produto_xml = noP.InnerText;
                                    }
                                    else if (noP.LocalName.Equals("xProd"))
                                    {
                                        rItem.Ds_produto_xml = noP.InnerText;
                                    }
                                    else if (noP.LocalName.Equals("qCom"))
                                    {
                                        volume_requisicao.Value = decimal.Parse(noP.InnerText, new System.Globalization.CultureInfo("en-US"));
                                        rItem.Quantidade_xml    = volume_requisicao.Value;
                                    }
                                    else if (noP.LocalName.Equals("vUnCom"))
                                    {
                                        vl_unitario.Value = decimal.Parse(noP.InnerText, new System.Globalization.CultureInfo("en-US"));
                                    }
                                    else if (noP.LocalName.Equals("vProd"))
                                    {
                                        vl_subtotal.Value = decimal.Parse(noP.InnerText, new System.Globalization.CultureInfo("en-US"));
                                    }
                                }
                            }
                        }
                        //Buscar produto no sistema
                        if (rCliforEmit != null)
                        {
                            CamadaDados.Estoque.Cadastros.TList_CadProduto lProd =
                                new CamadaDados.Estoque.Cadastros.TCD_CadProduto().Select(
                                    new TpBusca[]
                            {
                                new TpBusca()
                                {
                                    vNM_Campo = "isnull(a.st_registro, 'A')",
                                    vOperador = "<>",
                                    vVL_Busca = "'C'"
                                },
                                new TpBusca()
                                {
                                    vNM_Campo = string.Empty,
                                    vOperador = "exists",
                                    vVL_Busca = "(select 1 from TB_EST_Produto_X_Fornecedor x " +
                                                "where x.cd_produto = a.cd_produto " +
                                                "and x.codigo_fornecedor = '" + rItem.Cd_produto_xml.Trim() + "' " +
                                                "and x.cd_fornecedor = '" + lFornec[0].Cd_clifor.Trim() + "')"
                                }
                            }, 1, string.Empty, string.Empty, string.Empty);
                            if (lProd.Count.Equals(1))
                            {
                                rItem.rProd      = lProd[0];
                                rItem.Cd_produto = lProd[0].CD_Produto;
                                rItem.Ds_produto = lProd[0].DS_Produto;
                                cd_produto.Text  = rItem.Cd_produto;
                                ds_produto.Text  = rItem.Ds_produto;
                            }
                            (bsAbastecimento.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).rProdForn = rItem;
                        }
                        #endregion
                        if (!System.IO.Directory.Exists(Utils.SettingsUtils.Default.Path_XML_NFe_CTe + System.IO.Path.DirectorySeparatorChar.ToString() + "bkp"))
                        {
                            System.IO.Directory.CreateDirectory(Utils.SettingsUtils.Default.Path_XML_NFe_CTe + System.IO.Path.DirectorySeparatorChar.ToString() + "bkp");
                        }
                        if (!System.IO.File.Exists(Utils.SettingsUtils.Default.Path_XML_NFe_CTe + System.IO.Path.DirectorySeparatorChar.ToString() + "bkp" +
                                                   System.IO.Path.DirectorySeparatorChar.ToString() + path.Substring(path.LastIndexOf("\\"), path.Trim().Length - path.LastIndexOf("\\"))))
                        {
                            System.IO.File.Move(path,
                                                Utils.SettingsUtils.Default.Path_XML_NFe_CTe + System.IO.Path.DirectorySeparatorChar.ToString() + "bkp" +
                                                System.IO.Path.DirectorySeparatorChar.ToString() + path.Substring(path.LastIndexOf("\\"), path.Trim().Length - path.LastIndexOf("\\")));
                        }
                    }
                }
            }
        }
Esempio n. 17
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); }
         }
     }
 }
Esempio n. 18
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); }
                    }
                }
            }
        }
Esempio n. 19
0
        private void ImportNfe(string path)
        {
            if (string.IsNullOrEmpty(path))
            {
                return;
            }
            using (TFImportarNFeCTe fImport = new TFImportarNFeCTe())
            {
                //Leitura do arquivo XML
                XmlDocument xml = new XmlDocument();
                xml.Load(path);
                XmlNodeList lNo = xml.GetElementsByTagName("infNFe");
                if (lNo.Count.Equals(0))
                {
                    MessageBox.Show("XML Invalido.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Error);
                    return;
                }
                #region Identificação NFe
                lNo = xml.GetElementsByTagName("ide");
                if (lNo.Count > 0)
                {
                    string tp_mov = string.Empty;
                    foreach (XmlNode no in lNo[0].ChildNodes)
                    {
                        if (no.LocalName.Equals("nNF"))
                        {
                            nr_notafiscal.Text = no.InnerText;
                        }
                        else if (no.LocalName.Equals("dhEmi"))
                        {
                            dt_realizada.Text = DateTime.Parse(no.InnerText).ToString("dd/MM/yyyy");
                        }
                    }
                }
                lNo = xml.GetElementsByTagName("total");
                if (lNo.Count > 0)
                {
                    foreach (XmlNode noT in lNo[0].ChildNodes)
                    {
                        if (noT.LocalName.Equals("ICMSTot"))
                        {
                            foreach (XmlNode noIT in noT.ChildNodes)
                            {
                                if (noIT.LocalName.Equals("vNF"))
                                {
                                    vl_realizado.Value = decimal.Parse(noIT.InnerText, new System.Globalization.CultureInfo("pt-BR"));
                                }
                            }
                        }
                    }
                }
                #endregion
                #region Emitente NFe
                lNo = xml.GetElementsByTagName("emit");
                //Criar classe Clifor
                rCliforEmit =
                    new CamadaDados.Financeiro.Cadastros.TRegistro_CadClifor();
                //Criar classe Endereco
                CamadaDados.Financeiro.Cadastros.TRegistro_CadEndereco rEndCliforEmit =
                    new CamadaDados.Financeiro.Cadastros.TRegistro_CadEndereco();
                if (lNo.Count > 0)
                {
                    foreach (XmlNode no in lNo[0].ChildNodes)
                    {
                        if (no.LocalName.Equals("CNPJ"))
                        {
                            rCliforEmit.Nr_cgc    = no.InnerText;
                            rCliforEmit.Tp_pessoa = "J";
                        }
                        else if (no.LocalName.Equals("CPF"))
                        {
                            rCliforEmit.Nr_cpf    = no.InnerText;
                            rCliforEmit.Tp_pessoa = "F";
                        }
                        else if (no.LocalName.Equals("xNome"))
                        {
                            rCliforEmit.Nm_clifor = no.InnerText;
                        }
                        else if (no.LocalName.Equals("xFant"))
                        {
                            rCliforEmit.Nm_fantasia = no.InnerText;
                        }
                        else if (no.LocalName.Equals("IE"))
                        {
                            rEndCliforEmit.Insc_estadual = no.InnerText;
                        }
                    }
                    //Buscar fornecedor
                    lFornec =
                        CamadaNegocio.Financeiro.Cadastros.TCN_CadClifor.Busca_Clifor(string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.IsNullOrEmpty(rCliforEmit.Nr_cgc.SoNumero()) ? string.Empty : Convert.ToUInt64(rCliforEmit.Nr_cgc).ToString(@"00\.000\.000\/0000\-00"),
                                                                                      string.IsNullOrEmpty(rCliforEmit.Nr_cpf.SoNumero()) ? string.Empty : Convert.ToUInt64(rCliforEmit.Nr_cpf).ToString(@"000\.000\.000\-00"),
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      false,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      1,
                                                                                      null);
                }
                #endregion

                #region Endereco Emitente NFe
                lNo = xml.GetElementsByTagName("enderEmit");
                if (lNo.Count > 0)
                {
                    foreach (XmlNode no in lNo[0].ChildNodes)
                    {
                        if (no.LocalName.Equals("xLgr"))
                        {
                            rEndCliforEmit.Ds_endereco = no.InnerText;
                        }
                        else if (no.LocalName.Equals("nro"))
                        {
                            rEndCliforEmit.Numero = no.InnerText;
                        }
                        else if (no.LocalName.Equals("xCpl"))
                        {
                            rEndCliforEmit.Ds_complemento = no.InnerText;
                        }
                        else if (no.LocalName.Equals("xBairro"))
                        {
                            rEndCliforEmit.Bairro = no.InnerText;
                        }
                        else if (no.LocalName.Equals("cMun"))
                        {
                            rEndCliforEmit.Cd_cidade = no.InnerText;
                        }
                        else if (no.LocalName.Equals("xMun"))
                        {
                            rEndCliforEmit.DS_Cidade = no.InnerText;
                        }
                        else if (no.LocalName.Equals("CEP"))
                        {
                            rEndCliforEmit.Cep = no.InnerText;
                        }
                        else if (no.LocalName.Equals("fone"))
                        {
                            rEndCliforEmit.Fone = no.InnerText;
                        }
                        else if (no.LocalName.Equals("UF"))
                        {
                            rEndCliforEmit.UF = no.InnerText;
                        }
                    }
                    //Buscar endereco fornecedor
                    if (lFornec.Count > 0)
                    {
                        CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
                            CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(lFornec[0].Cd_clifor,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.IsNullOrEmpty(rEndCliforEmit.Cep.SoNumero()) ? string.Empty : rEndCliforEmit.Cep,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      string.Empty,
                                                                                      1,
                                                                                      null);
                    }
                }
                #endregion

                #region Destinatario NFe
                lNo = xml.GetElementsByTagName("dest");
                if (lNo.Count > 0)
                {
                    string cnpj_dest = string.Empty;
                    foreach (XmlNode no in lNo[0].ChildNodes)
                    {
                        if (no.LocalName.Equals("CNPJ"))
                        {
                            cnpj_dest = no.InnerText;
                        }
                    }
                    if (new CamadaDados.Diversos.TCD_CadEmpresa().BuscarEscalar(
                            new TpBusca[]
                    {
                        new TpBusca()
                        {
                            vNM_Campo = string.Empty,
                            vOperador = "exists",
                            vVL_Busca = "(select 1 from VTB_FIN_Clifor x " +
                                        "where a.cd_clifor = x.cd_clifor " +
                                        "and x.nr_cgc = '" + rCliforEmit.Nr_cgc.Trim() + "')"
                        }
                    }, "1") == null)
                    {
                        MessageBox.Show("Destinatário do XML não se encontra cadastrado como empresa!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                    }
                    rCliforEmit.lEndereco.Add(rEndCliforEmit);
                    if (lFornec.Count > 0)
                    {
                        cd_cliforOficina.Text = lFornec[0].Cd_clifor;
                        nm_cliforOficina.Text = lFornec[0].Nm_clifor;
                    }
                }
                #endregion
                if (!System.IO.Directory.Exists(Utils.SettingsUtils.Default.Path_XML_NFe_CTe + System.IO.Path.DirectorySeparatorChar.ToString() + "bkp"))
                {
                    System.IO.Directory.CreateDirectory(Utils.SettingsUtils.Default.Path_XML_NFe_CTe + System.IO.Path.DirectorySeparatorChar.ToString() + "bkp");
                }
                if (!System.IO.File.Exists(Utils.SettingsUtils.Default.Path_XML_NFe_CTe + System.IO.Path.DirectorySeparatorChar.ToString() + "bkp" +
                                           System.IO.Path.DirectorySeparatorChar.ToString() + path.Substring(path.LastIndexOf("\\"), path.Trim().Length - path.LastIndexOf("\\"))))
                {
                    System.IO.File.Move(path,
                                        Utils.SettingsUtils.Default.Path_XML_NFe_CTe + System.IO.Path.DirectorySeparatorChar.ToString() + "bkp" +
                                        System.IO.Path.DirectorySeparatorChar.ToString() + path.Substring(path.LastIndexOf("\\"), path.Trim().Length - path.LastIndexOf("\\")));
                }
            }
        }
Esempio n. 20
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); }
                }
            }
        }
Esempio n. 21
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); }
             }
         }
     }
 }