O programa de “romaneio” é um ótimo exemplo para utilizar os objetos TREE e EDITOR, que são METHOD standard.
Anexo a este tutorial, há um arquivo .ZIP com todos os códigos fonte, mais as telas e menus utilizados no código fonte do romaneio.
*$*$ -------------------------------------------------------------- *$*$ *$*$ Autores : Reginaldo Russo *$*$ *$*$ Analista : *$*$ *$*$ Data : 04/04/2005 *$*$ *$*$ -------------------------------------------------------------- *$*$ *$*$ Projeto : *$*$ *$*$ Finalidade : Processo de ROMANEIO, apartir da seleção de *$*$ *$*$ notas fiscal, selecionado os itens de cada N.F. *$*$ *$*$ poderá se gerar uma Ordem de Transporte, ou *$*$ *$*$ seja, um Romaneio de Transporte. *$*$ *$*$ Observações : Neste processo deve-se criar Classes (CLASS) *$*$ *$*$ locais para poder tratar os eventos dos objetos *$*$ *$*$ criados neste programa. *$*$ *$*$ Especificação: 00000.001 *$*$ *$*$ -------------------------------------------------------------- *$*$ *$*$ Histórico de modificações *$*$ *$*$ Data : *$*$ *$*$ Autor : *$*$ *$*$ Descrição: *$*$ *$*$ ---------------------------------------------------------------*$*$ *** Declaração de: Tabelas, Variaveis, Ranges e Objetos INCLUDE ZA_ROMANEIO_TOP. *** Declaração e Definição de CLASS para METHOD para este programa INCLUDE ZA_ROMANEIO_CLASS. *&---------------------------------------------------------------------* *& Inicialização de Tab.Internas, Variaveis, Ranges e Objetos *&---------------------------------------------------------------------* INITIALIZATION. CLEAR WSC_OK_CODE. SORT TI_ITENS_NF BY DOCNUM ITMNUM. SORT TI_ITENS_ROMANEIO BY VBELN POSNR DOCNUM ITMNUM. *&---------------------------------------------------------------------* *& Inicia o processamento do programa *&---------------------------------------------------------------------* START-OF-SELECTION. *** Cria os eventos para este programa (CLASS) CREATE OBJECT WO_EVENT_PROGRAM. *** Executa a tela SET SCREEN 100. END-OF-SELECTION. *&---------------------------------------------------------------------* *& Definição de rotina e funções para este programa *&---------------------------------------------------------------------* *** Modulo de controle PBO INCLUDE ZA_ROMANEIO_PBO. *** Modulo de controle PAI INCLUDE ZA_ROMANEIO_PAI. *** Rotinas de PERFORMS e eventos INCLUDE ZA_ROMANEIO_FORM.