Duvida Log na inclusão/alteração da reserva da OP

A ideia seria a seguinte:

No evento de exibição das reservas, você armazena as reservas atuais (numa temp-table) junto com o RowID de cada registro.
No evento de alteração das reservas:
- Verifica se essa reserva foi alterada e grava o log com o valor antigo e o valor novo.
- Se é uma registro novo de reserva, grava no log que a reserva X da quantidade Y do item Z é novo
- Se não encontrar a reserva, grava no log que o registro foi excluído

o program-name funciona dentro das triggers, pra saber quem tá executando a trigger:

Código:

    assign nivel = 1.
    assign executaRotina = yes.
    assign recebimento   = no.

    repeat while program-name(nivel) <> ?:

        if program-name(nivel) begins 'ccp/cc0325rp.p' then do:
            assign executaRotina = no.
        end.
        if program-name(nivel) begins 'rep/re0402rp.p' then do:
            assign recebimento = yes.
        end.

        if program-name(nivel) begins 'rep/re1005rp.p' then do:
            assign recebimento = yes.
        end.

        if program-name(nivel) begins 'ccp\cc0325rp.p' then do:
            assign executaRotina = no.
        end.
        if program-name(nivel) begins 'rep\re0402rp.p' then do:
            assign recebimento = yes.
        end.

        if program-name(nivel) begins 'rep\re1005rp.p' then do:
            assign recebimento = yes.
        end.
        assign nivel = nivel + 1.
    end.