SCHEMA decomarmol
GLOBALS
 DEFINE usuarios,clave VARCHAR(50),
        p_compania RECORD LIKE companias.*,
        idx SMALLINT,
        criterio,SELEC STRING,
        resultado BOOLEAN
 
DEFINE xsv RECORD LIKE svtb00001.*
DEFINE arr_sv DYNAMIC ARRAY OF RECORD
   items    VARCHAR(20),
   aplica   VARCHAR(10),
   medida   VARCHAR(10)
END RECORD,
       r_output CHAR(3),
       HANDLER om.SaxDocumentHandler,
       r_filename VARCHAR(20),
       preview smallint,
       arr_productos DYNAMIC ARRAY OF RECORD
       
       END RECORD
       
END GLOBALS