Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/3279126062824/newLayouttecnologia.css |
Portuguese |
Pagetitle |
---|
...
|
...
Função: GetCbSource
|
Recupera o
...
código-fonte
...
de
...
um
...
bloco
...
de
...
código.
Sintaxe
...
GetCbSource ( < bBlocoDeCodigo> ) --> cRet
...
Bloco de código | ||
---|---|---|
| ||
GetCBSource( < bBlocoDeCodigo > )
|
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referência |
---|---|---|---|---|
bBlocoDeCodigo |
...
bloco de código | Indica a variável que contém o bloco de código para recuperar o código-fonte. | X |
|
Retorno
...
Nome | Tipo | Descrição |
---|---|---|
cRet | caractere | Retorna o código-fonte do bloco de código especificado. Veja detalhes adicionais no tópico de Observações. |
Observações
A string retornada contendo o texto-fonte do bloco de código pode apresentar comportamentos diferenciados com relação a letras maiúsculas e minúsculas. Por exemplo, um bloco de código criado e declarado em código-fonte AdvPL é retornado em caixa alta (letras maiúsculas), mesmo que no código-fonte AdvPL o conteúdo do bloco de código possua letras maiúsculas e minúsculas. Já um bloco de código criado utilizando macro-execução, por exemplo, têm seu conteúdo retornado na íntegra sem alteração em caixa alta ou baixa.
Exemplos
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
User Function Exemplo() Local bCodeBlock :=NilLocal Nil Local cMensagem := "" bCodeBlock := {||Sleep(1000)} //+----------------------------------------------------------------------------+ //|Exemplifica o uso da função GetCbSource | //+----------------------------------------------------------------------------+ cMensagem += "Bloco de código [ " + GetCbSource(bCodeBlock) + " ]" //+----------------------------------------------------------------------------+ //|Apresenta uma mensagem com os resultados obtidos | //+----------------------------------------------------------------------------+ Return MsgInfo(cMensagem, "Exemplo do GetCbSource")Exemplo da função GetCbSource |
Resultado do exemplo
Abrangência
Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server
Veja
...
também
...