Pessoal, estou com uma dúvida no fonte.
Seria um fonte para gerar um numero sequencial, se escolher um tipo, por exemplo "FT" gera um modelo de sequencial, se escoler "FG" gera outro tipo de sequencial.
Será que alguem poderia me dizer o que devo fazer nesse fonte ?
#Include "Protheus.ch"
User Function CodSeq(cGrupoProd)
Local cRet := ""
Local cSeqProd
// MV_XSEQFRT - SEQUENCIAL DO CODIGO DE PRODUTO DO TIPO FRUTA
// MV_XSEQOUT - SEQUENCIAL DO CODIGO DE PRODUTOS QUE NAO SAO FRUTAS
If cGrupoProd == "FT"
cSeqProd := GetMV("MV_XSEQFRT") // Retorna o conteudo do parametro
cSeqProd := Soma1(cSeqProd) // Incrementa mais 1 no sequencial
PutMV("MV_XSEQFRT",cSeqProd) // Alimanta o parametro com um novo conteudo
Else
EndIf
cRet := cSeqProd
Return cRet
