Linha de Produto:

Protheus

Módulo:

SIGAPCP

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Descrição:

LOCALIZAÇÃO: Function MATI650 -> Adapter de integração das ordens de produção. 

DESCRIÇÃO: É utilizado para alterar o código do recurso e a descrição da operação que são enviados na lista de operações da ordem. As TAGS do XML que correspondem à estas informações são: Recurso -> MachineCode; Descrição da operação -> ActivityDescription.

Exemplos:

#Include 'Protheus.ch'

User Function MTI650RCOP()
Local cNumOP := PARAMIXB[1] //Número da ordem de produção (C2_NUM+C2_ITEM+C2_SEQUEN)
Local cRoteiro := PARAMIXB[2] //Código do roteiro de fabricação (C2_ROTEIRO OU HY_ROTEIRO OU H8_ROTEIRO)
Local cOperacao := PARAMIXB[3] //Código da operação (G2_OPERAC OU HY_OPERAC OU H8_OPER)
Local cDscOper := PARAMIXB[4] //Descrição da operação (G2_DESCRI OU HY_DESCRI)
Local cRecurso := PARAMIXB[5] //Código do recurso (G2_RECURSO OU HY_RECURSO OU H8_RECURSO)

/*
Recurso que será retornado. (MachineCode)
OBS: Deve retornar uma string, caso contrário o valor será desconsiderado.
*/
Local cMachine := ""

/*
Descrição da operação que será retornado. (ActivityDescription)
OBS: Deve retornar uma string, caso contrário o valor será desconsiderado.
*/
Local cDenOper := ""

Local aRet := {}

cMachine := AllTrim(cRecurso) + "PE"
cDenOper := "DESC " + AllTrim(cRecurso) + "PE"

aRet := {cMachine,cDenOper}

/*
O retorno deste P.E. deve ser um Array. Caso contrário, os valores serão desconsiderados.
Na posição 1 do array, deverá retornar o código do recurso.
Na posição 2 do array, deverá retornar a descrição da operação.
*/

Return aRet