numericNOpcional
Valores numéricos inteiros ou decimais, positivos ou negativos.
FUNDAMENTOPublicado
Tipagem de dados em AdvPL
Local <variável> As <tipo> · Function <nome>(<parâmetro> As <tipo>) As <tipo>Declare tipos de variáveis, parâmetros, retornos, propriedades e métodos para tornar inconsistências mais visíveis.
Visão geral
AdvPL possui tipagem dinâmica, mas permite declarar tipos explicitamente em fontes .PRW. Essas anotações ajudam o compilador e o AppServer a identificar atribuições, parâmetros e retornos incompatíveis. Os tipos documentados são numeric, character, date, codeblock, logical, array, object e variadic. A tipagem de TLPP possui recursos próprios e deve ser consultada separadamente.
Sintaxe
Local <variável> As <tipo> · Function <nome>(<parâmetro> As <tipo>) As <tipo>Parâmetros
character / charCOpcional
Cadeias de caracteres.
dateDOpcional
Valores de data.
codeblock / blockBOpcional
Blocos de código que podem ser avaliados em execução.
logicalLOpcional
Valores lógicos verdadeiro (.T.) ou falso (.F.).
arrayAOpcional
Matrizes que podem reunir valores e estruturas.
objectOOpcional
Instâncias de classes ou objetos de interface.
variadicHOpcional
Parâmetros de quantidade variável em funções.
Variáveis locais tipadas
User Function ExTipos()
Local cMensagem As Character
Local nQuantidade As Numeric
Local dHoje As Date
Local lAtivo As Logical
Local aItens As Array
cMensagem := "Cadastro disponível"
nQuantidade := 3
dHoje := Date()
lAtivo := .T.
aItens := {"A", "B", "C"}
If lAtivo
MsgInfo(cMensagem + " - itens: " + CValToChar(nQuantidade))
EndIf
ReturnResultado esperado
Cada variável declara o tipo esperado, facilitando a leitura e a identificação de atribuições incompatíveis.
Parâmetro e retorno tipados
User Function TotalPedido(nValor As Numeric, nQuantidade As Numeric) As Numeric
Local nTotal As Numeric
nTotal := nValor * nQuantidade
Return nTotalResultado esperado
O protótipo documenta que os dois parâmetros e o retorno são numéricos.
Propriedade e método de classe
Class Pedido
Data nTotal As Numeric
Method New(nValor As Numeric) As Object
EndClass
Method New(nValor As Numeric) Class Pedido
::nTotal := nValor
Return SelfResultado esperado
A propriedade, o parâmetro e o retorno do construtor têm seus tipos declarados.
Incompatibilidade detectável
User Function ExIncompativel()
Local cCodigo As Character
Local nTotal As Numeric
nTotal := "ABC"
cCodigo := 10
ReturnResultado esperado
O compilador pode emitir o aviso W0015 para as conversões incompatíveis entre C e N. O correto é ajustar a origem ou converter o valor conscientemente.
- Use As <tipo> em variáveis locais, parâmetros, retornos de funções, propriedades e métodos de classes.
- A tipagem explícita melhora a leitura do contrato da rotina e permite que o compilador emita avisos de incompatibilidade.
- Em chamadas tipadas, o AppServer também compara o tipo recebido com o protótipo definido.
- A referência oficial informa como requisitos históricos AppServer e pré-processador a partir de dezembro de 2014; confirme o comportamento na versão utilizada.
- Avisos de compilação não devem ser ignorados: uma atribuição character para numeric, ou o inverso, indica divergência real no contrato declarado.
- Segundo a documentação, um parâmetro incompatível pode chegar à rotina como NIL, produzir aviso no console e alterar o fluxo esperado.
- Não confunda a tipagem de arquivos .PRW com a tipagem de TLPP (.tlpp), que possui avanços e documentação própria.
- Tipagem explícita não elimina a necessidade de validar NIL, conteúdo, intervalo e regras de negócio.