Classe: FWFormBrowse

O FWFOrmBrowse fornece um objeto do tipo grid, que possibilita a inclusão de botões laterais e detalhes das colunas.


New

Construtor da classe.


FWFormBrowse(): New ( [ ] ) --> oSelf



NomeTipoDescriçãoObrigatórioReferência

Array of Record



oSelf
    ()
  • Retorbna o objeto da classe


Activate

Ativação da classe.


FWFormBrowse(): Activate ( [ oOwner] ) -->



NomeTipoDescriçãoObrigatórioReferência
oOwnerObjetoObjeto do tipo container que indica o local que será criado o Browse.



AddButton

Adiciona um botão na área lateral do Browse.


FWFormBrowse(): AddButton ( < cTitle>, [ xAction], [ uParam1], [ nOption], [ nVerify], [ lNeedFind], [ nRealOpc], [ cOperatId], [ cToolBar] ) -->



NomeTipoDescriçãoObrigatórioReferência
cTitleCaracterTítulo do botão.X
xActionQualquerAção que será executada no clique do botão. Pode ser uma função ou um Code Block.

uParam1QualquerParâmetro reservado.

nOptionLógicoTipo de operação (1=Visualizar, 2=Visualizar, 3=Incluir, 4=Alterar, 5=Excluir, 6=Alterar sem inclusão de novas linhas, 7=Cópia e 8=Impressão da regra de negócios)

nVerifyNuméricoNúmero do acesso a ser verificada a permissão para o usuário.

lNeedFindLógicoIndica a necessidade de pesquisar antes da manutenção do registro (Menu Funcional).

nRealOpcNuméricoIndica a opção real (ordem de criação) do aRotina antigo - Compatibilização com a MBrowse antiga.

cOperatIdCaracterIdentificador da opção do menu. Utilizado para relacionar o o botão à uma opção de menu.

cToolBarCaracterIndica o relacionamento com os botões da tela (FormBar).



O parâmetro <cTitle> deverá receber a string com o título que será impresso em cada botão exatamente como cada Módulo definiu, Framework não terá autonomia para alterar/formatar o título do botão, ficando com a responsabilidade de cada Módulo enviar o texto formatado(inclusive maiúsculas e minúsculas) da forma que foi definido para suas rotinas.

AfterOption

Permite realizar tratamentos após a execução da ação do botão.


FWFormBrowse(): AfterOption ( < cFunction>, < nOption>, [ nVerify] ) -->



NomeTipoDescriçãoObrigatórioReferência
cFunctionCaracterNome da função definida para o botão.X
nOptionNuméricoTipo de operação (1=Visualizar,2=Visualizar,3=Incluir,4=Alterae,5=Excluir,6=Alterar sem inclusão de novas linhas,7=Cópia e 8=Impressão da regra de negócios).X
nVerifyNuméricoNúmero do acesso a ser validada a permissão do usuário.



BeforeOption

Permite realizar tratamentos antes da execução da ação do botão.


FWFormBrowse(): BeforeOption ( < cFunction>, < nOption>, [ nVerify], [ cTitle], [ nRealOpc] ) --> lReturn



NomeTipoDescriçãoObrigatórioReferência
cFunctionCaracterIndica o nome da função definida para o botão.X
nOptionNuméricoTipo de operação (1=Visualizar,2=Visualizar,3=Incluir,4=Alterae,5=Excluir,6=Alterar sem inclusão de novas linhas,7=Cópia e 8=Impressão da regra de negócios).X
nVerifyNuméricoNúmero do acesso a ser validada a permissão do usuário.

cTitleCaracterIndica o título da janela.

nRealOpcNuméricoIndica a popsição do botão selecionado.


lReturn
    (logico)
  • Indica se a ação pode ser executada.

ClassName

Retorna o nome da classe (FWFORMBROWSE)


FWFormBrowse(): ClassName ( ) --> cClassName

cClassName
    (caracter)
  • Retorna o nome da classe (FWFORMBROWSE)

CleanFilter

