Ponto-de-Entrada: A650ADCOL - Gera empenhos de SC's

 

Versões:Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países:Todos
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todos
Idiomas:Espanhol , Inglês

 

Descrição:

LOCALIZAÇÃO : Function A650ACols()

EM QUE PONTO : O ponto de entrada A650ADCOL é executado após a inclusão de cada linha do aCols (usado para gerar empenhos e SC's), permitindo executar qualquer processamento ou até fazer a manipulação do conteúdo do aCols que acabou de ser incluído.

Eventos


 

Programa Fonte
MATA650.PRX
Sintaxe

A650ADCOL - Gera empenhos de SC's ( < PARAMIXB[1]> , < PARAMIXB[2]> , < PARAMIXB[3]> , < PARAMIXB[4]> , < PARAMIXB[5]> ) --> Nil

Parâmetros:

 

 NomeTipoDescriçãoDefaultObrigatórioReferência
 PARAMIXB[1]CaracterCódigo do produto ou componente explodido X 
 PARAMIXB[2]NuméricoQuantidade do produto pai explodido X 
 PARAMIXB[3]CaracterString com opcionais selecionados X 
 PARAMIXB[4]CaracterRevisão do Produto X 
 PARAMIXB[5]DataData da previsão inicial X 

 

Retorno
Nil
    (nulo)
  • Nil
Observações


 

Exemplos
User Function A650ADCOL
Local cProduto := PARAMIXB[1]
Local nQuantPai := PARAMIXB[2]
Local cOpcionais := PARAMIXB[3]
Local cRevisao := PARAMIXB[4]
Local dDatPri    := PARAMIXB[5]
If 'BR120' $ cProduto //As variáveis aCols e nPosQuant são variáveis privite usados no MATA650
aCols[Len(aCols),nPosQuant] := 1
EndIf
Return Nil