Duvida Derrubar Usuário do Datasul

Discussão em 'EMS , HCM e Totvs 11' iniciado por Damian Cuattrin, Junho 20, 2025.

  1. Damian Cuattrin

    Damian Cuattrin Sem Pontuação

    Quando usávamos o PROGRESS 11 tínhamos uma rotina que montava uma tela com todos os usuários que estavam conectados no banco e depois escolhíamos qual íamos derrubar.

    Com a chegada do PROGRESS12 perdemos essa rotina pois ele fica dando uma ambiguidade em uma tabela ou erro desconhecido. Como se na versão 12 a lista de usuários ficasse em outro lugar.

    o sistema usava a tabela _STARTUP para ir recuperando os dados dos usuários conectados, mas agora com a mudança temos que ficar fazendo manualmente via DOS listando os usuários conectados e derrubando os mesmos um a um de cada banco.

    Antigamente usávamos o código abaixo. Alguém tem uma luz pra saber o que fizeram com a tabela _Startup ?


    if connected('dictdb':U) then do:
    find first dictdb._FileList no-lock no-error.
    Create tt-db.

    if available dictdb._FileList then

    assign tt-db.t-dir = dictdb._FileList._FileList-Name.
    find first _Startup no-lock no-error.
    if available _Startup then
    assign tt-db.t-AiName = _Startup._Startup-AiName
    tt-db.t-Buffs = _Startup._Startup-Buffs
    tt-db.t-AiBufs = _Startup._Startup-AiBuffs
    tt-db.t-BiBufs = _Startup._Startup-BiBuffs
    tt-db.t-BiName = _Startup._Startup-BiName
    tt-db.t-BiTrunc = _Startup._Startup-BiTrunc
    tt-db.t-CrashProt = _Startup._Startup-CrashProt
    tt-db.t-Directio = _Startup._Startup-Directio
    tt-db.t-LockTable = _Startup._Startup-LockTable
    tt-db.t-MaxClients = _Startup._Startup-MaxClients
    tt-db.t-BiDelay = _Startup._Startup-BiDelay
    tt-db.t-MaxServers = _Startup._Startup-MaxServers
    tt-db.t-MaxUsers = _Startup._Startup-MaxUsers
    tt-db.t-BiIO = _Startup._Startup-BiIO
    tt-db.t-APWQTime = _Startup._Startup-APWQTime
    tt-db.t-APWSTime = _Startup._Startup-APWSTime
    tt-db.t-APWBuffs = _Startup._Startup-APWBuffs
    tt-db.t-APWMaxWrites = _Startup._Startup-APWMaxWrites.
    end.
    end.
    end.
  2. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    Use a tabela _Connect

Compartilhe esta Página