Duvida Log do EMS

Boa tarde,

Alguém sabe me dizer ou tem algum exemplo de como é feito os log do EMS, pois gostaria de fazer algo parecido.

Até onde eu me recordo os log do EMS imprime passo a passo do que está acontecendo no programa em tempo de execução. Então gostaria de fazer algo parecido.

Obrigado.

Boa Tarde,
Nao sei se consigo ti ajudar...porem quando quero ver somente o log de um programa eu uso essa rotina


def var c-arquivo as character no-undo.

assign c-arquivo = string( 'C:\Temp\spool\' + 'pd4000' + replace(string(time,"hh:mm:ss"),":","") + '.txt').

message "Diretorio: " c-arquivo view-as alert-box info buttons ok.

assign session:debug-alert = yes.

log-manager:logfile-name = c-arquivo.
log-manager:logging-level = 4.
log-manager:log-entry-types = "4GLMessages,4GLTrace,FileID,QryInfo,DB.Connects".

Boa noite.

Caro Ineves,

Agradeço sua ajuda, mas na realidade eu quero criar um log semelhante aos que EMS tem.

obrigado.

Blz Luiz,
Acho que nesse caso não consigo ajudar...mas de qualquer forma estou aqui se precisar.

abraços

Tá certo Ineves.

Mas obrigado pela atenção e ajuda.

Bom dia,
O que você precisa não é do Client Log?
se for segue, coloque essas linhas no seu .pf

Código:

Clientlog 

-debugalert
-clientlog C:\Temp\clientlog.lst
-logginglevel 4
-logentrytypes 4GLMessages,4GLTrace:2,DB.Connects:3,DynObjects.DB:4,DynObjects.XML:5,DynObjects.Other:6,DynObjects.CLASS:7,DynObjects.UI:8,FileID:9,ProEvents.UI.CHAR:10,ProEvents.UI.COMMAND:11,ProEvents.Other:12,SAX:13