Páginas

sexta-feira, 14 de agosto de 2015

TABELA PERCORRER E FILTAR

TABELA PERCORRER E FILTAR

condicao_pagamento.id_condicao_pagamento=6

FOR EACH condicao_pagamento_parcela WHERE "condicao_pagamento_parcela.id_condicao_pagamento=" + condicao_pagamento.id_condicao_pagamento
    Info(condicao_pagamento_parcela.id_parcela)
END




// for each sem condicao
FOR EACH viagem_detalhes WHERE "viagem_detalhes.data_emissao>="+d_data_inicial+" and viagem_detalhes.data_emissao<="+d_data_final
    // ver placa
    n_grava_array=0
    ArraySort(arr_lista,asAscending)
    FOR x=1 TO arr_lista..Occurrence  // percorre todos os array
        IF arr_lista[x]=viagem_detalhes.placa THEN
            n_grava_array=1
            BREAK
        END
    END
    IF n_grava_array=0 THEN
        ArrayAddLine(arr_lista,viagem_detalhes.placa)
    END
END

Nenhum comentário:

Postar um comentário