Something

sc_lookup(Botao,"Select INSERE,
                         ATUALIZA,
                         DELETA,
                         IMPRIME,
                         PDFBP,
                         PDFCR,
                         XLS,
                         NAVEGA,
                         FILTRO
                  From AUTORIDADES
                  Where USUARIO_LOGIN = '[UsuarioSessao]'
                  And PROGRAMA_NOME = '[AplicacaoSelecionada]'","Oracle");

$INSERE = {Botao[0][0]};
$ATUALIZA = {Botao[0][1]};
$DELETA = {Botao[0][2]};
$IMPRIME = {Botao[0][3]};
$PDFBP = {Botao[0][4]};
$PDFCR = {Botao[0][5]};
$XLS = {Botao[0][6]};
$NAVEGA = {Botao[0][7]};
$FILTRO = {Botao[0][8]};

sc_btn_display ('insert', '$INSERE');
sc_btn_display ('update', '$ATUALIZA');
sc_btn_display ('delete', '$DELETA}');
sc_btn_display ('print', '$IMPRIME');
sc_btn_display ('pdfbw', '$PDFBP}');
sc_btn_display ('pdf', '$PDFCR');
sc_btn_display ('back', '$NAVEGA');
sc_btn_display ('forward', '$NAVEGA');
sc_btn_display ('filter', '$FILTRO');