Linha Microsiga Protheus

Árvore de páginas


01. DADOS GERAIS

Produto:

TOTVS Manutenção de Ativos

Linha de Produto:

Linha Protheus

Segmento:

Manufatura

Módulo:

TOTVS Manufatura (Linha Protheus) - Manutenção de ativos (SIGAMNT)

Função:

MNTA420 - O.S. Corretiva


02. DESCRIÇÃO

Descrição:

Ponto de Entrada que permite substituir o produto e local de estoque para integração com solicitação de compras, quando utilizado o insumo do tipo terceiro

Parâmetros:



NomeTipoDescrição
PARAMIXB[1]arrayCabeçalho com campos utilizados no preenchimento dos insumos.
PARAMIXB[2]arrayLista com insumos informados na O.S.
PARAMIXB[3]integerLinha do GetDados que está sendo carregada no momento.



Retorno:



TipoDescrição
array

Retorna informações a serem substituídas na integração do insumo terceiro:

PosiçãoTipoDescrição
array[1]string

Código do produto

array[2]string

Local de estoque





03. DEMAIS INFORMAÇÕES

Exemplo MNTA420O
#include 'protheus.ch'       

User Function MNTA420O()

	Local aItens := ParamIXB[1]
	Local aCabec := ParamIXB[2]
	Local nLine  := ParamIXB[3]
	Local aRet   := {}

	Local nPProd := GDFieldPos( 'TL_XPROFO' , aCabec )
	Local nPAlmo := GDFieldPos( 'TL_XLOCPR' , aCabec )
	Local nPTipo := GDFieldPos( 'TL_TIPOREG', aCabec )
	
	If aItens[nLine,nPTipo] == 'T'

		aAdd( aRet, aItens[nLine,nPProd] )
		aAdd( aRet, aItens[nLine,nPAlmo] )

	EndIf
	
Return aRet


04. ASSUNTOS RELACIONADOS

  • Não se aplica.