(
  IN  p_Input_LevelIndentation88 INTEGER
)
DYNAMIC RESULT SETS 1
LANGUAGE SQL
ss: BEGIN
            
            DECLARE v_Input_LevelIndentation88 INTEGER;
            
            DECLARE crs CURSOR WITH RETURN FOR
            SELECT DISTINCT
					 v.ProgIDReference,
		            prgAlsxyz.AliasName AS ProgramName,
		            pth.PathStr,
		            occ.StartRow,
		            v.IsCopy
		     FROM Variables v
		          INNER JOIN VariablePos vp ON v.VarID = vp.VarId
		          INNER JOIN Variables v2 ON v.Father = v2.VarID
		          INNER JOIN VariablePos vp2 ON v2.VarID = vp2.VarId
		          INNER JOIN Occurrences occ ON v.OccurID = occ.OccurID
		          INNER JOIN Paths pth ON occ.PathID = pth.PathID
		          INNER JOIN Programs prg ON v.ProgIDReference = prg.ProgramID
		    	  INNER JOIN ProgramAliases prgAlsxyz ON prg.ProgramId = prgAlsxyz.ProgramID
						AND prgAlsxyz.AliasType = 0
			 WHERE v.iLevel = 88
		          AND (vp.LevelColumn != 18)
                  AND ((vp.LevelColumn - vp2.LevelColumn) != v_Input_LevelIndentation88 )
                  AND (vp.LevelColumn < 19)
		          AND prg.ProgramTypeID = 1
		     ORDER BY prgAlsxyz.AliasName,
		              pth.PathStr,
		              occ.StartRow;
            
            
            SET v_Input_LevelIndentation88 = p_Input_LevelIndentation88;

            OPEN crs;
            
 END ss	
 
 
