Você está aqui: Início Fórum Protheus/Microsiga/Totvs AdvPL (Advanced Protheus Language) Dúvidas Gerais Ponto de Entrada FA60FIL Bordero Contas a Receber
  1. Fórum
  3. Protheus/Microsiga/Totvs
  5. AdvPL (Advanced Protheus Language)
  7. Dúvidas Gerais
  9. Ponto de Entrada FA60FIL Bordero Contas a Receber
× Linguagem de Programação ADVPL

Perguntas Ponto de Entrada FA60FIL Bordero Contas a Receber

Mais
9 anos 5 meses atrás #26412 por lalberto
Respondido por lalberto no tópico Ponto de Entrada FA60FIL Bordero Contas a Receber
#INCLUDE "PROTHEUS.CH"
#INCLUDE "RWMAKE.CH"

User Function FA60FIL()
Local _aArea := GetArea()
Local cFil060 :=".T."

If SA1->(dbSetOrder(1), dbSeek(xFilial("SA1")+SE1->E1_CLIENTE+SE1->E1_LOJA)) .And. SA1->A1_BCO1 <> '999'
cFil060=".F."
Endif

RestArea(_aArea)
Return(cFil060)
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
9 anos 5 meses atrás #26413 por brunogfx4
Respondido por brunogfx4 no tópico Ponto de Entrada FA60FIL Bordero Contas a Receber
Luiz primeiramente obrigado pela ajuda, na realidade eu queria que ele apareca todos s titulos do qual foi colocado no Filtro, mas que nesse filtro na apareca os clientes cujo o banco e 999 tentei fazer uma modificacao em cima do que voce me enviou, porem nao obtive sucesso.

Por favor Acessar ou Registrar para participar da conversa.

Mais
9 anos 5 meses atrás #26416 por lalberto
Respondido por lalberto no tópico Ponto de Entrada FA60FIL Bordero Contas a Receber
Ah Tá, então esta invertido :woohoo: :woohoo: :woohoo:

#INCLUDE "PROTHEUS.CH"
#INCLUDE "RWMAKE.CH"

User Function FA60FIL()
Local _aArea := GetArea()
Local cFil060 :=".T."

If SA1->(dbSetOrder(1), dbSeek(xFilial("SA1")+SE1->E1_CLIENTE+SE1->E1_LOJA)) .And. SA1->A1_BCO1 == '999'
cFil060=".F."
Endif

RestArea(_aArea)
Return(cFil060)
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
9 anos 5 meses atrás #26420 por brunogfx4
Respondido por brunogfx4 no tópico Ponto de Entrada FA60FIL Bordero Contas a Receber
Fiz Dessa forma, porem ele ainda esta trazendo o titulo cujo o cliente esta preenchido A1_BCO1='999'.
To ate ficando com raiva, nao consigo ver uma forma para nao trazer esse CLIENTE.

Por favor Acessar ou Registrar para participar da conversa.

Mais
9 anos 5 meses atrás #26422 por kanaamlrr
Respondido por kanaamlrr no tópico Ponto de Entrada FA60FIL Bordero Contas a Receber
Crie um campo na tabela SE1 e jogue no inicializador padrão dele Posicione('SA1',1,xFilial('SA1')+M->(E1_CLIENTE+E1_LOJA),'A1_BCO1')
Depois crie o filtro por esse campo.
Faça o teste.
Não sei se vai rolar...

Por favor Acessar ou Registrar para participar da conversa.

Mais
9 anos 5 meses atrás - 9 anos 5 meses atrás #26475 por CaioTostes
Respondido por CaioTostes no tópico Ponto de Entrada FA60FIL Bordero Contas a Receber
Bom dia, recentemente eu fiz algo parecido. Fiz um filtro na marcacao dos titulos (na geração do bordero). Eu utilizei o Ponto de Entrada FA060Qry(). Tenta assim:

#include "rwmake.ch" 
User Function FA060Qry()
Local cRet := ""
	
cRet := " not exists( select A1_FILIAL from "+RetSqlName("SA1")+" SA1 where A1_COD=E1_CLIENTE and A1_LOJA=E1_LOJA and A1_BCO1 <> '999' AND SA1.D_E_L_E_T_= '' ) "
	
Return cRet
Ultima edição: 9 anos 5 meses atrás por CaioTostes.

Por favor Acessar ou Registrar para participar da conversa.

  1. Fórum
  3. Protheus/Microsiga/Totvs
  5. AdvPL (Advanced Protheus Language)
  7. Dúvidas Gerais
  9. Ponto de Entrada FA60FIL Bordero Contas a Receber
Tempo para a criação da página:0.127 segundos
Joomla templates by a4joomla