Pedido não disponível para pré-faturamento

Situação:

Os pedidos indicados abaixo estão liberados para a Logística, entretanto, estão pendentes de integração, constam com status “ WAM-Pedido não disponível para pré-faturamento ”:

Possíveis Soluções:

Estes pedidos, estão com um problema que começou a aparecer alguns dias atrás e o Jesus já tinha falado com o Emerson, sobre pedidos de origem do "moun", que tiveram credito bloqueado automaticamente e que depois que foram liberados manualmente pelo cm0201, continuam com o dsp-pre-fat = no. O Emerson falou que já fez um acerto na trigger para acertar isso, mas ainda não subiu em produção. Ele também liberou alterarmos estes pedidos para dsp-pre-fat = yes.

Verificar a origem do pedido.

FOR EACH mopd-ext-ped-venda
    WHERE mopd-ext-ped-venda.nr-pedcli = "número do pedido pai" NO-LOCK.
    DISP  mopd-ext-ped-venda.nr-pedcli mopd-ext-ped-venda.nome-programa.
END.

FOR EACH ped-venda
   WHERE ped-venda.nr-pedcli = "número do pedido pai" NO-LOCK.
     DISP ped-venda.cod-estabel  
         ped-venda.cod-emitente 
         ped-venda.nr-pedcli    
         ped-venda.cod-sit-ped 
         ped-venda.cod-sit-aval WITH SCROLLABLE.
END.

Verificar a Situação Avaliação de Crédito e Origem do Pedido em Lote.

Situação (Aberto = 1 / Suspenso = 5)

Situação Aval Credito (Aprovado = 3 / Não Aprovado = 4)

DEF TEMP-TABLE tt-pedido
         FIELD nr-pedcli LIKE ped-venda.nr-pedcli.
  
INPUT FROM "i:\leopoldo\pedidos.csv". // Lista de códigos de pedidos
REPEAT:
    CREATE tt-pedido.
    IMPORT DELIMITER ";" tt-pedido.
END.
INPUT CLOSE.

OUTPUT TO i:\leopoldo\sit_aval_pedidos.csv.
PUT UNFORMATTED
               "ESTAB" ";"
               "CLIENTE" ";"
               "PEDIDO" ";"
               "SITUACAO" ";"
               "SIT AVAL" ";"
               "NOME PROG" SKIP.

FOR EACH tt-pedido WHERE
         tt-pedido.nr-pedcli <> "": //Diferente de branco na tt-pedido
    
    PROCESS EVENTS. // Para não travar a tela quando lê muitos dados

FOR EACH ped-venda
   WHERE ped-venda.nr-pedcli = tt-pedido.nr-pedcli NO-LOCK.
    
    FOR EACH mopd-ext-ped-venda
    WHERE mopd-ext-ped-venda.nr-pedcli = tt-pedido.nr-pedcli NO-LOCK.

   PUT UNFORMATTED
         ped-venda.cod-estabel            ";"
         ped-venda.cod-emitente           ";"
         ped-venda.nr-pedcli              ";"
         ped-venda.cod-sit-ped            ";"
         ped-venda.cod-sit-aval           ";"
         mopd-ext-ped-venda.nome-programa SKIP.
    END.
END.
END.
OUTPUT CLOSE.

Alterar para disponível para faturamento

Alterar para disponível para faturamento em Lote

Depois que altera, muda oara Wan-Aguard. Processo Integração.

Então o RPW roda, ficando como enviado e em seguida Integração ok, quando recebe retorno do Wamas que recebeu a integração.

Depois que recebe o retorno do Wamas, vai para a fila de faturamento automático.

Faturou automático.