MT650PISCA - Controla a geração de OPs intermediárias e empenhos ao realizar um Apontamento de Produção do Chão de Fábrica pelo APP Minha Produção

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAPCP - Planejamento e Controle da Produção

Parâmetro(s):

Nome

Tipo

Descrição

Default

Obrigatório

Referência

PARAMIXB[1]

Model

Model da CYV do SFCA314

Idiomas:

Português (Brasil)

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

O parâmetro MT650PISCA é utilizado para controlar a geração de OPs Intermediárias e Empenhos ao realizar um Apontamento de Produção do Chão de Fábrica (SFC) pelo APP Minha Produção

Localização:

Function A650OpBatch - Efetua validação de Geração de OPs Intermediárias e Empenhos

Quando o parâmetro 'MV_APTEMP' está marcado é apresentada a pergunta "A OP informada não teve as OPs intermediárias criadas. Deseja mesmo produzi-la?", quando é efetuado um apontamento da produção simples, MOD2 ou SFC, pelo Protheus Padrão. Quando o apontamento é efetuado pelo APP Minha Produção, se o parâmetro 'MV_APTEMP' estiver marcado, o sistema permite prosseguir o apontamento mesmo se a OP não possuir as intermediárias e empenhos.

Quando o parâmetro 'MV_APTEMP' está desmarcado é apresentada a mensagem 'Não é possível registrar o apontamento pois não foi gerado empenho para a OP. Ordem de produção sem empenho.' e não permite realizar o apontamento.

O ponto de entrada MT650PISCA permite que a decisão de prosseguir com um apontamento da produção, efetuado pelo SFC, sem OPs intermediárias e empenhos possa ser efetuada pelo usuário, sem interferência do parâmetro 'MV_APTEMP'.

Programa Fonte:

MATA650.PRX

Sintaxe:

MT650PISCA - Controla a geração de OPs intermediárias no SFC pelo APP ( [ ] ) --> lRet

Retorno:

lRet

É esperada como retorno uma variável lógica onde:
.T. →Permite prosseguir com a geração do apontamento sem Empenhos
.F. →Não permite prosseguir com a geração do apontamento sem Empenhos

Variáveis:

Nome		Tipo		Escopo		Pode Alterar		Descrição
lRet		Lógico		Local		Não		.T. -→Permite prosseguir com a geração do apontamento sem Empenhos .F. →Não permite prosseguir com a geração do apontamento sem Empenhos

Observações:

Para fazer a validação de geração de OPs Intermediárias ao incluir uma Ordem de Produção(MATA650), é utilizado o Ponto de Entrada MTA650OK: MTA650OK - Inibe diálogo confirmando criação OPs e SCs

//--------------------------- EXEMPLO 1  ----------------------------------------------------------------------------------//
User Function MT650PISCA() 
Local lRet  

//...customização do cliente 

Return lRet

//--------------------------- EXEMPLO 2  ----------------------------------------------------------------------------------// 
User Function MT650PISCA()

Local oModel := PARAMIXB[01] // Código do Produto.
Local cAponta
Local lRet := F

If Type("_IsPost314") != "L" //Para i
   _IsPost314 := .F.
EndIf

If _IsPost314 
   cAponta := oModel:GetValue('CYV_APONTA')
EndIF

If cAponta == 'S'
   lRet :=.T.   
EndIf

Return lRet    
// Lembrando que este PE é chamado a cada apontamento, dependendo das validações pode afetar a performance.