private void printRelGeralBloquetos()
{
if (dsBloqueto.Count > 0)
{
using (TFGerenciadorImpressao fImp = new TFGerenciadorImpressao())
{
FormRelPadrao.Relatorio Rel = new FormRelPadrao.Relatorio();
Rel.Altera_Relatorio = Altera_Relatorio;
Rel.DTS_Relatorio = dsBloqueto;
Rel.Nome_Relatorio = "TFRel_GeralBloquetos";
Rel.Ident = "TFRel_GeralBloquetos";
Rel.NM_Classe = Name;
Rel.Modulo = Tag.ToString().Substring(0, 3);
fImp.St_enabled_enviaremail = true;
fImp.pCd_clifor = string.Empty;
fImp.pMensagem = "RELATORIO GERAL DE BLOQUETOS";
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 GERAL DE BLOQUETOS",
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 GERAL DE BLOQUETOS",
fImp.pDs_mensagem);
}
}
}
else
{
MessageBox.Show("Não existe Registros Para Imprimir o Relatório!");
}
}
private void Imprime_Danfe()
{
FormRelPadrao.Relatorio Danfe = new FormRelPadrao.Relatorio();
Danfe.Altera_Relatorio = Altera_Relatorio;
//Buscar NFe
TRegistro_LanFaturamento rNfe = TCN_LanFaturamento.BuscarNF((bsNotaFiscal.Current as TRegistro_LanFaturamento).Cd_empresa,
(bsNotaFiscal.Current as TRegistro_LanFaturamento).Nr_lanctofiscalstr,
null);
//Buscar Itens NFe
rNfe.ItensNota = TCN_LanFaturamento_Item.Busca(rNfe.Cd_empresa,
rNfe.Nr_lanctofiscalstr,
string.Empty,
null);
Danfe.Parametros_Relatorio.Add("VL_IPI", rNfe.ItensNota.Sum(v => v.Vl_ipi));
Danfe.Parametros_Relatorio.Add("VL_ICMS", rNfe.ItensNota.Sum(v => v.Vl_icms + v.Vl_FCP));
Danfe.Parametros_Relatorio.Add("VL_BASEICMS", rNfe.ItensNota.Sum(v => v.Vl_basecalcICMS));
Danfe.Parametros_Relatorio.Add("VL_BASEICMSSUBST", rNfe.ItensNota.Sum(v => v.Vl_basecalcSTICMS));
Danfe.Parametros_Relatorio.Add("VL_ICMSSUBST", rNfe.ItensNota.Sum(v => v.Vl_ICMSST + v.Vl_FCPST));
BindingSource Bin = new BindingSource();
Bin.DataSource = new TList_RegLanFaturamento()
{
rNfe
};
Danfe.Nome_Relatorio = "TFLanFaturamento_Danfe";
Danfe.NM_Classe = "TFLanConsultaNFe";
Danfe.Modulo = "FAT";
Danfe.Ident = "TFLanFaturamento_Danfe";
Danfe.DTS_Relatorio = Bin;
//Buscar financeiro da DANFE
CamadaDados.Financeiro.Duplicata.TList_RegLanParcela lParc =
new CamadaDados.Financeiro.Duplicata.TCD_LanParcela().Select(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, 'A')",
vOperador = "<>",
vVL_Busca = "'L'"
},
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fin_duplicata x " +
"inner join tb_fat_notafiscal_x_duplicata y " +
"on x.cd_empresa = y.cd_empresa " +
"and x.nr_lancto = y.nr_lanctoduplicata " +
"where isnull(x.st_registro, 'A') <> 'C' " +
"and x.cd_empresa = a.cd_empresa " +
"and x.nr_lancto = a.nr_lancto " +
"and y.cd_empresa = '" + (bsNotaFiscal.Current as TRegistro_LanFaturamento).Cd_empresa.Trim() + "' " +
"and y.nr_lanctofiscal = " + (bsNotaFiscal.Current as TRegistro_LanFaturamento).Nr_lanctofiscal + ")"
}
}, 0, string.Empty, "a.dt_vencto, c.nm_clifor", string.Empty);
if (lParc.Count == 0)
{
//Verificar se Nota a nota foi vinculada de um cupom e buscar o Financeiro
lParc =
new CamadaDados.Financeiro.Duplicata.TCD_LanParcela().Select(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, 'A')",
vOperador = "<>",
vVL_Busca = "'L'"
},
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fin_duplicata x " +
"inner join TB_PDV_CupomFiscal_X_Duplicata y " +
"on x.cd_empresa = y.cd_empresa " +
"and x.nr_lancto = y.nr_lancto " +
"inner join TB_PDV_Cupom_X_VendaRapida k " +
"on y.cd_empresa = k.cd_empresa " +
"and y.id_cupom = k.id_vendarapida " +
"inner join TB_FAT_ECFVinculadoNF z " +
"on k.cd_empresa = z.cd_empresa " +
"and k.id_cupom = z.id_cupom " +
"where isnull(x.st_registro, 'A') <> 'C' " +
"and x.cd_empresa = a.cd_empresa " +
"and x.nr_lancto = a.nr_lancto " +
"and z.cd_empresa = '" + (bsNotaFiscal.Current as TRegistro_LanFaturamento).Cd_empresa.Trim() + "' " +
"and z.nr_lanctofiscal = " + (bsNotaFiscal.Current as TRegistro_LanFaturamento).Nr_lanctofiscal + ")"
}
}, 0, string.Empty, "a.dt_vencto, c.nm_clifor", string.Empty);
if (lParc.Count == 0)
{
//Verificar se Nota foi gerada de uma venda rapida e buscar o Financeiro
lParc =
new CamadaDados.Financeiro.Duplicata.TCD_LanParcela().Select(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "isnull(a.st_registro, 'A')",
vOperador = "<>",
vVL_Busca = "'L'"
},
new Utils.TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fin_duplicata x " +
"inner join TB_PDV_CupomFiscal_X_Duplicata y " +
"on x.cd_empresa = y.cd_empresa " +
"and x.nr_lancto = y.nr_lancto " +
"inner join TB_PDV_Pedido_X_VendaRapida k " +
"on k.cd_empresa = y.cd_empresa " +
"and k.id_vendarapida = y.id_cupom " +
"inner join TB_FAT_NotaFiscal z " +
"on z.cd_empresa = k.cd_empresa " +
"and z.nr_pedido = k.nr_pedido " +
"where isnull(x.st_registro, 'A') <> 'C' " +
"and x.cd_empresa = a.cd_empresa " +
"and x.nr_lancto = a.nr_lancto " +
"and z.cd_empresa = '" + (bsNotaFiscal.Current as TRegistro_LanFaturamento).Cd_empresa.Trim() + "' " +
"and z.nr_lanctofiscal = " + (bsNotaFiscal.Current as TRegistro_LanFaturamento).Nr_lanctofiscal + ")"
}
}, 0, string.Empty, "a.dt_vencto, c.nm_clifor", string.Empty);
}
}
if (lParc.Count > 0)
{
for (int i = 0; i < lParc.Count; i++)
{
if (i < 12)
{
Danfe.Parametros_Relatorio.Add("DT_VENCTO" + i.ToString(), lParc[i].Dt_venctostring);
Danfe.Parametros_Relatorio.Add("VL_DUP" + i.ToString(), lParc[i].Vl_parcela_padrao);
}
else
{
break;
}
}
}
//Verificar se existe logo configurada para a empresa
object log = new CamadaDados.Diversos.TCD_CadEmpresa().BuscarEscalar(
new Utils.TpBusca[]
{
new Utils.TpBusca()
{
vNM_Campo = "a.cd_empresa",
vOperador = "=",
vVL_Busca = "'" + (bsNotaFiscal.Current as TRegistro_LanFaturamento).Cd_empresa.Trim() + "'"
}
}, "a.logoEmpresa");
if (log != null)
{
Danfe.Parametros_Relatorio.Add("IMAGEM_RELATORIO", log);
}
Danfe.Gera_Relatorio();
}
private void bb_imprimir_Click(object sender, EventArgs e)
{
if (bsCodBarra.Current != null)
{
if (rTerminal.Tp_impetiqueta.Trim().ToUpper().Equals("Z"))
{
if (string.IsNullOrEmpty(rTerminal.Porta_imptick))
{
MessageBox.Show("Não existe porta configurada no cadastro do terminal <" + rTerminal.Cd_Terminal.Trim() + "-" + rTerminal.Ds_Terminal.Trim() + "> para imprimir etiqueta.",
"Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
try
{
if (rTerminal.Id_layout != decimal.Zero)
{
List <CamadaNegocio.Diversos.TRegistro_Objeto> obj = new List <CamadaNegocio.Diversos.TRegistro_Objeto>();
for (int j = 0; j < bsCodBarra.Count; j++)
{
if ((bsCodBarra[j] as CamadaDados.Estoque.Cadastros.TRegistro_CodBarra).agregar)
{
obj.Add(new CamadaNegocio.Diversos.TRegistro_Objeto()
{
Codigo = Convert.ToDecimal((bsCodBarra[j] as CamadaDados.Estoque.Cadastros.TRegistro_CodBarra).Cd_produto),
Produto = (bsCodBarra[j] as CamadaDados.Estoque.Cadastros.TRegistro_CodBarra).Ds_produto.Trim(),
Vl_preco = (bsCodBarra[j] as CamadaDados.Estoque.Cadastros.TRegistro_CodBarra).Vl_venda,
Cod_barra = (bsCodBarra[j] as CamadaDados.Estoque.Cadastros.TRegistro_CodBarra).Cd_codbarra,
Qtd_etiqueta = Convert.ToInt32((bsCodBarra[j] as CamadaDados.Estoque.Cadastros.TRegistro_CodBarra).Quantidade.ToString("N0", new System.Globalization.CultureInfo("pt-BR", true)))
});
}
}
CamadaNegocio.Diversos.TCN_CadLayoutEtiqueta.ImpEtiquetaLayout(obj,
rTerminal.Porta_imptick, rTerminal);
}
else
{
(bsCodBarra.DataSource as CamadaDados.Estoque.Cadastros.TList_CodBarra).ForEach(p =>
{
if (p.agregar)
{
if (rTerminal.Id_layout != decimal.Zero)
{
int qtd_etiquetas = 1;
qtd_etiquetas = Convert.ToInt32(p.Quantidade);
CamadaNegocio.Diversos.TCN_CadLayoutEtiqueta.ImpEtiquetaLayout(decimal.Parse(p.Cd_produto.SoNumero()),
p.Ds_produto.Trim(),
p.Cd_codbarra,
p.Vl_venda,
qtd_etiquetas,
rTerminal.Porta_imptick, rTerminal);
}
else if (rTerminal.Layoutetiqueta.Trim().Equals("1"))
{
TEtiquetaZebra.ImpEtiquetaL1(p.Referencia,
p.Ds_produto,
p.Cd_codbarra,
p.Vl_venda,
rTerminal.Porta_imptick);
}
else if (rTerminal.Layoutetiqueta.Trim().Equals("2"))
{
TEtiquetaZebra.ImpEtiquetaL2(p.Cd_produto,
p.Ds_produto,
p.Vl_venda,
rTerminal.Porta_imptick);
}
else if (rTerminal.Layoutetiqueta.Trim().Equals("3"))
{
TEtiquetaZebra.ImpEtiquetaL3(p.Cd_produto,
p.Ds_produto,
p.Cd_codbarra,
p.Vl_venda,
rTerminal.Porta_imptick);
}
else if (rTerminal.Layoutetiqueta.Trim().Equals("4"))
{
TEtiquetaZebra.ImpEtiquetaL4(p.Cd_produto + p.Ds_produto,
p.Cd_codbarra,
Convert.ToInt32(p.Quantidade),
rTerminal.Porta_imptick);
}
else if (rTerminal.Layoutetiqueta.Trim().Equals("5"))
{
TEtiquetaZebra.ImpEtiquetaL5(p.Cd_produto + p.Ds_produto,
p.Cd_codbarra,
p.Vl_venda,
Convert.ToInt32(p.Quantidade),
rTerminal.Porta_imptick);
}
else if (rTerminal.Layoutetiqueta.Trim().Equals("6"))
{
TEtiquetaZebra.ImpEtiquetaL6(decimal.Parse(p.Cd_produto),
p.Ds_produto,
p.Cd_codbarra,
p.Vl_venda,
Convert.ToInt32(p.Quantidade),
rTerminal.Porta_imptick);
}
}
});
}
}
catch (Exception ex)
{ MessageBox.Show("Erro imprimir etiqueta: " + ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
else
if (rTerminal.Tp_impetiqueta.Trim().ToUpper().Equals("A"))
{
try
{
CamadaDados.Estoque.Cadastros.TList_CodBarra bar = new CamadaDados.Estoque.Cadastros.TList_CodBarra();
for (int j = 0; j < bsCodBarra.Count; j++)
{
if ((bsCodBarra[j] as CamadaDados.Estoque.Cadastros.TRegistro_CodBarra).agregar)
{
(bsCodBarra[j] as CamadaDados.Estoque.Cadastros.TRegistro_CodBarra).Quantidade = 1;
bar.Add((bsCodBarra[j] as CamadaDados.Estoque.Cadastros.TRegistro_CodBarra));
}
}
Relatorio Relatorio = new Relatorio();
Relatorio.Altera_Relatorio = Altera_Relatorio;
//DADOS PERTINENTES PARA A GERAÇÂO DO RELATORIO
Relatorio.Nome_Relatorio = Name;
Relatorio.NM_Classe = Name;
BindingSource bs = new BindingSource();
bs.DataSource = bar;
Relatorio.DTS_Relatorio = bs;
Relatorio.Nome_Relatorio = "FLanEtiqueta";
Relatorio.NM_Classe = "FLanEtiqueta";
Relatorio.Ident = "FLanEtiqueta";
Relatorio.Modulo = "EST";
if (!Altera_Relatorio)
{
//Chamar tela de gerenciamento de impressao
using (FormRelPadrao.TFGerenciadorImpressao fImp = new FormRelPadrao.TFGerenciadorImpressao())
{
fImp.St_enabled_enviaremail = true;
fImp.pMensagem = ("ETIQUETAS PRODUTO GONDULA");
if ((fImp.ShowDialog() == DialogResult.OK) || (fImp.pSt_enviaremail))
{
Relatorio.Gera_Relatorio("Etiqueta",
fImp.pSt_imprimir,
fImp.pSt_visualizar,
fImp.pSt_enviaremail,
fImp.pSt_exportPdf,
fImp.Path_exportPdf,
fImp.pDestinatarios,
null,
("ETIQUETAS PRODUTO GONDULA"),
fImp.pDs_mensagem);
}
}
}
else
{
Relatorio.Gera_Relatorio();
Altera_Relatorio = false;
}
}
catch { }
}
else
if (rTerminal.Tp_impetiqueta.Trim().ToUpper().Equals("A"))
{
CamadaDados.Estoque.Cadastros.TList_CodBarra lbar = new CamadaDados.Estoque.Cadastros.TList_CodBarra();
(bsCodBarra.DataSource as CamadaDados.Estoque.Cadastros.TList_CodBarra).ForEach(p =>
{
if (p.agregar)
{
p.Quantidade = 1;
lbar.Add(p);
}
});
Relatorio Relatorio = new Relatorio();
Relatorio.Altera_Relatorio = Altera_Relatorio;
//DADOS PERTINENTES PARA A GERAÇÂO DO RELATORIO
Relatorio.Nome_Relatorio = Name;
Relatorio.NM_Classe = Name;
Relatorio.Modulo = Tag.ToString().Substring(0, 3);
BindingSource bs = new BindingSource();
bs.DataSource = lbar;
Relatorio.DTS_Relatorio = bs;
// Relatorio.Ident = "REL_CODBARRA_CADPRODUTO";// "FLanEtiqueta";
Relatorio.Nome_Relatorio = "FLanEtiqueta";
Relatorio.NM_Classe = "FLanEtiqueta";
Relatorio.Ident = "FLanEtiqueta";
Relatorio.Modulo = "EST";
if (!Altera_Relatorio)
{
//Chamar tela de gerenciamento de impressao
using (FormRelPadrao.TFGerenciadorImpressao fImp = new FormRelPadrao.TFGerenciadorImpressao())
{
fImp.St_enabled_enviaremail = true;
fImp.pMensagem = ("PRODUTO Nº " + (bsCodBarra.Current as CamadaDados.Estoque.Cadastros.TRegistro_CodBarra).Cd_produto);
if ((fImp.ShowDialog() == DialogResult.OK) || (fImp.pSt_enviaremail))
{
Relatorio.Gera_Relatorio("Etiqueta",
fImp.pSt_imprimir,
fImp.pSt_visualizar,
fImp.pSt_enviaremail,
fImp.pSt_exportPdf,
fImp.Path_exportPdf,
fImp.pDestinatarios,
null,
("PRODUTO Nº " + (bsCodBarra.Current as CamadaDados.Estoque.Cadastros.TRegistro_CodBarra)),
fImp.pDs_mensagem);
}
}
}
else
{
Relatorio.Gera_Relatorio();
Altera_Relatorio = false;
}
}
else
{
using (FormRelPadrao.TFGerenciadorImpressao fImp = new FormRelPadrao.TFGerenciadorImpressao())
{
FormRelPadrao.Relatorio Rel = new FormRelPadrao.Relatorio();
Rel.Altera_Relatorio = this.Altera_Relatorio;
Rel.Nome_Relatorio = "TFProduto";
Rel.NM_Classe = "TFProduto";
Rel.Ident = "REL_CODBARRA";
Rel.Modulo = "EST";
//Numero de copias
int copias = Convert.ToInt32(qtde.Value);
CamadaDados.Estoque.Cadastros.TList_CodBarra lCod = new CamadaDados.Estoque.Cadastros.TList_CodBarra();
(bsCodBarra.DataSource as CamadaDados.Estoque.Cadastros.TList_CodBarra).ForEach(p =>
{
for (int i = 0; i < p.Quantidade; i++)
{
lCod.Add(new CamadaDados.Estoque.Cadastros.TRegistro_CodBarra()
{
Cd_codbarra = p.Cd_codbarra,
Cd_produto = p.Cd_produto,
Ds_produto = p.Ds_produto,
Referencia = p.Referencia,
Vl_venda = p.Vl_venda
});
}
});
BindingSource bs = new BindingSource();
bs.DataSource = lCod;
Rel.DTS_Relatorio = bs;
fImp.St_enabled_enviaremail = true;
fImp.pCd_clifor = string.Empty;
fImp.pMensagem = "IMPRESSÃO ETIQUETA";
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,
"IMPRESSÃO ETIQUETA",
fImp.pDs_mensagem);
Altera_Relatorio = false;
bsCodBarra.MoveNext();
}
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,
null,
fImp.pDestinatarios,
"IMPRESSÃO ETIQUETA",
fImp.pDs_mensagem);
bsCodBarra.MoveNext();
}
}
}
}
}