Exemplo n.º 1
0
 private void AlterarClifor()
 {
     if (bsConvenioClifor.Current != null)
     {
         using (TFCliforConvenio fClifor = new TFCliforConvenio())
         {
             fClifor.pCd_empresa = (bsConvenioClifor.Current as TRegistro_Convenio_Clifor).Cd_empresa;
             fClifor.rClifor     = bsConvenioClifor.Current as TRegistro_Convenio_Clifor;
             if (fClifor.ShowDialog() == DialogResult.OK)
             {
                 try
                 {
                     TCN_Convenio_Clifor.Gravar(fClifor.rClifor, null);
                     MessageBox.Show("Cliente alterado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                 }
                 catch (Exception ex)
                 { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
             }
             LimparFiltros();
             id_convenio.Text = (bsConvenioClifor.Current as TRegistro_Convenio_Clifor).Id_conveniostr;
             cd_empresa.Text  = (bsConvenioClifor.Current as TRegistro_Convenio_Clifor).Cd_empresa;
             afterBusca();
         }
     }
 }
Exemplo n.º 2
0
 private void AlterarClifor()
 {
     if (bsConvenioClifor.Current != null)
     {
         using (TFCliforConvenio fClifor = new TFCliforConvenio())
         {
             fClifor.pCd_empresa = (bsConvenioClifor.Current as CamadaDados.PostoCombustivel.TRegistro_Convenio_Clifor).Cd_empresa;
             fClifor.rClifor     = bsConvenioClifor.Current as CamadaDados.PostoCombustivel.TRegistro_Convenio_Clifor;
             fClifor.ShowDialog();
             bsConvenioClifor.ResetCurrentItem();
         }
     }
 }
Exemplo n.º 3
0
        private void InserirClifor()
        {
            if (bsConvenio.Current != null)
            {
                if (string.IsNullOrEmpty(CD_Empresa.Text))
                {
                    MessageBox.Show("Obrigatorio informar empresa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                    CD_Empresa.Focus();
                    return;
                }
                using (TFCliforConvenio fClifor = new TFCliforConvenio())
                {
                    fClifor.pCd_empresa        = CD_Empresa.Text;
                    fClifor.tipo_insercaounica = true;
                    if (fClifor.ShowDialog() == DialogResult.OK)
                    {
                        if ((fClifor.rClifor != null) && (fClifor.lCombustivel != null))
                        {
                            fClifor.lCombustivel.ForEach(p =>
                            {
                                if ((bsConvenio.Current as CamadaDados.PostoCombustivel.TRegistro_Convenio).lClifor.Exists(v =>
                                                                                                                           v.Cd_produto.Trim().Equals(p.CD_Produto.Trim()) &&
                                                                                                                           v.Cd_clifor.Trim().Equals(fClifor.rClifor.Cd_clifor.Trim()) &&
                                                                                                                           v.Cd_endereco.Trim().Equals(fClifor.rClifor.Cd_endereco.Trim())))
                                {
                                    (bsConvenio.Current as CamadaDados.PostoCombustivel.TRegistro_Convenio).lClifor.Find(v =>
                                                                                                                         v.Cd_produto.Trim().Equals(p.CD_Produto.Trim()) &&
                                                                                                                         v.Cd_clifor.Trim().Equals(fClifor.rClifor.Cd_clifor.Trim()) &&
                                                                                                                         v.Cd_endereco.Trim().Equals(fClifor.rClifor.Cd_endereco.Trim()))
                                    .lPlaca = fClifor.rClifor.lPlaca;
                                }

                                else
                                {
                                    (bsConvenio.Current as CamadaDados.PostoCombustivel.TRegistro_Convenio).lClifor.Add(
                                        new CamadaDados.PostoCombustivel.TRegistro_Convenio_Clifor()
                                    {
                                        Cd_clifor           = fClifor.rClifor.Cd_clifor,
                                        Nm_clifor           = fClifor.rClifor.Nm_clifor,
                                        Cd_empresa          = fClifor.rClifor.Cd_empresa,
                                        Nm_empresa          = fClifor.rClifor.Nm_empresa,
                                        Cd_endereco         = fClifor.rClifor.Cd_endereco,
                                        Cd_produto          = p.CD_Produto,
                                        Ds_produto          = p.DS_Produto,
                                        Id_convenio         = fClifor.rClifor.Id_convenio,
                                        lMotDel             = fClifor.rClifor.lMotDel,
                                        lMotorista          = fClifor.rClifor.lMotorista,
                                        lPlaca              = fClifor.rClifor.lPlaca,
                                        lPlacaDel           = fClifor.rClifor.lPlacaDel,
                                        St_faturardireto    = fClifor.rClifor.St_faturardireto,
                                        St_motconveniado    = fClifor.rClifor.St_motconveniado,
                                        St_placaconveniada  = fClifor.rClifor.St_placaconveniada,
                                        St_registro         = fClifor.rClifor.St_registro,
                                        Vl_unitario         = fClifor.rClifor.Vl_unitario,
                                        CD_vendedor         = fClifor.rClifor.CD_vendedor,
                                        Id_config           = fClifor.rClifor.Id_config,
                                        Qtd_convenio        = fClifor.rClifor.Qtd_convenio,
                                        Tp_preco            = fClifor.rClifor.Tp_preco,
                                        Tp_faturamento      = fClifor.rClifor.Tp_faturamento,
                                        St_exigirrequisicao = fClifor.rClifor.St_exigirrequisicao,
                                        St_exigirnomemot    = fClifor.rClifor.St_exigirnomemot,
                                        Tp_qt_vl            = fClifor.rClifor.Tp_qt_vl,
                                        Base_calc_fid       = fClifor.rClifor.Base_calc_fid,
                                        Qt_pontos_fid       = fClifor.rClifor.Qt_pontos_fid,
                                        Nr_diasvalidade_fid = fClifor.rClifor.Nr_diasvalidade_fid,
                                        Tp_pontos_fid       = fClifor.rClifor.Tp_pontos_fid,
                                        Ds_msgVale          = fClifor.rClifor.Ds_msgVale,
                                        Tp_acresdesc        = fClifor.rClifor.Tp_acresdesc,
                                        Tp_desconto         = fClifor.rClifor.Tp_desconto,
                                        Desconto            = fClifor.rClifor.Desconto
                                    });
                                }
                            });
                            bsConvenio.ResetCurrentItem();
                        }
                    }
                }
            }
        }
Exemplo n.º 4
0
 private void InserirClifor()
 {
     if (bsConvenio.Current != null)
     {
         using (TFCliforConvenio fClifor = new TFCliforConvenio())
         {
             fClifor.pCd_empresa        = (bsConvenio.Current as TRegistro_Convenio).Cd_empresa;
             fClifor.tipo_insercaounica = false;
             if (fClifor.ShowDialog() == DialogResult.OK)
             #region Inserção unica
             {
                 if ((fClifor.rClifor != null) && (fClifor.lCombustivel != null) && !string.IsNullOrEmpty(fClifor.rClifor.Cd_clifor))
                 {
                     TList_Convenio_Clifor lConv = new TList_Convenio_Clifor();
                     fClifor.lCombustivel.ForEach(p =>
                     {
                         lConv.Add(
                             new TRegistro_Convenio_Clifor()
                         {
                             Cd_clifor           = fClifor.rClifor.Cd_clifor,
                             Cd_endereco         = fClifor.rClifor.Cd_endereco,
                             Cd_empresa          = (bsConvenio.Current as TRegistro_Convenio).Cd_empresa,
                             Cd_produto          = p.CD_Produto,
                             Id_convenio         = (bsConvenio.Current as TRegistro_Convenio).Id_convenio,
                             lMotorista          = fClifor.rClifor.lMotorista,
                             lPlaca              = fClifor.rClifor.lPlaca,
                             St_faturardireto    = fClifor.rClifor.St_faturardireto,
                             St_motconveniado    = fClifor.rClifor.St_motconveniado,
                             St_placaconveniada  = fClifor.rClifor.St_placaconveniada,
                             St_registro         = fClifor.rClifor.St_registro,
                             Vl_unitario         = fClifor.rClifor.Vl_unitario,
                             CD_vendedor         = fClifor.rClifor.CD_vendedor,
                             Id_config           = fClifor.rClifor.Id_config,
                             Qtd_convenio        = fClifor.rClifor.Qtd_convenio,
                             Tp_preco            = fClifor.rClifor.Tp_preco,
                             Tp_faturamento      = fClifor.rClifor.Tp_faturamento,
                             St_exigirrequisicao = fClifor.rClifor.St_exigirrequisicao,
                             St_exigirnomemot    = fClifor.rClifor.St_exigirnomemot,
                             Tp_qt_vl            = fClifor.rClifor.Tp_qt_vl,
                             Base_calc_fid       = fClifor.rClifor.Base_calc_fid,
                             Qt_pontos_fid       = fClifor.rClifor.Qt_pontos_fid,
                             Nr_diasvalidade_fid = fClifor.rClifor.Nr_diasvalidade_fid,
                             Tp_pontos_fid       = fClifor.rClifor.Tp_pontos_fid,
                             Ds_msgVale          = fClifor.rClifor.Ds_msgVale
                         });
                     });
                     try
                     {
                         TCN_Convenio_Clifor.Gravar(lConv, null);
                         MessageBox.Show("Cliente gravado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                         LimparFiltros();
                         id_convenio.Text = (bsConvenio.Current as TRegistro_Convenio).Id_conveniostr;
                         cd_empresa.Text  = (bsConvenio.Current as TRegistro_Convenio).Cd_empresa;
                         afterBusca();
                     }
                     catch (Exception ex)
                     { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
                 }
             }
             #endregion
             #region Inserção composta
             else if (fClifor.lClifor != null && fClifor.lCombustivel != null &&
                      fClifor.lClifor.Count > 0 && fClifor.lCombustivel.Count > 0)
             {
                 TList_Convenio_Clifor lConv = new TList_Convenio_Clifor();
                 fClifor.lClifor.ForEach(c =>
                 {
                     fClifor.lCombustivel.ForEach(p =>
                     {
                         lConv.Add(
                             new TRegistro_Convenio_Clifor()
                         {
                             Cd_clifor   = c.Cd_clifor.ToString().Trim(),
                             Cd_endereco = new CamadaDados.Financeiro.Cadastros.TCD_CadEndereco().BuscarEscalar(
                                 new Utils.TpBusca[]
                             {
                                 new Utils.TpBusca()
                                 {
                                     vNM_Campo = "a.cd_clifor",
                                     vOperador = "=",
                                     vVL_Busca = "'" + c.Cd_clifor.ToString().Trim() + "'"
                                 }
                             }, "a.cd_endereco").ToString(),
                             Cd_empresa          = (bsConvenio.Current as TRegistro_Convenio).Cd_empresa,
                             Cd_produto          = p.CD_Produto,
                             Id_convenio         = (bsConvenio.Current as TRegistro_Convenio).Id_convenio,
                             St_faturardireto    = fClifor.rClifor.St_faturardireto,
                             St_motconveniado    = fClifor.rClifor.St_motconveniado,
                             St_placaconveniada  = fClifor.rClifor.St_placaconveniada,
                             St_registro         = fClifor.rClifor.St_registro,
                             Vl_unitario         = fClifor.rClifor.Vl_unitario,
                             CD_vendedor         = fClifor.rClifor.CD_vendedor,
                             Id_config           = fClifor.rClifor.Id_config,
                             Qtd_convenio        = fClifor.rClifor.Qtd_convenio,
                             Tp_preco            = fClifor.rClifor.Tp_preco,
                             Tp_faturamento      = fClifor.rClifor.Tp_faturamento,
                             St_exigirrequisicao = fClifor.rClifor.St_exigirrequisicao,
                             St_exigirnomemot    = fClifor.rClifor.St_exigirnomemot,
                             Tp_qt_vl            = fClifor.rClifor.Tp_qt_vl,
                             Base_calc_fid       = fClifor.rClifor.Base_calc_fid,
                             Qt_pontos_fid       = fClifor.rClifor.Qt_pontos_fid,
                             Nr_diasvalidade_fid = fClifor.rClifor.Nr_diasvalidade_fid,
                             Tp_pontos_fid       = fClifor.rClifor.Tp_pontos_fid,
                             Ds_msgVale          = fClifor.rClifor.Ds_msgVale
                         });
                     });
                 });
                 try
                 {
                     TCN_Convenio_Clifor.Gravar(lConv, null);
                     MessageBox.Show("Clientes gravados com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                     LimparFiltros();
                     id_convenio.Text = (bsConvenio.Current as TRegistro_Convenio).Id_conveniostr;
                     cd_empresa.Text  = (bsConvenio.Current as TRegistro_Convenio).Cd_empresa;
                     afterBusca();
                 }
                 catch (Exception ex)
                 { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
             }
             #endregion
         }
     }
 }