FAQs - Suporte técnico

MP - PCP - Cómo generar reservas en SD4 desde rutina automática MATA650

Duda
¿Cómo generar las reservas de material en la tabla SD4 cuando la Orden de Producción es generada desde ExecAuto de la rutina MATA650?

Ambiente
Protheus – Planificación y Control de Producción – A partir de la versión 11.80

Solución
Para que el Sistema genere reservas de material en la tabla SD4 al incluir una Orden de Producción desde la rutina automática MATA650, considere habilitar el parámetro MV_EXPLOPU=S e incluir el parámetro {'AUTEXPLODE' ,"S" ,NIL} en el arreglo de campos del ExecAuto.

Bloque de código de ejemplo:

#Include "Protheus.ch"
#include "rwmake.ch"
#include "TbiConn.ch"

User Function xmata650()

Local aMATA650 := {} //Arreglo con los campos

//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³ 3 - Inclusion ³
//³ 4 - Alteracion ³
//³ 5 - Exclusion ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
Local nOpc := 3

Local nOP := GETNUMSC2()
Private lMsErroAuto := .F.

aMata650 := {{'C2_FILIAL' ,"01" ,NIL},;
{'C2_NUM' ,nOP ,NIL},;
{'C2_ITEM' ,"01" ,NIL},;
{'C2_SEQUEN' ,"001" ,NIL},;
{'C2_PRODUTO' ,"01PRODPA ",NIL},;
{'C2_LOCAL' ,"01" ,NIL},;
{'C2_QUANT' ,5 ,NIL},;
{'C2_UM' ,"UN" ,NIL},;
{'C2_DATPRI' ,dDataBase ,NIL},;
{'C2_DATPRF' ,dDataBase ,NIL},;
{'C2_EMISSAO' ,dDataBase ,NIL},;
{'C2_PRIOR' ,"500" ,NIL},;
{'C2_TPOP' ,"F" ,NIL},;
{'AUTEXPLODE' ,"S" ,NIL}}

ConOut("Inicio: " + Time())

//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³ Si es alteración o exclusión, se debe posicionar en el ³
//³ registro de SC2 antes de ejecutar la rutina automática ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
If nOpc == 4 .Or. nOpc == 5
SC2->(DbSetOrder(1)) // FILIAL + NUM + ITEM + SEQUEN + ITEMGRD
SC2->(DbSeek(xFilial("SC2")+"000001"+"01"+"001"))
EndIf

msExecAuto({|x,Y| Mata650(x,Y)},aMata650,nOpc)

If !lMsErroAuto
ConOut("Proceso Finalizado Satisfactoriamente!")
msginfo("Orden de Producción " + nOP + " incluida satisfactoriamente!")
Else
ConOut("Error!")
MostraErro()
EndIf

ConOut("Fin: " + Time())

Return Nil


Conozca más

Para adquirir más conocimiento acceda al siguiente enlace:
MATA650 - Registro de Orden de Producción

 

¿Fue útil este artículo?
Usuarios a los que les pareció útil: 0 de 0

0 Comentarios

Inicie sesión para dejar un comentario.
X Fechar

Olá ,

Há pendência referente a um de seus produtos contratados para a empresa ().

Entre em contato com o Centro de Serviços TOTVS para tratativa.

Ligue! 4003-0015 opção 4 e 9 ou registre uma solicitação para CST – Cobrança – Verificação de pendências financeiras . clique aqui.

TOTVS

X Fechar

Olá ,

Seu contato não está cadastrado no Portal do Cliente como um perfil autorizado a solicitar consultoria telefônica.

Por gentileza, acione o administrador do Portal de sua empresa para: (1)configurar o seu acesso ou (2)buscar um perfil autorizado para registro desse atendimento.

Em caso de dúvidas sobre a identificação do contato administrador do Portal, ligue (11) 4003-0015, opção 7 e, em seguida, opção 4 para buscar o suporte com o time de Assessoria ao Portal do Cliente. . clique aqui.

TOTVS

X Fechar

Olá ,

Para o atendimento de "Consultoria Telefônica" você deverá estar de acordo com o Faturamento.

TOTVS

X Fechar

Olá,

Algo inesperado ocorreu, e o usuario nao foi reconhecido ou você nao se encontra logado

Por favor realize um novo login

Em caso de dúvidas, entre em contato com o administrador do Portal de Clientes de sua empresa para verificação do seu usuário, ou Centro de Serviços TOTVS.

Ligue! 4003-0015 opção 4 e 9 ou registre uma solicitação para CST – Cadastros . clique aqui.

TOTVS

Chat _

Rellene los campos siguientes para iniciar el chat:

Chat _