| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | MATA680 - Produção PCP Mod. 1 MATA681 - Produção PCP Mod. 2 |
| País: | Todos |
| Ticket: | 23236584 |
| Issue: | DMANPCP2-102 |
Permite realizar validações no Encerramento da Ordem de Produção.
| Localização | A680Encer - Encerramento de OPs O ponto de entrada é acionado no início da função A680Encer, antes de realizar o processamento do encerramento. | ||||||||
|---|---|---|---|---|---|---|---|---|---|
| Parâmetros | Não se aplica. | ||||||||
| Retorno | .
. | ||||||||
| Observação 1 | A função A680Encer é acionada pela opção do menu Encerrar do MATA680 e MATA681. | ||||||||
| Observação 2 | Quando utilizada a integração com o TOTVS MES, o encerramento da ordem de produção pode ser realizada pela mensagem ProductionAppointment. A tag CloseOperation indica se a operação/OP será encerrada. Para encerrar a OP será verificado se existe apontamento na última operação, então será executada a opção Encerrar do MATA681 para realizar o encerramento da OP. Portanto, ao encerrar uma ordem de produção pelo TOTVS MES, também é acionado o ponto de entrada A680ENCOP. Importante: Ao utilizar a função HELP, a integração com o TOTVS MES interpreta que houve uma inconsistência no processamento e retorna a mensagem do HELP como um ERRO. |
User Function A680ENCOP()
Local lRet := .T.
//A tabela SC2 está posicionada com a OP a ser encerrada.
If SC2->C2_OP == '00004901001 '
HELP(' ',1,"ATENCAO",, 'Nao e possivel encerrar a OP - PE A680ENCOP.',2, 0,,,,,, {"Verificar PE A680ENCOP"})
lRet := .F.
EndIf
Return lRet |