- /
- /
- /
GetNextAlias
Busca um alias disponível para utilização
Exemplo da Rotina:
cAlias := GetNextAlias()
Exemplo 1- Pegando o alias e colocando em uma query:
//Pega o próximo alias disponível cAliasAux := GetNextAlias() //Faz a query cQuery := " SELECT BM_GRUPO, BM_DESC FROM " + RetSQLName('SBM') + " SBM WHERE SBM.D_E_L_E_T_ = ' ' " //Executa a query apontando para o alias TCQuery cQuery New Alias &cAliasAux //Se houver dados, mostra mensagem If ! (cAliasAux)->(EoF()) MsgInfo("O alias [" + cAliasAux + "] possui dados!", "Atenção") EndIf //Encerra o Alias (cAliasAux)->(DbCloseArea())
Observações:
– Caso tenha dúvidas ou problemas com os exemplos, entre em contato;
– Se tiver sugestões de rotinas, pode entrar em contato;
Receba novidades
Junte-se a 1.894 outros assinantes