cRpcEmpCódigo de empresa.
AdvPL GuiaRpcSetEnv([cRpcEmp],[cRpcFil],[cEnvUser],[cEnvPass],[cEnvMod],[cFunName],[aTables],[lShowFinal],[lAbend],[lOpenSX],[lConnect]) -> lRetAbre ambiente automático com empresa, filial e identidade.
Retorna .T. se conseguiu preparar o ambiente e .F. em falha, sem substituir o tratamento de exceções. O TDN proíbe reinicializar ou encerrar ambientes de rotinas de menu e alerta para Schedule e REST com PrepareIn. Desde 12.1.2510, REST/SOAP já preparado pelo framework pode gerar exceção. cEnvPass aceita token de autenticação somente a partir da LIB 20251117, conforme contrato citado; não é qualquer token externo. O exemplo do GitHub contém credencial literal e não encerra o ambiente no recorte: esses padrões não foram transportados. (Fontes: refs. 1–2.)
RpcSetEnv([cRpcEmp],[cRpcFil],[cEnvUser],[cEnvPass],[cEnvMod],[cFunName],[aTables],[lShowFinal],[lAbend],[lOpenSX],[lConnect]) -> lRetcRpcEmpCódigo de empresa.
cRpcFilCódigo de filial.
cEnvUserUsuário autorizado obtido fora do fonte.
cEnvPassSenha ou token apenas no contrato suportado pela LIB; nunca registrar.
cEnvModMódulo; padrão documentado FAT.
cFunNameIdentificação da rotina e auditoria; padrão RPC.
aTablesAliases a abrir; padrão {}.
lShowFinalControla lMsFinalAuto; padrão .F.
lAbendMensagem de falha de licença; padrão .T.
lOpenSXAbertura de SXs/primeira filial quando não informada; padrão .T.
lConnectConexão ao banco; padrão .T.
Lógico de abertura; exceções continuam possíveis.
#Include "Protheus.ch"
User Function Ed637()
// Bloco nao invocado; contexto e segredo pertencem ao chamador autorizado.
Local bAbrir := {|cEmpresa,cFilial,cUsuario,cSegredo,cModulo| ;
RpcSetEnv(cEmpresa,cFilial,cUsuario,cSegredo,cModulo)}
ConOut(ValType(bAbrir))
Return NilCria bloco B. Não autentica, abre ambiente ou imprime segredo. Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
© 2026 Usina.BR. Todos os direitos reservados. TOTVS, Protheus, Microsiga e seus respectivos logotipos são marcas de seus titulares. O AdvPL Guia é independente e utiliza citações limitadas, atribuídas e justificadas por finalidade educativa. Consulte os Termos de Uso. Termos de Uso
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.