Ponto-de-Entrada: HEXPSA1B - Manipula exportação de Cliente e Consumo
Abrangências: | Microsiga Protheus 10 , Microsiga Protheus 11 |
Versões: | Microsiga Protheus 10 , Microsiga Protheus 11 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todas TotvsDbAccess |
Idiomas: | Português (Brasil) |
Descrição:
O ponto de entrada HEXPSA1B altera a query de exportação de cliente e consumo do mesmo, sendo disparado em dois momentos: Na exportação do cliente, quando deve ser adicionados os filtros necessários.Na exportação do consumo do cliente, quando deve ser retonada a query e não os filtros, pois o ponto é executado após a montagem da query.
Programa Fonte
HHMOBEXP.PRW
Sintaxe
HEXPSA1B - Manipula exportação de Cliente e Consumo ( < ParamIxb> ) --> cQuery
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
ParamIxb | Array of Record | ParamIxb[1]= Query | X |
Retorno
-
cQuery(caracter)
- No momento de exportação de cliente deve ser retornados os filtros e no momento de exportação de consumo deve ser retonado a query a ser executada.
Exemplos
User Function HEXPSA1B()Local cQuery := ParamIxb[01]If AT( "ORDER BY", cQuery )==0 cQuery += " AND SA1.A1_RISCO<>'I' " cQuery += " AND SA1.A1_RISCO<>'F' " cQuery += " AND SA1.A1_RISCO<>'D' " cQuery += " AND SA1.A1_RISCO<>'C' "Else cQuery := "SELECT A1_COD,A1_LOJA " cQuery += "FROM SA1990 SA1 " cQuery += "WHERE SA1.A1_FILIAL=' ' AND SA1.A1_VEND = '000001' AND SA1.D_E_L_E_T_ = ' ' " cQuery += "AND SA1.A1_RISCO<>'I' AND SA1.A1_RISCO<>'F' AND SA1.A1_RISCO<>'D' AND SA1.A1_RISCO<>'C' " cQuery += "ORDER BY A1_COD" EndifReturn(cQuery)
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas