Postagens:
Respostas:
Danusa Ferreira · Jun. 22
Danusa Ferreira · Abr. 20
Bom dia Yuri, não consegui abrir a página de referencia (https://www.intersystems.com/de/resources/detail/healthshare-managed-con...).
Poderia verificar e corrigir?
Obrigada!
Danusa Ferreira · Abr. 11
Já se imaginaram participando do Global Summit da InterSystems??
Essa é a chance!
Seguidores:
Danusa ainda não tem seguidores.
Seguindo:
Emblemas Global Masters:



Oi Alexandre!
O que me veio em mente rapidamente foi criar um código que transforme a sua string/frase em uma lista de palavras para depois percorrer a lista contando o numero de letras de cada palavra da lista.
Algo assim:
Set frase = "Como contar a palavra com maior numero de caracteres"
#; cria uma lista da string com delimitador " " espaço
Set fraseList = $Listfromstring(frase," ")
#; percorre a lista e imprime a posição da palavra na frase (i), o tamanho da palavra ($length) e a palavra ($listget(fraseList,i))
For i=1:1:$Listlength(fraseList) w !,i_"- tamanho:"_$length($listget(fraseList,i))_"->"_$lg(fraseList,i)
O código acima pode ser executado no Terminal.
Mas se você somente desejar saber o maior tamanho, basta salvar o tamanho em uma variável comparando os tamanhos. Exemplo:
Set maiorTamanho=""
For i=1:1:$Listlength(fraseList) {
set tamanho=$length($listget(fraseList,i))
if tamanho>maiorTamanho {
set maiorTamanho=tamanho
set maiorPalavra=$listget(fraseList,i)
}
}
Write !,maiorPalavra_" - tamanho: "_maiorTamanho
Espero que ajude! :-)