Exemple #1
0
        public override int buscarRegistros()
        {
            TList_CadUsuarioCompra lista = TCN_CadUsuarioCompra.Busca(cd_clifor_cmp.Text, login.Text, false, false, false, false, 0, string.Empty, null);

            if (lista != null)
            {
                if (lista.Count > 0)
                {
                    this.Lista = lista;
                    bs_userCompra.DataSource = Lista;
                }
                else
                if ((vTP_Modo == TTpModo.tm_Standby) || (vTP_Modo == TTpModo.tm_busca))
                {
                    bs_userCompra.Clear();
                }
                return(lista.Count);
            }
            else
            {
                return(0);
            }
        }
Exemple #2
0
        public static void ProcessarOrdemCompra(List <TRegistro_Requisicao> val, BancoDados.TObjetoBanco banco)
        {
            bool           st_transacao   = false;
            TCD_Requisicao qtb_requisicao = new TCD_Requisicao();

            try
            {
                if (banco == null)
                {
                    st_transacao = qtb_requisicao.CriarBanco_Dados(true);
                }
                else
                {
                    qtb_requisicao.Banco_Dados = banco;
                }
                //Verificar se existe usuario de compra para o login corrente
                CamadaDados.Compra.TList_CadUsuarioCompra lUser =
                    TCN_CadUsuarioCompra.Busca(string.Empty,
                                               Utils.Parametros.pubLogin,
                                               false,
                                               false,
                                               false,
                                               true,
                                               1,
                                               string.Empty,
                                               qtb_requisicao.Banco_Dados);
                if (lUser.Count < 1)
                {
                    throw new Exception("Não existe usuario de compra configurado para o login " + Utils.Parametros.pubLogin.Trim());
                }
                val.ForEach(p =>
                {
                    //Para cada requisicao criar um objeto ordem compra
                    TRegistro_OrdemCompra rOc = new TRegistro_OrdemCompra();
                    rOc.Id_oc         = null;
                    rOc.Id_requisicao = p.Id_requisicao;
                    if (p.lCotacoes.Count > 0)
                    {
                        TRegistro_Cotacao rCot = p.lCotacoes.Find(v => v.St_registro.Trim().ToUpper().Equals("P"));
                        if (rCot != null)
                        {
                            rOc.Cd_empresa           = rCot.Cd_empresa;
                            rOc.Cd_fornecedor        = rCot.Cd_fornecedor;
                            rOc.Cd_endfornecedor     = rCot.Cd_endfornecedor;
                            rOc.Cd_condpgto          = rCot.Cd_condpgto;
                            rOc.Cd_moeda             = rCot.Cd_moeda;
                            rOc.Cd_portador          = rCot.Cd_portador;
                            rOc.Cd_transportadora    = rCot.Cd_transportadora;
                            rOc.Cd_endtransportadora = rCot.Cd_endtransportadora;
                            rOc.Tp_frete             = rCot.Tp_frete;
                            rOc.Vl_frete             = rCot.Vl_frete;
                            rOc.Prazo_entrega        = rCot.Prazo_entrega;
                            rOc.Quantidade           = p.Qtd_aprovada;
                            rOc.Vl_unitario          = rCot.Vl_unitario_cotado;
                            rOc.Dt_oc       = DateTime.Now;
                            rOc.St_registro = "A";
                        }
                    }
                    else if (p.lReqneg.Count > 0)
                    {
                        TRegistro_Requisicao_X_Negociacao rReqNeg = p.lReqneg.Find(v => v.St_registro.Trim().ToUpper().Equals("A"));
                        if (rReqNeg != null)
                        {
                            rOc.Cd_empresa                  = rReqNeg.Cd_empresa;
                            rOc.Cd_fornecedor               = rReqNeg.Cd_fornecedor;
                            rOc.Cd_endfornecedor            = rReqNeg.Cd_endfornecedor;
                            rOc.Cd_condpgto                 = rReqNeg.Cd_condpgto;
                            rOc.Cd_moeda                    = rReqNeg.Cd_moeda;
                            rOc.Cd_portador                 = rReqNeg.Cd_portador;
                            TRegistro_PrazoEntrega rEntrega = rReqNeg.lPrazoEntrega.Find(x => x.Cd_empresa.Trim().Equals(p.Cd_empresa.Trim()));
                            if (rEntrega != null)
                            {
                                rOc.Cd_transportadora    = rEntrega.Cd_transportadora;
                                rOc.Cd_endtransportadora = rEntrega.Cd_endtransportadora;
                                rOc.Tp_frete             = rEntrega.Tp_frete;
                                rOc.Prazo_entrega        = rEntrega.Prazo_entrega;
                            }
                            rOc.Quantidade  = p.Qtd_aprovada;
                            rOc.Vl_unitario = rReqNeg.Vl_unitario_negociado;
                            rOc.Dt_oc       = DateTime.Now;
                            rOc.St_registro = "A";
                        }
                    }
                    TCN_OrdemCompra.Gravar(rOc, qtb_requisicao.Banco_Dados);
                    //Alterar status da requisicao para ordem compra
                    p.St_requisicao       = "OC";
                    p.Cd_clifor_comprador = lUser[0].Cd_clifor_cmp;
                    AlterarRequisicao(p, qtb_requisicao.Banco_Dados);
                });
                if (st_transacao)
                {
                    qtb_requisicao.Banco_Dados.Commit_Tran();
                }
            }
            catch (Exception ex)
            {
                if (st_transacao)
                {
                    qtb_requisicao.Banco_Dados.RollBack_Tran();
                }
                throw new Exception("Erro processar ordem compra: " + ex.Message.Trim());
            }
            finally
            {
                if (st_transacao)
                {
                    qtb_requisicao.deletarBanco_Dados();
                }
            }
        }