quarta-feira, 9 de fevereiro de 2011

Ponto de Entrada ao acessar um módulo do Protheus

Pessoal, para executar uma rotina na abertura de um módulo do Protheus você poderá usar os seguintes pontos de entrada:

SIGAFAT - Módulo Faturamento
SIGAFIN - Módulo Financeiro
SIGAPCP - Módulo Planejamento e Controle de Produção.

Vale lembrar que isso é válido para todos os módulos disponíveis no Protheus.

Um abraço

sábado, 5 de fevereiro de 2011

Como trocar as cores de uma grid no Protheus

Pessoal, aqui vai uma dica de como alterar as cores das linhas nos objetos MSSelect, TMSNewGetDados, TNewGetDados, entre outros browsers.

#include "colors.ch"
User Function CorLinhaBrowse()
   Private _oBrowseColorido := ""
   Private _oDlg := ""
   @ 0,0 To 510,750 Dialog _oDlg Title "Mostrar Grid Colorida"
   @ 05,05 To 170,370 Browse "TZ09" Fields aCampos object _oBrowseColorido
   _oBrowseColorido:obrowse:acolumns[1]:BCLRFORE := {|SETVAL| SFMudaCor(1)} //Cor da Fonte
   _oBrowseColorido:obrowse:acolumns[1]:BCLRBACK := {|SETVAL| SFMudaCor(2)} //Cor da Linha     
   Activate Dialog _oDlg Centered
Return


Static Function SFMudaCor(nIOpcao)
   Private _cCor := ""
   if nIOpcao == 1 // Cor da Fonte
      _cCor := CLR_YELLOW
   else // Cor do Fundo
      _cCor := CLR_BLACK
   endif
Return _cCor

Se caso nao conseguir deixe seu comentário