[RESOLVIDO] Criar novas parcelas

Discussão em 'EMS , HCM e Totvs 11' iniciado por Rogerio, Janeiro 10, 2011.

Status do Tópico:
Não esta aberto para novas mensagens.
Página 2 de 2
  1. Rogerio

    Rogerio Moderator Moderador Equipe de Suporte

    Cara agora deu certo...

    Abusando da sua boa vontade...
    E antes de eu rodar essa função eu quiser eliminar todas as parcelas que já existem para aquela ordem de compra???
    Rogerio, Janeiro 10, 2011
    #7
  2. costa

    costa Sem Pontuação

    Cara veja se isso te ajuda, se não amanhã com mais tempo escrevo algo melhor. Mas basicamente, posiciona, carrega e deleta

    FIND FIRST prazo-compra WHERE prazo-compra.numero-ordem = ttOrdemCompra.numero-ordem NO-LOCK NO-ERROR.

    IF AVAILABLE prazo-compra THEN DO:
    RUN repositionRecord IN hboin356 (INPUT ROWID(prazo-compra)).
    END.
    RUN getRecord IN hboin356 (Output table ttPrazoCompra).
    RUN setRecord IN hboin356 (INPUT TABLE ttPrazoCompra).


    EMPTY TEMP-TABLE rowErrors.
    RUN emptyRowErrors IN hboin356.

    IF NOT AVAILABLE prazo-compra THEN
    RUN validateRecord IN hboin356 (INPUT "delete":U).

    RUN deleteRecord IN hboin356.

    RUN getRowErrors IN hboin356 (OUTPUT TABLE RowErrors).
    ASSIGN lErro = NO.
    etc.....
    costa, Janeiro 10, 2011
    #8
Página 2 de 2
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página