Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • A690ALTDESD - Seleciona Recursos Alternativos

Ponto-de-Entrada: A690ALTDESD - Seleciona Recursos Alternativos
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 : Este P.E. está localizado na Função A690Processa().

DESCRIÇÃO : Ponto de Entrada para seleção de recursos alternativos e/ou secundários para cada desdobramento no Carga Máquina.
Eventos


 

Programa Fonte 
MATA690A.PRX
Sintaxe

A690ALTDESD - Seleciona Recursos Alternativos ( < PARAMIXB> ) --> Array

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
PARAMIXB Vetor Parâmetros enviados por array (recuperados pela variável PARAMIXB): Recurso principal, duração do desdobramento, número do desdobramento, array com recursos alternativos, array com recursos secundários. X
Retorno
    Array(vetor)
  • Obrigatoriamente dois arrays, sendo:

    Array1: Recursos alternativos
    Array2: Recursos secundarios

    Exemplo:
    Return({aArrayAlternativos, aArraySecundarios})
Observações


 

Exemplos 
User Function A690ALTDESDLocal cRecurso   := ParamIXB[1]Local nDurDesdob := ParamIXB[2]Local nDesdob    := ParamIXB[3]Local aAlter     := ParamIXB[4]Local aSecun     := ParamIXB[5]If nDesdob == 1 aEval(aAlter, {|z,w| aAlter[w] := Pad('002', Len(cRecurso))})ElseIf nDesdob == 2 aEval(aAlter, {|z,w| aAlter[w] := Pad('003', Len(cRecurso))})ElseIf nDesdob == 3 aEval(aAlter, {|z,w| aAlter[w] := Pad('004', Len(cRecurso))})ElseIf nDesdob == 4 aEval(aAlter, {|z,w| aAlter[w] := Pad('001', Len(cRecurso))}) EndifConOut(nDesdob)Return({aAlter, aSecun})