Embedded folder Not showing doc

i got the following problem:i put documents in a folder that is embedded in a form, then i open the doc throu ws.editdocument and it doesn’t show the docs in the embedded folder, but if i open the folder manually, the docs are in the folder. here is the code i’m using.

Set doc = dc.getfirstdocument

If Not doc Is Nothing Then

	Set dc= doc.Responses

	Call dc.PutAllInFolder("embedded docs")	

	Call ws.EditDocument(True, doc)

End If