Amigos tenho uma dúvida, estou desenvolvendo um browser e gostaria de buscar o codigo do bem e a data da ultima movimentação do mesmo, para isto criei o programa a seguir, mas travei na hora de usar o Find Last, agradeço caso alguém possa me ajudar. /***************** PROCEDURE PESQUISA TEMP TABLE ***************************************************/ &ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE proc-pesq C-Win PROCEDURE proc-pesq: FOR EACH bem_pat NO-LOCK WHERE bem_pat.dat_aquis_bem >= DATE(EditDataInicio:SCREEN-VALUE IN FRAME frame-1) AND bem_pat.dat_aquis_bem <= DATE(EditDataFinal:SCREEN-VALUE IN FRAME frame-1), EACH sdo_bem_pat NO-LOCK WHERE bem_pat.num_id_bem_pat=sdo_bem_pat.num_id_bem_pat and sdo_bem_pat.dat_sdo_bem_pat <= DATE(EditDataSaldo:SCREEN-VALUE IN FRAME frame-1): RUN proc-tmp-BEM. NumReg = NumReg + 1. i-linha = i-linha + 1. Percentual:SCREEN-VALUE = STRING(i-linha,"999999"). END. END PROCEDURE. /* _UIB-CODE-BLOCK-END */ &ANALYZE-RESUME
Você pode fazer o find first sdo_bem_pat e colocar parar usar um índice (use-index sdbmpt_data), que já está preparado para o que você precisa.