1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

[RESOLVIDO] SFAPI009 - Atualizar reserva da ordem para alternativa

Discussão em 'EMS , HCM e Totvs 11' iniciado por rodolfo.rcs, Abril 8, 2019.

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

    rodolfo.rcs Membro Participativo

    Pessoal, boa tarde.

    Alguém já utilizou a SFAPI009 e modificou a reserva por uma reserva alternativa ?
    Estou seguindo a documentação da api mas sem sucesso, abaixo segue trecho do código que estou tentando atualizar.

    Se mudar os parâmetros diretos na tt-reserva, na efetivação do reporte é apresentando erro que não conseguiu consumir a reserva original. Por conta disso, o ideal seria atualizar a reserva via API.

    /*Retorna as Reservas*/
    RUN pi-retorna-tt-reservas IN h-sfapi009(OUTPUT TABLE tt-reservas).

    /*Setando depósito de reservas para o depósito de PROCESSO - PRO*/
    FOR EACH tt-reservas
    WHERE tt-reservas.cod-depos = "PRO".

    /*Valida de a bobina está na estrutura da mp*/
    FIND FIRST estrutura NO-LOCK
    WHERE estrutura.es-codigo = p-it-codigo
    AND estrutura.it-codigo = ord-prod.it-codigo NO-ERROR.
    IF NOT AVAIL estrutura THEN DO:
    /*Valida de boibna é item alternativo da reserva padrão*/
    FIND FIRST alternativo NO-LOCK
    WHERE alternativo.al-codigo = p-it-codigo
    AND alternativo.it-codigo = ord-prod.it-codigo NO-ERROR.
    IF AVAIL alternativo THEN DO:
    ASSIGN tt-reservas.it-codigo = "BA-P2067-0".
    RUN pi-recebe-tt-reservas IN h-sfapi009(INPUT table tt-reservas).
    RUN reposicionaReserva IN h-sfapi009(INPUT tt-reservas.nr-ord-prod,
    INPUT 1).
    RUN recebeValorCampos IN h-sfapi009("qtd-aprov", "", ?, p-contador, ?).
    RUN recebeValorCampos IN h-sfapi009("qtd-refgda", "", ?, p-refugo, ?).

    RUN efetivaAlternativoReserva IN h-sfapi009(INPUT ROWID(tt-reservas)).
    RUN retornaTTErro IN h-sfapi009(OUTPUT TABLE tt-erro).
    END.
    END.
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página