DT PE MDTR8051 Entrega de Recibo em Solicitação ao Armazém

01. DADOS GERAIS

02. SITUAÇÃO/REQUISITO

Solicitação de Ponto de Entrada na rotina Recibo de Entrega de EPI (MDTR805) para que seja possível gerar o recibo mesmo quando o campo TNF_INDDEV for igual a 3=Epi Em Solic. Armazem.

03. SOLUÇÃO

Criado o ponto de entrada MDTR8051 para modificar o filtro da busca de EPI, sendo possível adicionar ou remover condições do filtro. Salientando que as expressões devem seguir a sintaxe SQL e estar entre aspas, conforme exemplo.

#include "protheus.ch"

User Function MDTR8051()

    Local cFiltroSQL := PARAMIXB[1] //Conteúdo padrão do filtro, pode ser removido ou complementado.

    cFiltroSQL += " AND TNF.TNF_FORNEC = 'FE00001 ' " //Complemento do filtro, acrescentando uma condição.

Return cFiltroSQL //Retorna as condições que serão acrescidas a query de EPI's

04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS

Não há.