Having trouble creating a group and flattening within it

Hi, everyone.

I want to select some mosaics in a layout  (manually before running the script), and then run the script which will create a group in the layout, pull the selected mosaics into that group, and flatten the mosaics in the group.  This is my code:

let((cv group1 instList)
     cv=geGetWindowCellView()

     instList=selectedSet()

     group1=dbCreateFigGroup(cv "myGroup" t 0:0 "R0")

     foreach(inst instList

          dbAddFigToFigGroup(group1 inst)

           )

     figGroupId=dbGetFigGroupByName(cv "myGroup")

     figList = figGroupId~>figs

     foreach( fig figList

          dbFlattenInst( fig 1)

           )
     )

I've found that it will create the group if I remove the flatten command, and it will flatten everything if I remove the AddFigToFigGroup command, but it won't do both.  Does anybody see what I'm doing wrong?

Thanks.

Steven