Duvida Deletar um Registro Em Duas Tabelas

Discussão em 'Progress 4GL' iniciado por Christiano Piccinin, Fevereiro 5, 2014.

  1. Christiano Piccinin

    Christiano Piccinin Sem Pontuação

    Bom dia pessoal tenho mais um problema aqui... estou fazendo uma trigger de delete,
    eu tenho 2 tabelas "empresa" e "ext-empresa", em ambas tenho os campos "codigo". como faço para que quando eu deletar o registro da tabela "empresa" delete também o registro da "ext-empresa".
    Aguardo Galera!
    Christiano Piccinin, Fevereiro 5, 2014
    #1
  2. valdir_fantin

    valdir_fantin Membro Participativo

    Segue o codigo :

    DEF PARAM BUFFER b-empresa FOR empresa.

    FIND FIRST b-empresa NO-LOCK NO-ERROR.
    IF AVAIL b-empresa THEN
    DO:
    /* MESSAGE b-empresa.codigo VIEW-AS ALERT-BOX. */
    FIND ext-empresa
    WHERE ext-empresa.codigo = b-empresa.codigo
    NO-ERROR.
    IF AVAIL ext-empresa THEN
    DO:
    DELETE ext-empresa.
    END.
    END.

    RETURN 'OK':U.
    valdir_fantin, Fevereiro 5, 2014
    #2
    Christiano Piccinin curtiu isso.
  3. Christiano Piccinin

    Christiano Piccinin Sem Pontuação

    Vlw Obrigadão ai ....
    Christiano Piccinin, Fevereiro 6, 2014
    #3

Compartilhe esta Página