I have an application that I occasionally get the error "Target table is already engaged in a relation".

In an attempt to better understand the Set Relation command, I am trying to generate the error with some test code.

Why doesn't the following code generate an error?

Select lrsPanelGrp
Set Order To Code
Select lrsPast
Set Relation To Panelcd1 InTo lrsPanelGrp
Select lrsRefer
Set Relation To Panelcd1 InTo lrsPanelGrp

TIA