mBrowse

4 views

Skip to first unread message

unread,

Oct 20, 2011, 6:07:17 PM10/20/11

to totvs-treinam...@googlegroups.com

#INCLUDE "rwmake.ch"

User Function ExMBrow3

Private cAlias := "SZB"

Private cCadastro := "Cadastro de Pessoas"

Private aRotina := { ;

{"Pesquisar","AxPesqui",0,1} ,;

{"Visualizar","AxVisual",0,2} ,;

{"Incluir","AxInclui",0,3} ,;

{"Alterar","AxAltera",0,4} ,;

{"Excluir","AxDeleta",0,5} ;

}

dbSelectArea(cAlias)

dbSetOrder(1)

mBrowse(,,,,cAlias)

Return

Thiago Copacheski Santos
FSW - Fábrica de Software

Unidade Curitiba

(55 (41) 3360-6200

image001.png

Reply all

Reply to author

Forward

0 new messages