Realiza a limpeza dos filtros utilizados no Browse.


FWFormBrowse(): CleanFilter ( ) -->


DeActivate

Método que permite destruir a classe.


FWFormBrowse(): DeActivate ( [ lFreeChildren] ) -->



NomeTipoDescriçãoObrigatórioReferência
lFreeChildrenLógicoIndica se deve ser realizada a limpeza dos componentes do objeto do tipo container. (oOwner)



Disable

Desabilita a utilização do Browse.


FWFormBrowse(): Disable ( ) -->


DisableDetails

Desabilita a apresentação dos detalhes no Browse.


FWFormBrowse(): DisableDetails ( ) -->


Enable

Habilita a utilização do Browse.


FWFormBrowse(): Enable ( ) -->


ExecuteFilter

Realiza a aplicação dos filtros realizados no Browse.


FWFormBrowse(): ExecuteFilter ( [ lBrwUpdate] ) -->



NomeTipoDescriçãoObrigatórioReferência
lBrwUpdateLógicoIndica se deve ser realizado o refresh do Browse.



ForceQuitButton

Força a exibição sair para Browses não ancorados diretamente em alguns containers.


FWFormBrowse(): ForceQuitButton ( [ lSet] ) -->



NomeTipoDescriçãoObrigatórioReferência
lSetLógicoIndica se força a exibiçao do botão Sair.



FWBrowse

Retorna o objeto Browse (FWBROWSE)


FWFormBrowse(): FWBrowse ( ) --> oBrowse

oBrowse
    ()
  • Retorna o componente Browse (FWBROWSE).

GetButton

Retorna os botões disponíveis no menu lateral do Browse.


FWFormBrowse(): GetButton ( [ nButton] ) --> aButtons



NomeTipoDescriçãoObrigatórioReferência
nButtonNuméricoIndica o botão que deverá ser retornado e quando não informado será retornado todos os botões.


aButtons
    (array_of_record)
  • Retorna os botões disponíveis no menu lateral do Browse.

GetOwner

Retorna o container de criação do Browse.


FWFormBrowse(): GetOwner ( ) --> oOwner

oOwner
    ()
  • Retorna o container de criação do Browse

SetAfterExec

Indica o Code-Block executado após a execução da operação definida para o botão.


FWFormBrowse(): SetAfterExec ( < bAfterExec> ) -->



NomeTipoDescriçãoObrigatórioReferência
bAfterExecBloco de códigoCode-Block executado após a execução da operação definida para o botão.X



SetBeforeExec

Indica o Code-Block executado antes a execução da operação definida para o botão.


FWFormBrowse(): SetBeforeExec ( < bBeforeExec> ) -->



NomeTipoDescriçãoObrigatórioReferência
bBeforeExecBloco de códigoCode-Block executado antes a execução da operação definida para o botão.X



SetbOKMVCWindow

Indica o Code-Block executado ao clicar na opção OK da MVCWINDOW.


FWFormBrowse(): SetbOKMVCWindow ( < bOKMVCWindow> ) -->



NomeTipoDescriçãoObrigatórioReferência
bOKMVCWindowBloco de códigoCode-Block executado ao clicar na opção OK da MVCWINDOW.X



SetCacheView

Define se o browse faz o cache do View, o default do browse é fazer o cache, porém se tivermos varios views condicionais devemos não utilizar o cache.


FWFormBrowse(): SetCacheView ( [ lCacheView] ) -->



NomeTipoDescriçãoObrigatórioReferência
lCacheViewLógicoIndica se deve ativar o cache de View.



SetCheckLoop

Indica o Code-Block executado na verificação do Loop da execução da rotina.


FWFormBrowse(): SetCheckLoop ( < bCheckLoop> ) -->



NomeTipoDescriçãoObrigatórioReferência
bCheckLoopBloco de códigoCode-Block executado na verificação do Loop da execução da rotina.X



SetDetails

Indica que deve ser disponibilizada a barra de detalhes no Browse.


FWFormBrowse(): SetDetails ( [ lDetails], [ bDetails] ) -->



