A690ALTDESD - Seleciona Recursos Alternativos
Linha de Produto: | Protheus | ||||||||||||||||||||||||||
Segmento: | Manufatura | ||||||||||||||||||||||||||
Módulo: | SIGAPCP - Planejamento e Controle da Produção | ||||||||||||||||||||||||||
Parâmetro(s): |
| ||||||||||||||||||||||||||
Idiomas: | Espanhol, Inglês | ||||||||||||||||||||||||||
País(es): | Todos | ||||||||||||||||||||||||||
Banco(s) de Dados: | Todos | ||||||||||||||||||||||||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
Descrição: | Ponto de Entrada para seleção de recursos alternativos e/ou secundários para cada desdobramento no Carga Máquina. |
Localização: | Este P.E. está localizado na Função A690Processa(). |
Programa Fonte: | MATA690A.PRX |
Sintaxe: | A690ALTDESD - Seleciona Recursos Alternativos ( < PARAMIXB> ) --> Array |
Retorno: | Array(vetor) Obrigatoriamente dois arrays, sendo: Array1: Recursos alternativos Exemplo: Return({aArrayAlternativos, aArraySecundarios}) |
Observações: |
Exemplo:
User Function A690ALTDESD
Local 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})