Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • A730FILT - Filtra Operações

Ponto-de-Entrada: A730FILT - Filtra Operações
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 A730RunCalc ()- Função utilizada para verificar o saldo da operação a ser alocado.

DESCRIÇÃO : Filtra as Operações que deveram entrar na “Carga Acumulativa”. Poderá aplicar-se o filtro na tabela SH8 e/ou SG2, dependendo da opção selecionada no parâmetro MV_PAR08.
Eventos


 

Programa Fonte 
MATA730.PRX
Sintaxe

A730FILT - Filtra Operações ( [ PARAMIXB ] ) --> aRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
PARAMIXB Numérico Opção selecionada no parâmetro MV_PAR08(Considera Informações?): 1. Carga Máquina ; 2. Roteiro Operação.
Retorno
    aRet(vetor)
  • aArray[1] = Expressão (Caracter) para filtro do SH8.
    aArray[2] = Expressão (Caracter) para filtro do SG2.
Observações


 

Exemplos 
User Function A730FILT()//-- Recebe a opção seta no parâmetro MV_PAR08(Considera Informacoes?)Local nTpCarga := PARAMIXBLocal cFilSG2  := ''Local cFilSH8  := ''Local aRet[2] //-- Cria um Array com dois elementos /*---------------------------------------------------A tabela SC2(Ordem de Producao), esta posicionadana aplicacao do filtro nas duas tabelas (SH8/SG2).--------------------------------------------------- */ //-- Verifica se a Carga Acumulativa sera pelo SH8(Carga Maq.)If nTpCarga == 1    //-- Nao adiciona no Carga Acumulativa as Operacoes que utilizam o Recurso 000001.   cFilSH8 := 'Trim(SH8->H8_RECURSO) <> '000001'' //-- Verifica se o Carga Acumulativa sera pelo SG2(Roteiro Operacao).ElseIf nTpCarga == 2    //-- Nao adiciona no Carga Acum. a Operacao 03 do Roteiro 01 referente ao produto PA1-CARGA.   cFilSG2 := 'If(Trim(SG2->G2_PRODUTO) == 'PA1-CARGA' .and. SG2->G2_CODIGO == '01',SG2->G2_OPERAC <> '03',.T.)'EndIf /*----------------------------------------------------------------------------------Composicao do aRet.aRet    => Array contendo dois elementos, onde:aRet[1] => Expressao (Caracter) para filtro do SH8.aRet[2] => Expressao (Caracter) para filtro do SG2.Obs.: Quando nao utilizar um dos dois filtros, podera retorna Vazio para o elemento-----------------------------------------------------------------------------------*/aRet:= {cFilSH8,cFilSG2} Return(aRet)