Exemple #1
0
        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!");
            }
        }
Exemple #2
0
        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();
        }
Exemple #3
0
        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();
                        }
                    }
                }
            }
        }