0 votos
perguntado em ADVPL por (630 pontos)

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 

Entre ou cadastre-se para responder esta pergunta.

34 perguntas

28 respostas

22 comentários

77 usuários

Seja bem vindo a dbSeek, seu StackOverflow de Protheus, onde você pode fazer perguntas e receber respostas de outros membros da comunidade, alcançando sempre o melhor resultado.
...