Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Alexandre dos Santos

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Alexandre dos Santos

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Descrição:

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

Parâmetros:
NomeTipoDescrição
PARAMIXB[1]integerRECNO do registro na tabela STL.
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

...

Bloco de código
languagesql
titleExemplo MNTA2650MNTA3400
linenumberstrue
#include 'protheus.ch'     

User Function MNTA2650MNTA3400()

	Local cAliasaRet   := {}
	Local nRecNo := ParamIXB[1]

	Local aRet   := {}dbSelectArea( 'STL' )
	dbGoTo( nRecNo )
	
	If (cAlias)STL->TL_TIPOREG == 'T'

		aAdd( aRet, (cAlias)STL->TL_XPROFO )
		aAdd( aRet, (cAlias)STL->TL_XLOCPR )

	EndIf
	
Return aRet

...