- Fórum
- Protheus/Microsiga/Totvs
- Módulos do Protheus
- Módulo Faturamento
- Como fazer para criar gatilho ou programa para gravar UB_LAUDOMC para C6_LAUDOMC
Perguntas Como fazer para criar gatilho ou programa para gravar UB_LAUDOMC para C6_LAUDOMC
- augustinhaki
- Autor do Tópico
- Desconectado
- Membro Especialista
Menos
Mais
- Postagens: 143
- Obrigados Recebidos: 0
11 anos 8 meses atrás #11220
por augustinhaki
Como fazer para criar gatilho ou programa para gravar UB_LAUDOMC para C6_LAUDOMC foi criado por augustinhaki
Bom dia,
Como fazer para criar gatilho ou programa para gravar UB_LAUDOMC para C6_LAUDOMC
Quando finalizar o pedido no CallCenter, deverá gravar os dados no campo do pedido de venda, item a item.
Grato.
Como fazer para criar gatilho ou programa para gravar UB_LAUDOMC para C6_LAUDOMC
Quando finalizar o pedido no CallCenter, deverá gravar os dados no campo do pedido de venda, item a item.
Grato.
Por favor Acessar ou Registrar para participar da conversa.
- Lorran
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 4
- Obrigados Recebidos: 0
11 anos 8 meses atrás #11223
por Lorran
Respondido por Lorran no tópico Como fazer para criar gatilho ou programa para gravar UB_LAUDOMC para C6_LAUDOMC
Você pode utilizar o ponto de entrada TMKVFIM.
Esse ponto de entrada é executado após a gravação do pedido de vendas.
Esse ponto de entrada é executado após a gravação do pedido de vendas.
Por favor Acessar ou Registrar para participar da conversa.
- lalberto
- Desconectado
- Administrador
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
11 anos 8 meses atrás #11231
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Como fazer para criar gatilho ou programa para gravar UB_LAUDOMC para C6_LAUDOMC
User Function TMKVFIM()
_aSavAreaSC5 := GetArea()
_aSavAreaSA1 := GetArea()
If SC6->(dbSetOrder(1), dbSeek(xFilial("SC6")+SUA->UA_NUMSC5))
While SC6->(!Eof()) .And. SC6->C6_FILIAL == xFilial("SC6") .And. SC6->C6_NUM == SUA->UA_NUMSC5
If SUB->(dbSetOrder(3), dbSeek(xFilial("SUB")+SC6->C6_NUM+SC6->C6_>ITEM))
If RecLock("SC6", .F.)
SC6->C6_LAUDOMC := SUB->UB_LAUDOMC
SC6->(MsUnlock())
Endif
Endif
SC6->(dbSkip(1))
Enddo
Endif
RestArea (_aSavAreaSC5)
RestArea (_aSavAreaSA1)
Return
_aSavAreaSC5 := GetArea()
_aSavAreaSA1 := GetArea()
If SC6->(dbSetOrder(1), dbSeek(xFilial("SC6")+SUA->UA_NUMSC5))
While SC6->(!Eof()) .And. SC6->C6_FILIAL == xFilial("SC6") .And. SC6->C6_NUM == SUA->UA_NUMSC5
If SUB->(dbSetOrder(3), dbSeek(xFilial("SUB")+SC6->C6_NUM+SC6->C6_>ITEM))
If RecLock("SC6", .F.)
SC6->C6_LAUDOMC := SUB->UB_LAUDOMC
SC6->(MsUnlock())
Endif
Endif
SC6->(dbSkip(1))
Enddo
Endif
RestArea (_aSavAreaSC5)
RestArea (_aSavAreaSA1)
Return
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Por favor Acessar ou Registrar para participar da conversa.
- augustinhaki
- Autor do Tópico
- Desconectado
- Membro Especialista
Menos
Mais
- Postagens: 143
- Obrigados Recebidos: 0
11 anos 8 meses atrás #11239
por augustinhaki
Respondido por augustinhaki no tópico Como fazer para criar gatilho ou programa para gravar UB_LAUDOMC para C6_LAUDOMC
Obrigado pessoal, vou testar aqui.
Por favor Acessar ou Registrar para participar da conversa.
- lalberto
- Desconectado
- Administrador
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
11 anos 8 meses atrás #11301
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico Como fazer para criar gatilho ou programa para gravar UB_LAUDOMC para C6_LAUDOMC
E Ae meu brother deu certo ?
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- Módulos do Protheus
- Módulo Faturamento
- Como fazer para criar gatilho ou programa para gravar UB_LAUDOMC para C6_LAUDOMC
Tempo para a criação da página:0.110 segundos