Perguntas Compilo o PE MT410BRW normalmente mas não aparece msg antes do browser.

Mais
8 anos 3 meses atrás #29911 por flaviodocarmo
Como Resolvo
esse ponto entrada funciona
alguem sabe

Por favor Acessar ou Registrar para participar da conversa.

Mais
8 anos 3 meses atrás #29912 por Sombra
Flavio tem esse exemplo desenvolvido pelo Marcelo Souza ( HelpFacil ), vê se te ajuda.



Use o MT410BRW(). Abaixo segue o fonte que uso para filtrar:

__________________________________________________
#INCLUDE "PROTHEUS.CH"
#INCLUDE "rwmake.ch"
#INCLUDE "tbiconn.ch"

User function MT410BRW() // P.E. de MATA410 - Ponto de entrada disparado antes da abertura do Browse

Local cRet
Public cCombo := " "
Private oDlg
Private vTempo :=SPACE(10)

OpcA:= {"Não Faturados","Faturados","Enviados","Não Enviados","Todos"}

DEFINE MSDIALOG oDlg TITLE "Visualizar Pedidos" FROM 379,492 TO 468,795 PIXEL

@ 011,059 ComboBox cCombo Items OpcA COLOR CLR_BLUE Size 089,010 PIXEL OF oDlg
@ 012,009 Say "Pedidos de Venda" Size 047,008 COLOR CLR_BLUE PIXEL OF oDlg

DEFINE SBUTTON FROM 028,120 TYPE 1 ENABLE OF oDlg ACTION (cRet:=grvOk(),oDlg:End())
ACTIVATE MSDIALOG oDlg CENTERED
Return cRet

Static Function grvOk
Local cRet

DbSelectArea("SC5")
SC5->(DBGoTop())

IF cCombo = "Enviados"
SET FILTER TO SC5->C5_EXENVIA == "SIM"
ELSEIF cCombo = "Não Enviados"
Private cEnviado :="NAO"
DbSelectArea("SC5")
SC5->(DBGoTop())
SC5->(DBSetOrder(6))
SC5->(DBSeek(xFilial("SC5")+cEnviado))
WHILE SC5->C5_EXENVIA == cEnviado
Reclock("SC5",.F.)
vTempo :=CvalToChar(DateDiffDay(DATE(),SC5->C5_EMISSAO))+" DIA(S)"
SC5->C5_EXTEMPO := vTempo
MsUnlock()
SC5->(DBSkip())
ENDDO
SC5->(DBGoTop())
SET FILTER TO SC5->C5_EXENVIA == "NAO"
ELSEIF cCombo = "Não Faturados"
SET FILTER TO SC5->C5_NOTA = ‘ ‘
ELSEIF cCombo = "Faturados"
SET FILTER TO SC5->C5_NOTA <> ‘ ‘
ELSEIF cCombo = "Todos"
// SET FILTER TO SC5->C5_OBRA <> "NAO EXIBIR"
cRet := ‘ ‘
ENDIF
RETURN cRet

Por favor Acessar ou Registrar para participar da conversa.

Mais
8 anos 3 meses atrás #29913 por flaviodocarmo
Luiz,
Estou no ambiente de teste. O problema que tenho é o seguinte: Ja testei o PE SACI008 também. O PE´s não estão sendo incluidos no RPO.
Sabe como resolver isto?

Att, Flavio.

Por favor Acessar ou Registrar para participar da conversa.

Mais
8 anos 3 meses atrás #29914 por Sombra
Flavio,

Já passei por isso, e na ocasião abri chamado junto TOTVS, e o pessoal do ADVPL, me orientou a compilar os Fontes no Próprio Servidor em que estar instalado o Protheus, que esse tipo de não conformidade ocorre em decorrência de um BUG do próprio IDE, quando você tenta compilar determinados fontes da estação de trabalho.

Por favor Acessar ou Registrar para participar da conversa.

Mais
8 anos 3 meses atrás #29915 por Sombra
Flavio,

Já passei por isso, e na ocasião abri chamado junto TOTVS, e o pessoal do ADVPL, me orientou a compilar os Fontes no Próprio Servidor em que estar instalado o Protheus, que esse tipo de não conformidade ocorre em decorrência de um BUG do próprio IDE, quando você tenta compilar determinados fontes da estação de trabalho.

Por favor Acessar ou Registrar para participar da conversa.

Mais
8 anos 3 meses atrás #29916 por flaviodocarmo
Compilei no servidor e nao deu certo.

Obrigado pelo retorno Luis.

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.115 segundos
Joomla templates by a4joomla