Histórico da Página
MATI681OPR - Alterar o código da operação durante o recebimento da mensagem de apontamento de produção.
Características do Requisito
Linha de Produto: | Protheus |
Segmento: | Manufatura |
Módulo: | SIGAPCP |
Parâmetro(s): | PARAMIXB (Array) -> 1: Ordem de produção (H6_OP); 2: Operação (H6_OPERAC); 3: Máquina (H6_RECURSO); 4: Parcial/Total (H6_PT). |
País(es): | Todos |
Banco(s) de Dados: | Todos |
Sistema(s) Operacional(is): | Todos |
Versões/Release: | 11.80.14 |
Ponto de Entrada
Descrição: | É utilizado para alterar o código da operação que foi recebida na mensagem de apontamento de produção. | ||||||||
Localização: | Function MATI681 -> Adapter de apontamento de produção modelo 2. | ||||||||
Programa Fonte: | MATI681 | ||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function MATI681OPR()
Local cNewOper := ""
/*
PARAMIXB PARAMIXB[1] - Ordem de produção (H6_OP)
PARAMIXB PARAMIXB[2] - Operação (H6_OPERAC)
PARAMIXB PARAMIXB[3] - Máquina (H6_RECURSO)
PARAMIXB[4] - Parcial/Total (H6_PT)
*/
If SubStr(PARAMIXB[2], 2,1) == "9"
cNewOper := SOMA1(PARAMIXB[2])
Else
cNewOper := PARAMIXB[2]
EndIf
Return cNewOper