Refresh Embedded view on Parent when child response saves and closes without opening new parent window on newdoc

Hi, I have an embedded view of Response docs on Parent form that need to refresh.
1st problem: If the Parent is a New Doc, and once the response is created from the parent and saved/closed, I need the Embedded View to Refresh.
I found this code from this forum that refreshes embedded view if parent is new doc, but a second Parent Window is opened if the Parent is a new doc. Code is in queryclose event of child.
After closing Parent, I'm faced with having a 2nd Parent window to close.

2nd problem with using this code: From the view navigation, if you open a response doc, and after it closes, it re-opens the Parent, when I just need it to go back to the view navigation.

How do I modify this code to refresh embedded view on parent w/out the 2nd window opening.  If there is a better way, please explain with a workable example.   Thanks in advance for your help.  I researched this time and time again with no resolution.  High points for a working resolution.

' refresh parent EMBEDDED VIEW  by opening parent and refreshing.  The False is used to get handle on current parent window if open, otherwise open new window
	If Source.EditMode = True   And  Source.IsNewDoc = False Then		
		Dim session As New NotesSession
		Dim ws As New NotesUIWorkspace
		Dim db As NotesDatabase
		Dim doc As NotesDocument
		Dim uiDoc As NotesUIDocument
		Set db = session.CurrentDatabase
		Set doc = db.GetDocumentByUNID(Source.Document.ParentDocumentUNID)   ' get invalid unique id error
		Set currentDoc = Source.Document
		Set uiDoc = ws.EditDocument(True, doc, False, "", False, False)   'The False is used to get handle on current parent window if open, otherwise open new window
		
		Call uiDoc.Refresh
	End If

Select allOpen in new window