Saúde - Planos Linha Datasul - Revisão de Contas Médicas (HRC) - Erro Unidade Interno Não Cadastrada na Manutenção Associativa Conversão Prestador

/* ---------------- VERIFICA SE EXISTE A UNIDADE INTERNO --- */
                find unimed
                     where unimed.cd-unimed = cd-unidade-interno-z
                           no-lock no-error.
                if   avail unimed
                then do:
                       assign nm-unidade-interno-aux = unimed.nm-unimed-reduz.
                       display nm-unidade-interno-aux with frame f-padrao.
                     end.
                else do:
                       message "Unidade interno nao cadastrada."
                               view-as alert-box title " Atencao !!! ".
                       undo, retry.
                     end.