O FWFOrmBrowse fornece um objeto do tipo grid, que possibilita a inclusão de botões laterais e detalhes das colunas.
FWFormBrowse(): New ( [ ] ) --> oSelf
Nome | Tipo | Descrição | Obrigatório | Referência |
Array of Record |
FWFormBrowse(): Activate ( [ oOwner] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
oOwner | Objeto | Objeto do tipo container que indica o local que será criado o Browse. |
FWFormBrowse(): AddButton ( < cTitle>, [ xAction], [ uParam1], [ nOption], [ nVerify], [ lNeedFind], [ nRealOpc], [ cOperatId], [ cToolBar] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
cTitle | Caracter | Título do botão. | X | |
xAction | Qualquer | Ação que será executada no clique do botão. Pode ser uma função ou um Code Block. | ||
uParam1 | Qualquer | Parâmetro reservado. | ||
nOption | Lógico | Tipo 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) | ||
nVerify | Numérico | Número do acesso a ser verificada a permissão para o usuário. | ||
lNeedFind | Lógico | Indica a necessidade de pesquisar antes da manutenção do registro (Menu Funcional). | ||
nRealOpc | Numérico | Indica a opção real (ordem de criação) do aRotina antigo - Compatibilização com a MBrowse antiga. | ||
cOperatId | Caracter | Identificador da opção do menu. Utilizado para relacionar o o botão à uma opção de menu. | ||
cToolBar | Caracter | Indica o relacionamento com os botões da tela (FormBar). |
FWFormBrowse(): AfterOption ( < cFunction>, < nOption>, [ nVerify] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
cFunction | Caracter | Nome da função definida para o botão. | X | |
nOption | Numérico | Tipo 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 | |
nVerify | Numérico | Número do acesso a ser validada a permissão do usuário. |
FWFormBrowse(): BeforeOption ( < cFunction>, < nOption>, [ nVerify], [ cTitle], [ nRealOpc] ) --> lReturn
Nome | Tipo | Descrição | Obrigatório | Referência |
cFunction | Caracter | Indica o nome da função definida para o botão. | X | |
nOption | Numérico | Tipo 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 | |
nVerify | Numérico | Número do acesso a ser validada a permissão do usuário. | ||
cTitle | Caracter | Indica o título da janela. | ||
nRealOpc | Numérico | Indica a popsição do botão selecionado. |
FWFormBrowse(): ClassName ( ) --> cClassName
FWFormBrowse(): CleanFilter ( ) -->
FWFormBrowse(): DeActivate ( [ lFreeChildren] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lFreeChildren | Lógico | Indica se deve ser realizada a limpeza dos componentes do objeto do tipo container. (oOwner) |
FWFormBrowse(): DisableDetails ( ) -->
FWFormBrowse(): ExecuteFilter ( [ lBrwUpdate] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lBrwUpdate | Lógico | Indica se deve ser realizado o refresh do Browse. |
FWFormBrowse(): ForceQuitButton ( [ lSet] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lSet | Lógico | Indica se força a exibiçao do botão Sair. |
FWFormBrowse(): FWBrowse ( ) --> oBrowse
FWFormBrowse(): GetButton ( [ nButton] ) --> aButtons
Nome | Tipo | Descrição | Obrigatório | Referência |
nButton | Numérico | Indica o botão que deverá ser retornado e quando não informado será retornado todos os botões. |
FWFormBrowse(): GetOwner ( ) --> oOwner
FWFormBrowse(): SetAfterExec ( < bAfterExec> ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
bAfterExec | Bloco de código | Code-Block executado após a execução da operação definida para o botão. | X |
FWFormBrowse(): SetBeforeExec ( < bBeforeExec> ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
bBeforeExec | Bloco de código | Code-Block executado antes a execução da operação definida para o botão. | X |
FWFormBrowse(): SetbOKMVCWindow ( < bOKMVCWindow> ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
bOKMVCWindow | Bloco de código | Code-Block executado ao clicar na opção OK da MVCWINDOW. | X |
FWFormBrowse(): SetCacheView ( [ lCacheView] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lCacheView | Lógico | Indica se deve ativar o cache de View. |
FWFormBrowse(): SetCheckLoop ( < bCheckLoop> ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
bCheckLoop | Bloco de código | Code-Block executado na verificação do Loop da execução da rotina. | X |
FWFormBrowse(): SetDetails ( [ lDetails], [ bDetails] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lDetails | Lógico | Indica que deverá ser disponibilizada a barra de detalhes no Browse. | ||
bDetails | Bloco de código | Code-Block executado na carga do container dos detalhes. Quando não informado será utilizado o padrão. |
FWFormBrowse(): SetEditDetail ( [ lEditDetail], [ oModel] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lEditDetail | Lógico | Indica que deverá ser disponibilizada edição no browse | ||
oModel | Objeto | Objeto do tipo FWFormModel que contem o modelo de edição para edição da linha no detalhes. |
FWFormBrowse(): SetMenuDef ( [ cMenuDef] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
cMenuDef | Caracter | Indica o programa que será utilizado para a carga do menu funcional |
FWFormBrowse(): SetNoBrowse ( [ lNoBrowse] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lNoBrowse | Lógico | Indica que a execução das operações dos botões não deverão atualizar o Browse. |
FWFormBrowse(): SetOwner ( [ oOwner] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
oOwner | Objeto | Indica o container para criação do Browse. |
FWFormBrowse(): SetParam ( < bParam> ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
bParam | Bloco de código | Code-Block executado ao pressionar a tecla F12. | X |
FWFormBrowse(): SetSizeBrowse ( < nPerc> ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
nPerc | Numérico | Indica o tamanho em percentual do Browse na tela. | X |
FWFormBrowse(): SetSizeDetails ( < nPerc> ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
nPerc | Numérico | Indica o percentual do tamanho dos detalhes. | X |
FWFormBrowse(): SetTemporary ( [ lTemporary] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lTemporary | Lógico | Indica que o Browse utiliza tabela temporária. |
FWFormBrowse(): SetUseCaseFilter ( [ lFilter] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lFilter | Lógico | Indica que será permitido o filtro case-sensitive no Browse. |
FWFormBrowse(): SetUseCursor ( [ lUseCursor] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lUseCursor | Lógico | Indica se as rotinas em MVC teram os botões de navegação. |
FWFormBrowse(): SetUseFilter ( [ lFilter], [ bOnStart] ) -->
Nome | Tipo | Descrição | Obrigatório | Referência |
lFilter | Lógico | Indica que será permitido o filtro no Browse. | ||
bOnStart | Bloco de código | Code-Block executado na criação do componente de filtro. |
FWFormBrowse(): Temporary ( ) --> lTemporary
FWFormBrowse(): UpdateDetails ( ) -->
FWFormBrowse(): SetFixedBrowse ( lFixed ) --> nil
Nome | Tipo | Descrição | Obrigatório | Referência |
lFixed | Lógico | .T. - Fixa o Layer do Browse. Default .F. |
FWFormBrowse(): SetFixedDetails ( lFixed ) --> nil
Nome | Tipo | Descrição | Obrigatório | Referência |
lFixed | Ló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