[RESOLVIDO] Conexão Banco de dados de outra empresa Totvs 11

Olá, pessoal.
Antes no EMS 2 utilizávamos a api btb/btb009za.p para conectar o banco de cadastros de outra empresa.

Hoje no Totvs 11 esta rotina continua?

Esta rotina era utilizada para tirar relatórios gerencias, com informações unificadas.

Olá @contatotalitacamargo o programa BTB009ZA é a API de conexão com bancos externos, função descontinuada no TOTVS11. Hoje, no TOTVS11, basta você cadastrar uma nova empresa e informar os parâmetros de conexão no BTB962AA - Parâmetros Foundation, relacione os usuários à empresa pelo BAS_USUAR_MESTRE e os usuários deverão realizar a troca da empresa para a que contem estes relatórios gerenciais.
Trocando novamente a empresa para a empresa original desconectará estes bancos com dados gerenciais.
Grande abraço.

def new global shared var v_cod_estab_usuar as char FORMAT "x(03)" no-undo.
def new global shared var v_cod_usuar_corren as char FORMAT "x(12)" no-undo.
def new global shared var v_cod_empres_usuar as char FORMAT "x(03)" no-undo.

Run btb/btapi910za.p ( Input usuario, Input senha, Output Table tt-erros).
For Each tt-erros:
Message "Erro: "
String(tt-erros.cod-erro) + " - ":U +
tt-erros.desc-erro
View-as Alert-box Information.
End.

/*Conecta bancos conforme empresa da variavel v_cod_empres_usuar*/
Run btb/btb962za.p (Input '1',
Input v_cod_empres_usuar,
Input 1, /*(1-Login, 2-Consultar, 3-Transferir)*/
Input 1, /*Se a opção for Transferir, é possivel: 1-Conectar ou 2-Desconectar*/
Input '',
Output Table ttErrosConexao).