NomeTipoDescriçãoObrigatórioReferência
lDetailsLógicoIndica que deverá ser disponibilizada a barra de detalhes no Browse.

bDetailsBloco de códigoCode-Block executado na carga do container dos detalhes. Quando não informado será utilizado o padrão.



SetEditDetail

Indica que deve ser disponibilizada a edição no detalhes do browse.


FWFormBrowse(): SetEditDetail ( [ lEditDetail], [ oModel] ) -->



NomeTipoDescriçãoObrigatórioReferência
lEditDetailLógicoIndica que deverá ser disponibilizada edição no browse

oModelObjetoObjeto do tipo FWFormModel que contem o modelo de edição para edição da linha no detalhes.



SetMenuDef

Indica o programa que é utilizado para a carga do menu funcional.


FWFormBrowse(): SetMenuDef ( [ cMenuDef] ) -->



NomeTipoDescriçãoObrigatórioReferência
cMenuDefCaracterIndica o programa que será utilizado para a carga do menu funcional



SetNoBrowse

Indica que a execução das operações dos botões não deverão atualizar o Browse.


FWFormBrowse(): SetNoBrowse ( [ lNoBrowse] ) -->



NomeTipoDescriçãoObrigatórioReferência
lNoBrowseLógicoIndica que a execução das operações dos botões não deverão atualizar o Browse.



SetOwner

Indica o container para criação do Browse.


FWFormBrowse(): SetOwner ( [ oOwner] ) -->



NomeTipoDescriçãoObrigatórioReferência
oOwnerObjetoIndica o container para criação do Browse.



SetParam

Indica o Code-Block executado ao pressionar a tecla F12.


FWFormBrowse(): SetParam ( < bParam> ) -->



NomeTipoDescriçãoObrigatórioReferência
bParamBloco de códigoCode-Block executado ao pressionar a tecla F12.X



SetSizeBrowse

Indica o tamanho em percentual do Browse na tela.


FWFormBrowse(): SetSizeBrowse ( < nPerc> ) -->



NomeTipoDescriçãoObrigatórioReferência
nPercNuméricoIndica o tamanho em percentual do Browse na tela.X



SetSizeDetails

Indica o tamanho em percentual dos detalhes do Browse na tela.


FWFormBrowse(): SetSizeDetails ( < nPerc> ) -->



NomeTipoDescriçãoObrigatórioReferência
nPercNuméricoIndica o percentual do tamanho dos detalhes.X



SetTemporary

Indica que o Browse utiliza tabela temporária.


FWFormBrowse(): SetTemporary ( [ lTemporary] ) -->



NomeTipoDescriçãoObrigatórioReferência
lTemporaryLógicoIndica que o Browse utiliza tabela temporária.



SetUseCaseFilter

Indica que é permitido o filtro case-sensitive no Browse.


FWFormBrowse(): SetUseCaseFilter ( [ lFilter] ) -->



NomeTipoDescriçãoObrigatórioReferência
lFilterLógicoIndica que será permitido o filtro case-sensitive no Browse.



SetUseCursor

Define se as rotinas em MVC tem os botões de navegação.


FWFormBrowse(): SetUseCursor ( [ lUseCursor] ) -->



NomeTipoDescriçãoObrigatórioReferência
lUseCursorLógicoIndica se as rotinas em MVC teram os botões de navegação.



SetUseFilter

Indica que é permitido o filtro no Browse.


FWFormBrowse(): SetUseFilter ( [ lFilter], [ bOnStart] ) -->



NomeTipoDescriçãoObrigatórioReferência
lFilterLógicoIndica que será permitido o filtro no Browse.

bOnStartBloco de códigoCode-Block executado na criação do componente de filtro.



Temporary

Retorna se o Browse utiliza tabela temporária.


FWFormBrowse(): Temporary ( ) --> lTemporary

lTemporary
    (logico)
  • Indica que o Browse utiliza tabela temporária.

UpdateDetails

Executa a atualização das informações nos detalhes do Browse.


