Ponto-de-Entrada: CN120QCP - Modificar a consulta de validação de competência
| Versões: | Microsiga Protheus® releases a partir da 12.1.17 |
|---|---|
| Países compatíveis: | Todos |
| Sistemas operacionais: | Todos |
| Compatível às bases de dados: | Todos |
| Idiomas: | Todos |
01. Descrição
Permite modificar a consulta(query) que será executada ao validar a competência de uma medição.
02. Programa/Fonte
Localizado no fonte CNTA120.PRW, especificamente na função CN120Compet(), responsável pela validação da competência de uma medição.
03. Sintaxe
#include "protheus.ch"
User Function CN120QCP()
Local cQuery := PARAMIXB[1] //Recebe um único argumento, a query atual
cQuery := StrTran(cQuery,"AND CPD.CPD_FILAUT = '"+cFilAnt+"'", "AND CPD.CPD_FILAUT IN ('"+cFilAnt+"','"+SubStr(cFilAnt,1,4)+" ')")
Return cQuery //Deve retornar uma variável caractere com a nova query |