Pessoal quem ainda não teve que criar um programa que recebe parametros e na hora de testar fica perdendo muito tempo, pois tem que executar o programa chamador e tal.... Vejam o trecho de código a seguir. Reparem que dessa maneira fica simples simular se a procedure está fazendo o que deveria. Código: &IF DEFINED(UIB_IS_RUNNING) = 0 &THEN /* Real Code for Production */ DEFINE INPUT PARAMETER pi-type AS CHAR NO-UNDO. DEFINE INPUT PARAMETER pi-title AS CHAR NO-UNDO. &ELSE /* Local Version for UIB */ DEF VAR pi-type AS CHAR NO-UNDO. DEF VAR pi-title AS CHAR NO-UNDO. ASSIGN pi-type = "Vendor" pi-title = "Vendor Lookup by Name". &ENDIF