FWFormBrowse(): UpdateDetails ( ) -->


SetFixedBrowse

Seta a fixação do Layer do Browse, não permitindo minimizar a tela do browse.

FWFormBrowse(): SetFixedBrowse ( lFixed ) --> nil


NomeTipoDescriçãoObrigatórioReferência
lFixedLógico.T. - Fixa o Layer do Browse. Default .F.


SetFixedDetails

Seta a fixação do Layer do Detalhes, não permitindo minimizar a tela de Detalhes do browse.

FWFormBrowse(): SetFixedDetails ( lFixed ) --> nil


NomeTipoDescriçãoObrigatórioReferência
lFixedLógico.T. - Fixa o Layer do Detalhes. Default .F.


#INCLUDE "FWBROWSE.CH"
User Function FormBrwTable()
Local oBrowseLocal oButtonLocal oColumnLocal oDlg

//-------------------------------------------------------------------
// Abertura da tabela
//-------------------------------------------------------------------

DbUseArea(.T.,,"SX2990","SX2",.T.,.F.)
DbSetOrder(1)

//-------------------------------------------------------------------
// Define a janela do Browse
//-------------------------------------------------------------------

DEFINE MSDIALOG oDlg FROM 0,0 TO 600,800 PIXEL

//-------------------------------------------------------------------
// Define o Browse
//-------------------------------------------------------------------

DEFINE FWFORMBROWSE oBrowse DATA TABLE ALIAS "SX2" OF oDlg

//--------------------------------------------------------
// Cria uma coluna de marca/desmarca
//--------------------------------------------------------

ADD MARKCOLUMN oColumn DATA { || If(.T./* Função com a regra*/,'LBOK','LBNO') } DOUBLECLICK { |oBrowse| /* Função que atualiza a regra*/ } HEADERCLICK { |oBrowse| /* Função executada no clique do header */ } OF oBrowse

//--------------------------------------------------------
// Cria uma coluna de status
//--------------------------------------------------------

ADD STATUSCOLUMN oColumn DATA { || If(.T./* Função com a regra*/,'BR_VERDE','BR_VERMELHO') } DOUBLECLICK { |oBrowse| /* Função executada no duplo clique na coluna*/ } OF oBrowse

//--------------------------------------------------------
// Adiciona legenda no Browse
//--------------------------------------------------------

ADD LEGEND DATA 'X2_CHAVE $ "AA1|AA2"' COLOR "GREEN" TITLE "Chave teste 1" OF oBrowse
ADD LEGEND DATA '!(X2_CHAVE $ "AA1|AA2")' COLOR "RED" TITLE "Chave teste 2" OF oBrowse

//-------------------------------------------------------------------
// Adiciona as colunas do Browse
//-------------------------------------------------------------------

ADD BUTTON oButton TITLE "Botão 1" ACTION { || MsgAlert(oBrowse:At()) } OF oBrowse
ADD BUTTON oButton TITLE "Botão 2" ACTION { || MsgAlert(oBrowse:At()) } OF oBrowse

//-------------------------------------------------------------------
// Adiciona as colunas do Browse
//-------------------------------------------------------------------

ADD COLUMN oColumn DATA { || X2_CHAVE } TITLE "Chave" SIZE 3 OF oBrowse
ADD COLUMN oColumn DATA { || X2_ARQUIVO } TITLE "Arquivo" SIZE 10 OF oBrowse
ADD COLUMN oColumn DATA { || X2_NOME } TITLE "Descrição" SIZE 40 OF oBrowse
ADD COLUMN oColumn DATA { || X2_MODO } TITLE "Modo" SIZE 1 OF oBrowse

//-------------------------------------------------------------------
// Ativação do Browse
//-------------------------------------------------------------------

ACTIVATE FWFORMBROWSE oBrowse

//-------------------------------------------------------------------
// Ativação do janela
//-------------------------------------------------------------------
ACTIVATE MSDIALOG oDlg CENTERED

Return

Microsiga Protheus 11 , Protheus 10




  • Sem rótulos