Permita indicar uma função a ser invocada imediatamente antes de um relatório (START REPORT) 4GL.
Sintaxe
CALL SETFINISHREPORTHANDLER(func)
Retorno
Nome | Tipo | Descrição |
---|---|---|
func | Texto | Informa qual função será iniciada imediatamente antes do relatório. |
Observações
- A função indicada, ao ser declarada, precisa ter obrigatoriamente dois parametros, indicando nome do REPORT e destino do REPORT.
- Função disponível a partir da build 7.00.131227A.
Exemplos
Exemplo 1
MAIN CALL SETFINISHREPORTHANDLER("TST_HANDL") ## <<< === Instala o Handler CALL SETSTARTREPORTHANDLER("TST_HANDL_S") START REPORT R_NET TO "c:\\teste.txt" OUTPUT TO REPORT R_NET() FINISH REPORT R_NET CALL SETSTARTREPORTHANDLER() CALL SETFINISHREPORTHANDLER() ## <<< === Desinstala o Handler START REPORT R_NET TO "c:\\teste.txt" OUTPUT TO REPORT R_NET() FINISH REPORT R_NET END MAIN ############################### REPORT R_NET() FORMAT ON EVERY ROW PRINT "HELLOW" PRINT "WORLD!" END REPORT FUNCTION TST_HANDL( cRepName, cRepFile, cTopOfPage, nPageLength, nTopMargin, nBottomMargin, nLeftMargin, nRightMargin, nNumPages ) DEFINE cOutPut VARCHAR(1024) DEFINE cRepName VARCHAR(255) DEFINE cRepFile VARCHAR(255) DEFINE cTopOfPage VARCHAR(255) DEFINE nPageLength INTEGER DEFINE nTopMargin INTEGER DEFINE nBottomMargin INTEGER DEFINE nLeftMargin INTEGER DEFINE nRightMargin INTEGER DEFINE nNumPages INTEGER LET cOutPut = "\nRelatorio : ", cRepName CLIPPED, "\nArquivo : ", cRepFile CLIPPED, "\nTopOfPage : ", cTopOfPage CLIPPED, "\nPageLength: ", nPageLength, "\nTop Margin: ", nTopMargin, "\nBottom Margin: ", nBottomMargin, "\nLeft Margin: ", nLeftMargin, "\nRight Margin: ", nRightMargin, "\nNumero de Paginas impressas: ", nNumPages CALL CONOUT( cOutPut ) END FUNCTION FUNCTION TST_HANDL_S( cRepName, cRepFile ) DEFINE cOutPut VARCHAR(1024) DEFINE cRepName VARCHAR(255) DEFINE cRepFile VARCHAR(255) LET cOutPut = "\nRelatorio : ", cRepName CLIPPED, "\nArquivo : ", cRepFile CLIPPED CALL CONOUT( cOutPut ) END FUNCTION
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas