[RESOLVIDO] Trigger ou UPC no CD0903 - Atualizar Item

Discussão em 'EMS , HCM e Totvs 11' iniciado por sbordin, Janeiro 24, 2013.

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

    sbordin Sem Pontuação

    Sim vou implementar!
    Muitissímo Obrigado
    Bordin
  2. lima

    lima Membro Participativo

    Precisando estamos aqui...

    Abraços.
  3. ivodarocha

    ivodarocha Membro Participativo

    Pessoal, boa tarde!

    Vocês saberiam me dizer se desta forma funcionaria?

    DEFINE PARAMETER BUFFER b-ped-venda FOR ped-venda.
    DEFINE PARAMETER BUFFER b-ped-venda-old FOR ped-venda.
    DEFINE VAR i AS INT.

    IF NEW(b-ped-venda ) THEN /*Este IF é um create na tabela de ped-venda*/
    ELSE DO:

    IF b-ped-venda.user-impl <> b-ped-venda-old.user-impl THEN
    ASSIGN i = 0.

    IF b-ped-venda.user-alte <> b-ped-venda-old.user-alte THEN
    ASSIGN i = 1.

    IF b-ped-venda.quem-aprovou <> b-ped-venda-old.quem-aprovou THEN
    ASSIGN i = 2.

    IF b-ped-venda.user-preco <> b-ped-venda-old.user-preco THEN
    ASSIGN i = 3.

    CASE i:
    IF i = 0 THEN
    CREATE es-ped-log.
    assign
    es-ped-log.tipo-alt = "0"
    es-ped-log.cod-emitente = b-ped-venda.cod-emitente
    es-ped-log.cod_usuario = b-ped-venda.user-impl
    es-ped-log.data_alt = TODAY
    es-ped-log.hora_alt = string(TIME,"HH:MM:SS")
    es-ped-log.nr-pedcli = b-ped-venda.nr-pedcli.

    IF i = 1 THEN
    CREATE es-ped-log.
    assign
    es-ped-log.tipo-alt = "1"
    es-ped-log.cod-emitente = b-ped-venda.cod-emitente
    es-ped-log.cod_usuario = b-ped-venda.user-alte
    es-ped-log.data_alt = TODAY
    es-ped-log.hora_alt = string(TIME,"HH:MM:SS")
    es-ped-log.nr-pedcli = b-ped-venda.nr-pedcli.

    IF i = 2 THEN
    CREATE es-ped-log.
    assign
    es-ped-log.tipo-alt = "2"
    es-ped-log.cod-emitente = b-ped-venda.cod-emitente
    es-ped-log.cod_usuario = b-ped-venda.quem-aprovou
    es-ped-log.data_alt = TODAY
    es-ped-log.hora_alt = string(TIME,"HH:MM:SS")
    es-ped-log.nr-pedcli = b-ped-venda.nr-pedcli.

    IF i = 3 THEN
    CREATE es-ped-log.
    assign
    es-ped-log.tipo-alt = "3"
    es-ped-log.cod-emitente = b-ped-venda.cod-emitente
    es-ped-log.cod_usuario = b-ped-venda.user-preco
    es-ped-log.data_alt = TODAY
    es-ped-log.hora_alt = string(TIME,"HH:MM:SS")
    es-ped-log.nr-pedcli = b-ped-venda.nr-pedcli.

    END CASE.

    END.


    RETURN "OK":U.
Status do Tópico:
Não esta aberto para novas mensagens.

Compartilhe esta Página