Pular para o conteúdo principal

Postagem em destaque

BlackTDN :: LeetCode 23: Mesclando K Listas Ordenadas com Harbour/xBase e Reutilização de Código

_Créditos das imagens: ChatGPT **Título:** LeetCode 23: Mesclando K Listas Ordenadas com Harbour/xBase e Reutilização de Código **Introdução** Olá, entusiastas de Harbour/xBase e desafios de programação! Depois de explorarmos como mesclar duas listas ordenadas no [nosso post sobre o LeetCode 21](https://www.blacktdn.com.br/2025/03/blacktdn-leetcode-21-merge-two-sorted.html), vamos dar um passo adiante e enfrentar um problema um pouco mais complexo: o LeetCode 23 - Merge K Sorted Lists. Neste artigo, vamos desvendar uma implementação em Harbour/xBase para este desafio, demonstrando como podemos inteligentemente reutilizar a solução que já construímos para o problema 21. Veremos como a modularidade e a construção sobre soluções anteriores podem simplificar problemas mais complexos. **O Problema: LeetCode 23 - Merge K Sorted Lists** O desafio é o seguinte: dado um array (`aLists` em nossa implementação) contendo `k` listas encadeadas, onde cada lista já está ordenada em ordem cres...

Protheus :: "Script Linux CentOs/RedHat start/stop/restart TotvsdbAccess/TopConnect"

Para aqueles que usam o SGBD da Oracle e o TotvsdbAccess/TopConnect em Linux, um pequeno "script" para "start,stop and restart" do "daemon" do TotvsdbAccess/TopConnect. Adapte-o às suas necessidades e, atenção para a seguinte linha:

NLS_LANG='Brazilian Portuguese_Brazil.WE8ISO8859P1'; export NLS_LANG

Altere-a conforme a configuração de NLS_LANG configurada no SGBD

#script file: dbacces
#!/bin/bash
# Avoid using root's TMPDIR

unset TMPDIR

RETVAL=0

TMP=/tmp; export TMP
TMPDIR=$TMP; export TMPDIR
ORACLE_BASE=/u01/app/oracle; export ORACLE_BASE
ORACLE_HOME=$ORACLE_BASE/product/10.2.0/db_1; export ORACLE_HOME
PATH=/usr/sbin:$PATH; export PATH
PATH=$ORACLE_HOME/bin:$PATH; export PATH
LD_LIBRARY_PATH=$ORACLE_HOME/lib32:/lib:/usr/lib; export LD_LIBRARY_PATH
NLS_LANG='Brazilian Portuguese_Brazil.WE8ISO8859P1'; export NLS_LANG

start() {

ulimit -n 65526
ulimit -s 1024
ulimit -c 0
ulimit -f unlimited
ulimit -v unlimited
ulimit -u unlimited
ulimit -t unlimited
ulimit -m unlimited
ulimit -l unlimited
ulimit -d unlimited

KIND="TotvsdbAccess"
echo -n $"Iniciando $KIND: "
cd /totvs/dba/dbaccess/multi
/totvs/dba/dbaccess/multi/totvsdbaccess &
RETVAL=$?
echo
}

stop() {
KIND="TotvsdbAccess"
echo -n $"Parando $KIND: "
killall /totvs/dba/dbaccess/multi/totvsdbaccess
RETVAL=$?
echo
echo ""
return $RETVAL
}

restart() {
stop
start
}

case "$1" in
start)
start
;;
stop)
stop
;;
restart)
restart
;;
*)
echo $"Usage: $0 {start|stop|restart}"
exit 2
esac

exit $?

Comentários

  1. ...tendi nada!

    Isso seria um path do dbaccess?
    (/totvs/dba/dbaccess/multi/totvsdbaccess)

    abs,

    ResponderExcluir
  2. Não. À época deste "post" o dbaccess era denominado totvsdbacces e/ou topconnect. Então, basta substituir totvsdbacces pelo verdadeiro nome da aplicação. Hoje dbaccess, amanhã ???

    []s

    ResponderExcluir
  3. Tem um script desse pra subir o appserver?

    ResponderExcluir

Postar um comentário

Postagens mais visitadas