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 bsConvenio_PositionChanged(object sender, EventArgs e)
 {
     if (bsConvenio.Current != null)
     {
         (bsConvenio.Current as TRegistro_Convenio).lClifor =
             TCN_Convenio_Clifor.Buscar((bsConvenio.Current as TRegistro_Convenio).Id_conveniostr,
                                        (bsConvenio.Current as TRegistro_Convenio).Cd_empresa,
                                        cd_clifor.Text,
                                        cd_endereco.Text,
                                        cd_produto.Text,
                                        null);
         bsConvenio.ResetCurrentItem();
         bsConvenioClifor_PositionChanged(this, new EventArgs());
     }
 }
Exemplo n.º 3
0
 private void AtualizarPrecoUnit()
 {
     using (TFAtualizaPrecoUnitConv fAtualiza = new TFAtualizaPrecoUnitConv())
     {
         if (fAtualiza.ShowDialog() == DialogResult.OK)
         {
             if (fAtualiza.lConvCli != null)
             {
                 try
                 {
                     TCN_Convenio_Clifor.Gravar(fAtualiza.lConvCli, null);
                     MessageBox.Show("Convenios atualizados com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                 }
                 catch (Exception ex)
                 { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
             }
         }
     }
 }
Exemplo n.º 4
0
 private void ExcluirClifor()
 {
     if (bsConvenioClifor.Current != null)
     {
         if (MessageBox.Show("Confirma exclusão do cliente?", "Pergunta", MessageBoxButtons.YesNo,
                             MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.Yes)
         {
             try
             {
                 TCN_Convenio_Clifor.Excluir(bsConvenioClifor.Current as TRegistro_Convenio_Clifor, null);
                 MessageBox.Show("Cliente excluido do convenio com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                 LimparFiltros();
                 id_convenio.Text = (bsConvenioClifor.Current as TRegistro_Convenio_Clifor).Id_conveniostr;
                 cd_empresa.Text  = (bsConvenioClifor.Current as TRegistro_Convenio_Clifor).Cd_empresa;
                 afterBusca();
             }
             catch (Exception ex)
             { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
         }
     }
 }
Exemplo n.º 5
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
         }
     }
 }