Linha Microsiga Protheus

Árvore de páginas

MTI650LOTE - Adicionar lote na mensagem de Ordens de produção

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAPCP - Planejamento e Controle da Produção

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 enviar um lote da ordem de produção, na mensagem de integração de ordens de produção através da tag LotCode.

Localização:

Function MATI650 -> Adapter de integração das ordens de produção. 

Programa Fonte:

MATI650.prw

Retorno:

Nome

Tipo

Descrição

Obrigatório

 cLote

Char

Código do lote que será enviado na mensagem de ordens de produção

Sim

 

Exemplo:

#Include 'Protheus.ch'

User Function MTI650LOTE()
Local cPont := PARAMIXB //Ponteiro para recuperar as informações da SC2. Utilização: &(cPont+"(C2_QUANT)")
Local cLote := ""
Local aArea := GetArea()

If Rastro(&(cPont+"(C2_PRODUTO)"))
   cLote := &(cPont+"(C2_NUM+C2_ITEM+C2_SEQUEN)")
EndIf

RestArea(aArea)
Return cLote