{ programa: testarray.4gl fecha : 1/11/2013 } DEFINE arreglo1 DYNAMIC ARRAY OF RECORD edit1 CHAR(10), edit2 CHAR(20) END RECORD DEFINE arreglo2 DYNAMIC ARRAY OF RECORD edit3 CHAR(10), edit4 CHAR(20) END RECORD MAIN CALL testarray() END MAIN FUNCTION testarray() END FUNCTION