GetSXENum

Função que pega o próximo código sequencial (SXE / SXF)

Exemplo da Rotina:

GetSXENum("Alias", "Campo")

Exemplo 1- Pegando o próximo código do campo A1_COD da tabela SA1:

Begin Transaction
	//Pegando o último código do cliente conforme a SXE / SXF
	cCodigo := GetSXENum('SA1', 'A1_COD')
	 
	//Perguntando se deseja confirmar esse código, para confirmar e atualizar as tabelas SXE / SXF
	If MsgYesNo("Deseja confirmar o código "+cCodigo+"?", "Atenção")
		ConfirmSX8()
	 
	//Senão, volta a numeração onde estava    
	Else
		RollBackSX8()
	EndIf
End Transaction

Observações:

  • Caso tenha dúvidas ou problemas com os exemplos, entre em contato;
  • Se tiver sugestões de rotinas, pode entrar em contato;
Receba novidades

Seja VIP e receba novidades exclusivas por e-Mail gratuitamente.

Junte-se a 4.310 outros assinantes