Histórico da Página

...

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAEST - Estoque Estoque e Custos

Rotina:

Rotina	Nome Técnico
Funções Genéricas	SIGACUSB

País(es):

Brasil

Banco(s) de Dados:

Todos

Sistemas Operacionais:

Todos

...

Descrição:

O Ponto de Entrada MTSLDLOT permite consultar os dados do produto com saldo por lote ou saldo por endereço.

Eventos:

O ponto de entrada pode ser executado em dois momentos: ao Ao avaliar se o produto possui saldo por lote (SB8), ou saldo por endereçamento (SBF).

Programa Fonte:

SIGACUSB.PRX

Parâmetros:

Parâmetro	Tipo	Descrição	Obrigatório
PARAMIXB[1]	Caracter	Aliás da tabela (SB8)	X
PARAMIXB[2]	Caracter	Código do Produto	X
PARAMIXB[3]	Caracter	Lote	X
PARAMIXB[4]	Caracter	Sub-lote	X
PARAMIXB[5]	-	"Em branco"	X
PARAMIXB[6]	-	"Em branco"	X
PARAMIXB[7]	Numérico	Saldo	X
PARAMIXB[8]	Lógico	lConsulta - Indica se está em Consulta de Saldo(Não alterar esse parâmetro)	X

Parâmetro	Tipo	Descrição	Obrigatório
PARAMIXB[1]	Caracter	Aliás da tabela (SBF)	X
PARAMIXB[2]	Caracter	Código do Produto	X
PARAMIXB[3]	Caracter	Lote	X
PARAMIXB[4]	Caracter	Sub-lote	X
PARAMIXB[5]	Caracter	Endereço	X
PARAMIXB[6]	Caracter	Numero de série	X
PARAMIXB[7]	Numérico	Empenho	X
PARAMIXB[8]	Lógico	.F. ("Não alterar esse parâmetro)	X

Retorno:

Nome	Tipo	Descrição	Obrigatório
lRet	Lógico	Se .T. o produto será utilizado. Caso o retorno seja .F. não vai utilizar o produto	Sim

Exemplo:

#Include'Protheus.ch'

User Function MTSLDLOT()

Local aTest:=PARAMIXB

Local lRet :=.F.

Local cTab:=Alias()

If ALLTRIM(aTest[3])<>" LOTE01"

lRet:=.T.

EndIF

Return lRet

Árvore de páginas