private void afterGrava()
{
if (pDados.validarCampoObrigatorio())
{
if (bsLanctoDebito.Count > 0)
{
if (tot_credito.Value != tot_debito.Value)
{
MessageBox.Show("Total de DEBITO diferente de Total de CREDITO.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
try
{
CamadaNegocio.Contabil.TCN_LanMultiplo.Gravar(bsLanctoMultiplo.Current as CamadaDados.Contabil.TRegistro_Lan_CTB_LanMultiplo, true, null);
MessageBox.Show("Lançamento contabil AVULSO gravado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
bsLanctoMultiplo.Clear();
bsLanctoMultiplo.AddNew();
cd_empresa.SelectedValue = pCd_empresa;
DT_Inic.Focus();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
else
{
MessageBox.Show("Obrigatorio informar lançamentos a DEBITO/CREDITO para gravar.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
}
private void TFContabilAvulso_Load(object sender, EventArgs e)
{
Utils.ShapeGrid.RestoreShape(this, dataGridDefault1);
Utils.ShapeGrid.RestoreShape(this, dataGridDefault2);
if (!string.IsNullOrEmpty(Utils.Parametros.pubCultura))
{
Idioma.TIdioma.AjustaCultura(this);
}
this.Icon = Utils.ResourcesUtils.TecnoAliance_ICO;
pDados.set_FormatZero();
//Buscar Empresa
CamadaDados.Diversos.TList_CadEmpresa lEmp = new CamadaDados.Diversos.TCD_CadEmpresa().Select(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = string.Empty,
vVL_Busca = "exists(select 1 from tb_div_usuario_x_empresa x " +
"where x.cd_empresa = a.cd_empresa " +
"and ((x.login = '******') or " +
"exists(select 1 from tb_div_usuario_x_grupos y " +
" where y.logingrp = x.login and y.loginusr = '******')))"
}
}, 0, string.Empty);
cd_empresa.DataSource = lEmp;
cd_empresa.DisplayMember = "NM_Empresa";
cd_empresa.ValueMember = "CD_Empresa";
bsLanctoMultiplo.AddNew();
cd_empresa.SelectedValue = pCd_empresa;
DT_Inic.Focus();
}
private void ValidarData()
{
if ((DT_Inic.Text.Trim() != "/ /") &&
(DT_Final.Text.Trim() != "/ /"))
{
if (DT_Inic.Data.Date > DT_Final.Data.Date)
{
MessageBox.Show("Data Inicial não pode ser maior que data final.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
DT_Inic.Clear();
DT_Inic.Focus();
}
}
}
private void BB_Gravar_Click(object sender, EventArgs e)
{
if (DT_Inic.Text.Trim().Equals(string.Empty) || DT_Inic.Text.Trim().Equals("/ /"))
{
MessageBox.Show("Obrigatorio informar data de processamento do lote.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
DT_Inic.Focus();
return;
}
if (vl_credito.Value.Equals(0))
{
MessageBox.Show("Obrigatorio informar valor do credito.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
vl_credito.Focus();
return;
}
this.DialogResult = DialogResult.OK;
}
private void ReprocessarLivroFiscal()
{
if (string.IsNullOrEmpty(cd_empresa.Text))
{
MessageBox.Show("Necessario informar empresa para reprocessar livro fiscal.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
cd_empresa.Focus();
return;
}
if (DT_Inic.Text.Trim().Equals("/ /"))
{
MessageBox.Show("Necessario informar data inicial para reprocessar livro fiscal.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
DT_Inic.Focus();
return;
}
if (DT_Final.Text.Trim().Equals("/ /"))
{
MessageBox.Show("Necessario informar data final para reprocessar livro fiscal.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
DT_Final.Focus();
return;
}
if (MessageBox.Show("Confirma reprocessamento do livro fiscal?", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1)
== DialogResult.Yes)
{
try
{
CamadaNegocio.Fiscal.TCN_LivroFiscal.ReprocessarLivroFiscal(cd_empresa.Text,
rbEntrada.Checked ? "E" : "S",
clbCfop.Vl_Busca,
clbSerie.Vl_Busca,
DT_Inic.Text,
DT_Final.Text,
null);
MessageBox.Show("Livro Fiscal Reprocessado com Sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
private void afterBusca()
{
if (string.IsNullOrEmpty(cd_empresa.Text))
{
MessageBox.Show("Obrigatorio informar empresa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
cd_empresa.Focus();
return;
}
if (DT_Inic.Text.Trim().Equals("/ /"))
{
MessageBox.Show("Obrigatorio informar data inicial.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
DT_Inic.Focus();
return;
}
if (DT_Final.Text.Trim().Equals("/ /"))
{
MessageBox.Show("Obrigatorio informar data final.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
DT_Final.Focus();
return;
}
if (string.IsNullOrEmpty(clbCfop.Vl_Busca))
{
MessageBox.Show("Obrigatorio selecionar CFOP.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
clbCfop.Focus();
return;
}
//Resumo por Uf
bsResumoFiscal.DataSource = new CamadaDados.Fiscal.TCD_ApuracaoImpostos().SelectResumoFiscal(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.cd_empresa",
vOperador = "=",
vVL_Busca = "'" + cd_empresa.Text.Trim() + "'"
},
new Utils.TpBusca()
{
vNM_Campo = "a.tp_movimento",
vOperador = "=",
vVL_Busca = rbEntrada.Checked ? "'E'" : "'S'"
},
new Utils.TpBusca()
{
vNM_Campo = "a.cd_cfop",
vOperador = "in",
vVL_Busca = "(" + clbCfop.Vl_Busca.Trim() + ")"
},
new Utils.TpBusca()
{
vNM_Campo = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "a.nr_serie" : string.Empty,
vOperador = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "=" : string.Empty,
vVL_Busca = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "a.nr_serie" : "(a.nr_serie not in(" + clbSerie.Vl_Busca.Trim() + ") or a.tp_nota = 'T')"
},
new Utils.TpBusca()
{
vNM_Campo = "ISNULL(C.ST_GERASINTEGRA, 'N')",
vOperador = "=",
vVL_Busca = "'S'"
},
new Utils.TpBusca()
{
vNM_Campo = rbEmissao.Checked ? "a.dt_emissao" : "a.dt_saient",
vOperador = ">=",
vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Inic.Text).ToString("yyyyMMdd")) + " 00:00:00'"
},
new Utils.TpBusca()
{
vNM_Campo = rbEmissao.Checked ? "a.dt_emissao" : "a.dt_saient",
vOperador = "<=",
vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Final.Text).ToString("yyyyMMdd")) + " 23:59:59'"
},
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, '')",
vOperador = "<>",
vVL_Busca = "'C'"
}
});
//Resumo por CFOP
bsResumoCfop.DataSource = new CamadaDados.Fiscal.TCD_ApuracaoImpostos().SelectApuracaoFiscal(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.cd_empresa",
vOperador = "=",
vVL_Busca = "'" + cd_empresa.Text.Trim() + "'"
},
new Utils.TpBusca()
{
vNM_Campo = "a.tp_movimento",
vOperador = "=",
vVL_Busca = rbEntrada.Checked ? "'E'" : "'S'"
},
new Utils.TpBusca()
{
vNM_Campo = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "a.nr_serie" : string.Empty,
vOperador = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "=" : string.Empty,
vVL_Busca = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "a.nr_serie" : "(a.nr_serie not in(" + clbSerie.Vl_Busca.Trim() + ") or a.tp_nota = 'T')"
},
new Utils.TpBusca()
{
vNM_Campo = "ISNULL(B.ST_GERASINTEGRA, 'N')",
vOperador = "=",
vVL_Busca = "'S'"
},
new Utils.TpBusca()
{
vNM_Campo = rbEmissao.Checked ? "a.dt_emissao" : "a.dt_saient",
vOperador = ">=",
vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Inic.Text).ToString("yyyyMMdd")) + " 00:00:00'"
},
new Utils.TpBusca()
{
vNM_Campo = rbEmissao.Checked ? "a.dt_emissao" : "a.dt_saient",
vOperador = "<=",
vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Final.Text).ToString("yyyyMMdd")) + " 23:59:59'"
},
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, '')",
vOperador = "<>",
vVL_Busca = "'C'"
}
});
//Lancamento Avulso
bsLanctoImposto.DataSource = new CamadaDados.Fiscal.TCD_LanctoImposto().Select(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.cd_empresa",
vOperador = "=",
vVL_Busca = "'" + cd_empresa.Text.Trim() + "'"
},
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fis_imposto x " +
"where x.cd_imposto = a.cd_imposto " +
"and x.st_icms = 0)"
},
new Utils.TpBusca()
{
vNM_Campo = "a.dt_lancto",
vOperador = ">=",
vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Inic.Text).ToString("yyyyMMdd")) + " 00:00:00'"
},
new Utils.TpBusca()
{
vNM_Campo = "a.dt_lancto",
vOperador = "<=",
vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Final.Text).ToString("yyyyMMdd")) + " 23:59:59'"
}
}, 0, string.Empty);
//Totalizar Campos Valores
vl_totalcontabil.Value = (bsLivroFiscal.DataSource as CamadaDados.Fiscal.TList_LivroFiscal).Where(p => p.St_registro.Trim().ToUpper() != "C").Sum(p => p.Vl_contabil);
vl_totalbasecalc.Value = (bsLivroFiscal.DataSource as CamadaDados.Fiscal.TList_LivroFiscal).Where(p => p.St_registro.Trim().ToUpper() != "C").Sum(p => p.Vl_basecalc);
vl_totisento.Value = (bsLivroFiscal.DataSource as CamadaDados.Fiscal.TList_LivroFiscal).Where(p => p.St_registro.Trim().ToUpper() != "C").Sum(p => p.Vl_isentas);
vl_totoutros.Value = (bsLivroFiscal.DataSource as CamadaDados.Fiscal.TList_LivroFiscal).Where(p => p.St_registro.Trim().ToUpper() != "C").Sum(p => p.Vl_outros);
vl_totalicms.Value = (bsLivroFiscal.DataSource as CamadaDados.Fiscal.TList_LivroFiscal).Where(p => p.St_registro.Trim().ToUpper() != "C").Sum(p => p.Vl_icms);
vl_totalicmssubsttrib.Value = (bsLivroFiscal.DataSource as CamadaDados.Fiscal.TList_LivroFiscal).Where(p => p.St_registro.Trim().ToUpper() != "C").Sum(p => p.Vl_icms_subst);
tot_credito.Value = (bsLanctoImposto.DataSource as CamadaDados.Fiscal.TList_LanctoImposto).Where(p => p.D_c.Trim().ToUpper().Equals("C")).Sum(p => p.Vl_lancto);
tot_debito.Value = (bsLanctoImposto.DataSource as CamadaDados.Fiscal.TList_LanctoImposto).Where(p => p.D_c.Trim().ToUpper().Equals("D")).Sum(p => p.Vl_lancto);
tot_estorno_d.Value = (bsLanctoImposto.DataSource as CamadaDados.Fiscal.TList_LanctoImposto).Where(p => p.D_c.Trim().ToUpper().Equals("D") && p.Tp_lancto.Trim().Equals("3")).Sum(p => p.Vl_lancto);
tot_estornoC.Value = (bsLanctoImposto.DataSource as CamadaDados.Fiscal.TList_LanctoImposto).Where(p => p.D_c.Trim().ToUpper().Equals("C") && p.Tp_lancto.Trim().Equals("1")).Sum(p => p.Vl_lancto);
}
private void visualizarTodasNotasFiscaisToolStripMenuItem_Click(object sender, EventArgs e)
{
if (string.IsNullOrEmpty(cd_empresa.Text))
{
MessageBox.Show("Obrigatorio informar empresa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
cd_empresa.Focus();
return;
}
if (DT_Inic.Text.Trim().Equals("/ /"))
{
MessageBox.Show("Obrigatorio informar data inicial.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
DT_Inic.Focus();
return;
}
if (DT_Final.Text.Trim().Equals("/ /"))
{
MessageBox.Show("Obrigatorio informar data final.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
DT_Final.Focus();
return;
}
BindingSource bs = new BindingSource();
bs.DataSource = new CamadaDados.Fiscal.TCD_ApuracaoImpostos().SelectApuracaoFiscal(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.cd_empresa",
vOperador = "=",
vVL_Busca = "'" + cd_empresa.Text.Trim() + "'"
},
new Utils.TpBusca()
{
vNM_Campo = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "a.nr_serie" : string.Empty,
vOperador = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "=" : string.Empty,
vVL_Busca = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "a.nr_serie" : "(a.nr_serie not in(" + clbSerie.Vl_Busca.Trim() + ") or a.tp_nota = 'T')"
},
new Utils.TpBusca()
{
vNM_Campo = "ISNULL(B.ST_GERASINTEGRA, 'N')",
vOperador = "=",
vVL_Busca = "'S'"
},
new Utils.TpBusca()
{
vNM_Campo = rbEmissao.Checked ? "a.dt_emissao" : "a.dt_saient",
vOperador = ">=",
vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Inic.Text).ToString("yyyyMMdd")) + " 00:00:00'"
},
new Utils.TpBusca()
{
vNM_Campo = rbEmissao.Checked ? "a.dt_emissao" : "a.dt_saient",
vOperador = "<=",
vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Final.Text).ToString("yyyyMMdd")) + " 23:59:59'"
},
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, '')",
vOperador = "<>",
vVL_Busca = "'C'"
}
});
if (bs.Count > 0)
{
//Buscar outros debitos/creditos
CamadaDados.Fiscal.TList_LanctoImposto lImposto =
new CamadaDados.Fiscal.TCD_LanctoImposto().Select(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.cd_empresa",
vOperador = "=",
vVL_Busca = "'" + cd_empresa.Text.Trim() + "'"
},
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fis_imposto x " +
"where x.cd_imposto = a.cd_imposto " +
"and x.st_icms = 0)"
},
new Utils.TpBusca()
{
vNM_Campo = "a.dt_lancto",
vOperador = "<=",
vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Final.Text).ToString("yyyyMMdd")) + " 23:59:59'"
},
new Utils.TpBusca()
{
vNM_Campo = "a.id_lotefis",
vOperador = "is",
vVL_Busca = "null"
}
}, 0, string.Empty);
//Buscar Saldo Anterior
CamadaDados.Fiscal.TList_LoteImposto lLoteImp =
new CamadaDados.Fiscal.TCD_LoteImposto().Select(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.cd_empresa",
vOperador = "=",
vVL_Busca = "'" + cd_empresa.Text.Trim() + "'"
},
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fis_imposto x " +
"where x.cd_imposto = a.cd_imposto " +
"and x.st_icms = 0)"
}
}, 1, string.Empty, "a.dt_lote desc");
using (FormRelPadrao.TFGerenciadorImpressao fImp = new FormRelPadrao.TFGerenciadorImpressao())
{
FormRelPadrao.Relatorio Rel = new FormRelPadrao.Relatorio();
Rel.Altera_Relatorio = Altera_Relatorio;
Rel.DTS_Relatorio = bs;
Rel.Nome_Relatorio = this.Name;
Rel.NM_Classe = this.Name;
Rel.Modulo = "FIS";
Rel.Ident = "TFResumoFiscal";
Rel.Parametros_Relatorio.Add("DATA_INI", DT_Inic.Text);
Rel.Parametros_Relatorio.Add("DATA_FIN", DT_Final.Text);
Rel.Parametros_Relatorio.Add("NRLIVROFISCAL", nr_livro.Value);
Rel.Parametros_Relatorio.Add("NRPAGINAINICIAL", nr_pagina.Value);
Rel.Parametros_Relatorio.Add("VL_DEBITAR", (bs.DataSource as CamadaDados.Fiscal.TList_ApuracaoFiscal).Where(p => p.Cd_cfop.Substring(0, 1).Equals("5") ||
p.Cd_cfop.Substring(0, 1).Equals("6") ||
p.Cd_cfop.Substring(0, 1).Equals("7")).Sum(p => p.Vl_icms));
Rel.Parametros_Relatorio.Add("VL_CREDITAR", (bs.DataSource as CamadaDados.Fiscal.TList_ApuracaoFiscal).Where(p => p.Cd_cfop.Substring(0, 1).Equals("1") ||
p.Cd_cfop.Substring(0, 1).Equals("2") ||
p.Cd_cfop.Substring(0, 1).Equals("3")).Sum(p => p.Vl_icms));
if (lImposto.Count > 0)
{
Rel.Parametros_Relatorio.Add("VL_OUTROS_DEB", lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("D")).Sum(p => p.Vl_lancto));
Rel.Parametros_Relatorio.Add("VL_ESTORNO_DEB", lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("D") && p.Tp_lancto.Trim().Equals("3")).Sum(p => p.Vl_lancto));
Rel.Parametros_Relatorio.Add("VL_OUTROS_CRED", lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("C")).Sum(p => p.Vl_lancto));
Rel.Parametros_Relatorio.Add("VL_ESTORNO_CRED", lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("C") && p.Tp_lancto.Trim().Equals("1")).Sum(p => p.Vl_lancto));
}
if (lLoteImp.Count > 0)
{
Rel.Parametros_Relatorio.Add("VL_DEB_ANTERIOR", lLoteImp[0].Vl_debito);
Rel.Parametros_Relatorio.Add("VL_CRED_ANTERIOR", lLoteImp[0].Vl_credito);
}
fImp.St_enabled_enviaremail = true;
fImp.pCd_clifor = string.Empty;
fImp.pMensagem = "RELATORIO RESUMO FISCAL";
if (Altera_Relatorio)
{
Rel.Gera_Relatorio(string.Empty,
fImp.pSt_imprimir,
fImp.pSt_visualizar,
fImp.pSt_enviaremail,
fImp.pSt_exportPdf,
fImp.Path_exportPdf,
fImp.pDestinatarios,
null,
"RELATORIO RESUMO FISCAL",
fImp.pDs_mensagem);
Altera_Relatorio = false;
}
else
if ((fImp.ShowDialog() == DialogResult.OK) || (fImp.pSt_enviaremail))
{
Rel.Gera_Relatorio(string.Empty,
fImp.pSt_imprimir,
fImp.pSt_visualizar,
fImp.pSt_enviaremail,
fImp.pSt_exportPdf,
fImp.Path_exportPdf,
fImp.pDestinatarios,
null,
"RELATORIO RESUMO FISCAL",
fImp.pDs_mensagem);
}
}
}
else
{
MessageBox.Show("Não existe registro para gerar relatorio.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}