Beispiel #1
0
 public static decimal CalcularCustoProducao(TRegistro_FormulaApontamento val)
 {
     return(TCN_MPrima.MontarListaMPrima(val.Cd_empresa,
                                         val.Id_formulacaostr,
                                         1,
                                         null,
                                         null).Sum(p => p.Vl_custo) +
            TCN_CustoFixo_Direto.Buscar(val.Cd_empresa,
                                        val.Id_formulacaostr,
                                        string.Empty,
                                        string.Empty,
                                        string.Empty,
                                        0,
                                        string.Empty,
                                        null).Sum(p => p.Vl_custo));
 }
Beispiel #2
0
        private void ImprimirRomaneioProducao()
        {
            if (bsOrdemProducao.Current != null)
            {
                using (FormRelPadrao.TFGerenciadorImpressao fImp = new FormRelPadrao.TFGerenciadorImpressao())
                {
                    FormRelPadrao.Relatorio Rel = new FormRelPadrao.Relatorio();
                    Rel.Altera_Relatorio = Altera_Relatorio;
                    BindingSource bs = new BindingSource();
                    bs.DataSource = new TList_OrdemProducao()
                    {
                        bsOrdemProducao.Current as TRegistro_OrdemProducao
                    };
                    Rel.DTS_Relatorio = bs;
                    //Montar lista de materia prima
                    BindingSource bsMPrima = new BindingSource();
                    bsMPrima.DataSource = TCN_MPrima.MontarListaMPrima((bsOrdemProducao.Current as TRegistro_OrdemProducao).Cd_empresa,
                                                                       (bsOrdemProducao.Current as TRegistro_OrdemProducao).Id_formulacaostr,
                                                                       (bsOrdemProducao.Current as TRegistro_OrdemProducao).Qtd_saldoproduzir,
                                                                       null,
                                                                       null);
                    Rel.Adiciona_DataSource("DTS_FICHA", bsMPrima);
                    Rel.Nome_Relatorio          = "REL_PRD_ROMANEIOPRODUCAO";
                    Rel.NM_Classe               = Name;
                    Rel.Ident                   = "REL_PRD_ROMANEIOPRODUCAO";
                    Rel.Modulo                  = Tag.ToString().Substring(0, 3);
                    fImp.St_enabled_enviaremail = true;
                    fImp.pCd_clifor             = string.Empty;
                    fImp.pMensagem              = "ROMANEIO DE PRODUÇÃO";

                    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,
                                           "ROMANEIO DE PRODUÇÃO",
                                           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,
                                           "ROMANEIO DE PRODUÇÃO",
                                           fImp.pDs_mensagem);
                    }
                }
            }
        }