Perguntas Contador automático por grupo de produto

Mais
7 anos 1 mês atrás #31835 por marcelo.silva
Bom dia,

Preciso criar codificação automática no cadastro de produtos considerando o grupo de produtos, Ex:

Seleciono o grupo 0001, se já existem 2 produtos cadastrados com esse grupo o campo B1_COD recebe 0001+000003, deve identificar o numero do ultimo produto incluído para um determinado grupo. Agradeço a ajuda.

Por favor Acessar ou Registrar para participar da conversa.

Mais
7 anos 3 semanas atrás #31869 por admin
Cria um gatilho no campo B1_GRUPO:

Segue uma Função, não testada ok;


#include "rwmake.ch"

User Function GCPROD()
Local cCodigo := ""
Local aArea := GetArea()

cQuery := " "
cQuery += " SELECT MAX(B1_COD) AS COD "
cQuery += " FROM "+RetSQLName("SB1")+" SB1 "
cQuery += " WHERE SB1.D_E_L_E_T_ = '' "
cQuery += " AND B1_FILIAL = '" + xFilial("SB1") + "'"
cQuery += " AND B1_GRUPO = '" + M->B1_GRUPO + "'"

cQuery := ChangeQuery(cQuery)

dbUseArea( .T.,"TOPCONN",TCGENQRY(,,cQuery),"TRB",.F.,.T.)

dbSelectArea("TRB")
dbGoTop()

If Empty(TRB->COD)
cCodigo := M->B1_GRUPO+"000001"
Else
cIncremen := Strzero(Val(SubStr(TRB->COD,6,6))+1,6)
cCodigo := M->B1_GRUPO + cIncremen
EndIf

dbCloseArea("TRB")
RestArea(aArea)

Return(cCodigo)

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.118 segundos
Joomla templates by a4joomla