Page tree

Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css
Portuguese

Pagetitle
StrZero
StrZero

Função: StrZero

A

...

partir

...

de

...

um

...

numérico

...

esta

...

função

...

retorna

...

uma

...

string

...

formatada,

...

inserindo

...

zeros

...

à

...

esquerda

...

e/ou

...

o

...

símbolo

...

decimal

...

(".")

...

em

...

suas

...

casas,

...

de

...

acordo

...

com

...

as

...

informações

...

do

...

parâmetro.

Sintaxe

Code Block
collapsefalse
StrZero( <
nValor>
 nValor >, <
nTamanho>
 nTamanho >, [ nDecimal ] )
--> cRet

Parâmetros

...

Nome

Tipo

Descrição

Obrigatório

Referência

nValor

...

numérico

Indica o valor numérico que será convertido para string.

X

 

nTamanho

...

numérico

Indica o tamanho da string será gerada.

X

 

nDecimal

...

numérico

Indica o número de casas após o símbolo decimal.

 

 

Retorno

...

Nome

Tipo

Descrição

cRet

caractere

Retorna uma string a partir do valor numérico e do tamanho informado no parâmetro.

Observações

Observe que <nTamanho> indica o número de caracteres que serão utilizados para representar o valor passado através de <nValor>.

Sempre que o número de caracteres passados em <nTamanho> não for suficiente para representar <nValor> juntamente de seu símbolo e casas decimais, a função retornará um conjunto de caracteres ("*") com o <nTamanho> definido.

Exemplos

Code Block
languagecpp
themeEclipse
linenumberstrue
collapsefalse
#DEFINE CRLF Chr(13)+Chr(10)
User Function Exemplo()
  Local cMensagem := ""
  //+----------------------------------------------------------------------------+
  //|Exemplifica o uso da função StrZero                                         |
  //+----------------------------------------------------------------------------+
  cMensagem += "StrZero(98765432.1, 1, 8) = "  + StrZero(98765432.1, 1, 8)  + CRLF
  cMensagem += "StrZero(9876543.21)       = "  + StrZero(9876543.21)        + CRLF
  cMensagem += "StrZero(987654.321, 3, 6) = "  + StrZero(987654.321, 3, 6)  + CRLF
  cMensagem += "StrZero(98765.4321) = "        + StrZero(98765.4321)        + CRLF
  cMensagem += "StrZero(9876.54321, 5, 4) = "  + StrZero(9876.54321, 5, 4)  + CRLF
  cMensagem += "StrZero(987.654321, 6 ,3) = "  + StrZero(987.654321, 6, 3)  + CRLF
  cMensagem += "StrZero(98.7654321, 7, 2) = "  + StrZero(98.7654321, 7, 2)  + CRLF
  cMensagem += "StrZero(9.87654321, 8, 1) = "  + StrZero(9.87654321, 8, 1)  + CRLF
  cMensagem += "StrZero(0) = "                 + StrZero(0)                 + CRLF
  cMensagem += "StrZero(-9.87654321, 5, 2) = " + StrZero(-9.87654321, 5, 2) + CRLF
  cMensagem += "StrZero(-98.7654321, 4, 1) = " + StrZero(-98.7654321, 4, 1) + CRLF
  cMensagem += "StrZero(-987.654321) = "       + StrZero(-987.654321)       + CRLF
  cMensagem += "StrZero(-9876.54321, 2, 6) = " + StrZero(-9876.54321, 2, 6) + CRLF
  cMensagem += "StrZero(-98765.4321, 1, 5) = " + StrZero(-98765.4321, 1, 5) + CRLF
  cMensagem += "StrZero(-987654.321, 0, 0) = " + StrZero(-987654.321, 0, 0) + CRLF
  cMensagem += "StrZero(-9876543.21, 5, 1) = " + StrZero(-9876543.21, 5, 1) + CRLF
  cMensagem += "StrZero(-98765432.1, 4, 2) = " + StrZero(-98765432.1, 4, 2) + CRLF
  //+----------------------------------------------------------------------------+
  //|Apresenta uma mensagem com os resultados obtidos                            |
  //+----------------------------------------------------------------------------+
Return MsgInfo(cMensagem, "Exemplo do StrZero")

Preview

...

Image Modified

Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

...

Veja também