Пример #1
0
 private void afterAltera()
 {
     if (bsReceitas.Current != null)
     {
         using (TFOutrasReceitas fReceita = new TFOutrasReceitas())
         {
             fReceita.rReceita = bsReceitas.Current as CamadaDados.Frota.TRegistro_OutrasReceitas;
             if (fReceita.ShowDialog() == DialogResult.OK)
             {
                 if (fReceita.rReceita != null)
                 {
                     try
                     {
                         CamadaNegocio.Frota.TCN_OutrasReceitas.Gravar(fReceita.rReceita, null);
                         MessageBox.Show("Receita alterada 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); }
                 }
             }
         }
     }
 }
Пример #2
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); }
             }
         }
     }
 }