Ponto de Entrada para montar vetor com componentes de Valor Informado.

#Include 'Protheus.ch'

User Function TMSVLINF()
Local cLojaCli := PARAMIXB[1]
Local cCodCli := PARAMIXB[2]
Local cServic := PARAMIXB[3]
Local cCodNeg := PARAMIXB[4]
Local cTipFre := PARAMIXB[5]
Local cFilOri := PARAMIXB[6]
Local cDoc := PARAMIXB[7]
Local cSerie := PARAMIXB[8]
Local cProduto := PARAMIXB[9]

Local aRet := {}

If cProduto == "0000001"
Aadd(aRet, {"07", 10, 0 .F. } )
EndIf

Return aRet

Português(Brasil)

Versões_Anteriores

Todos

Todas

Array contendo as seguintes posições:

• [01] = Código do Componente de Valor Informado
• [02] = Qtde. do valor informado
• [03] = .T.(Deletado) - .F.(Não Deletado)

cLojaCli - Caracter - Loja do Cliente Devedor
cCodCli - Caracter - Codigo do Cliente Devedor
cServic -  Caracter - Serviço
cCodNeg - Caracter - Código da Negociação
cTipFre - Caracter - Tipo de Frete
cFilOri - Caracter - Filial Documento
cDoc - Caracter - Documento
cSerie - Caracter - Serie
cProduto - Caracter - Produto

TMSA200.PRW