How to get the lower level shapes in skill?

I want to get the lower level shapes in an area.Also,I saw a post in forum.

Code  writing like below:

******************************************************

procedure(abGetOverlapShape(overlap)
  if(listp(overlap) then
      abGetOverlapShape(cadr(overlap))
  else
      overlap
  )
)

cv=geGetEditCellView()

figList2= dbGetOverlaps(cv list(car(pts) car(pts)) list("M2" "drawing") 32 t)

flattenendFigList2=foreach(mapcar overlap figList2
  srcShape=abGetOverlapShape(overlap)
  dbCopyFig(srcShape cv dbGetHierPathTransform(overlap))
)

******************************************************

But 'dbGetHierPathTransform' is used for IC6.1.How can I replace it in IC5.1?Thanks!!