cAliasCaractereOpcional
Alias da tabela.
FUNçãOEm revisão
NextNumero
NextNumero([cAlias],[nOrdem],[cNomeCpo],[lSomar],[cVar]) -> cNumeroObtém um candidato a próximo número sequencial.
Visão geral
A referência histórica P8.11/P10 descreve alias, ordem, campo, lSomar e cVar. Com lSomar verdadeiro, devolve o próximo número; com falso, devolve cVar se ainda não existir ou calcula o próximo se já existir. Em tabela vazia, retorna 1 com zeros conforme a largura do campo. Esse contrato não documenta reserva atômica entre usuários. O exemplo comunitário consulta SC7; a adaptação prepara um bloco e não lê tabelas nem cria pedidos. (Fontes: refs. 1–2.)
Sintaxe
NextNumero([cAlias],[nOrdem],[cNomeCpo],[lSomar],[cVar]) -> cNumeroParâmetros
nOrdemNuméricoOpcional
Ordem do índice compatível com a chave.
cNomeCpoCaractereOpcional
Campo sequencial.
lSomarLógicoOpcional
Verdadeiro calcula próximo; falso verifica cVar.
cVarCaractereOpcional
Valor candidato quando lSomar é falso.
Retorno
Caractere com o número calculado, preenchido à esquerda conforme o campo.
Exemplo comentado
#Include "Protheus.ch"
User Function Ed558()
// Somente preparar; indice e campo devem ser conferidos em homologacao.
Local bProximo := {|cAlias,nOrdem,cCampo| NextNumero(cAlias,nOrdem,cCampo,.T.)}
ConOut(ValType(bProximo))
Return NilResultado esperado
Imprime B. O bloco não é avaliado e não reserva numeração. Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
- Definir uma estratégia documentada de reserva, confirmação, cancelamento e concorrência para a rotina real. Não tratar consulta de candidato como garantia de unicidade; preservar a área e verificar retorno.
- Em revisão: exemplo editorial não compilado nem executado em Protheus. Conferir includes, release, RDD e contexto antes de homologar.
Comentários
Ainda não há comentários aprovados.
Entre com Google ou Microsoft para comentar.