[RESOLVIDO] Campo de Pedido de compras

Discussão em 'EMS , HCM e Totvs 11' iniciado por Fernando Pinhatti, Março 18, 2014.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. Fernando Pinhatti

    Fernando Pinhatti Membro Participativo

    Bom dia, alguém pode me informar qual o campo e tabela onde verifico se um pedido de compras está aprovado ou pendente de aprovação?

    No aguardo
    Fernando Pinhatti, Março 18, 2014
    #1
  2. dilonei

    dilonei Sem Pontuação

    Bom dia,

    Isso é controlado na tabela doc-pend-aprov, campos num-pedido e ind-situacao.
    dilonei, Março 18, 2014
    #2
  3. eduardo.leite

    eduardo.leite Equipe de Suporte Moderador Equipe de Suporte

    Veja abaixo a logica que retorna se o PC está pendente de aprovacao.

    Código:
    def var l-pendente              as logical      no-undo.

find first param-compra no-lock no-error.

if param-compra.log-1 then do:

    for each ordem-compra no-lock
      where ordem-compra.num-pedido = pedido-compr.num-pedido:

        if pedido-compr.emergencial then
            run cdp/cdapi172 (6, rowid(ordem-compra), output l-pendente).
        else
            run cdp/cdapi172 (4, rowid(ordem-compra), output l-pendente).

        if l-pendente then do:

            run utp\ut-msgs.r (input "show",
                              input 17006,
                              input "Pedido de Compra Nao Aprovado!" + "~~" +
                                    "O pedido de compra " + string(pedido-compr.num-pedido) + " esta pendente de aprovacao e nao podera ser impresso!").

            leave.

        end.
        else
            leave.

    end.

end.

if l-pendente then next.
    eduardo.leite, Março 18, 2014
    #3
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página