CREATE CURSOR Prg (Line C(254)) APPEND FROM Mc_procs.Prg TYPE SDF ; FOR UPPER(LEFT(ALLTRIM(prg.line),4))=="PROC" ; OR UPPER(LEFT(ALLTRIM(prg.line),4))=="FUNC" ; OR UPPER(LEFT(ALLTRIM(prg.line),4))=="LPAR" ; OR UPPER(LEFT(ALLTRIM(prg.line),4))=="PARA" browse