Andy,
I tried to simplify the program code and found that would not appear the error again.See the attachment
test11.lsp.
In the simplified code it only had to do command
position_pa to translate one fixed length alone one direction.And in the old code it had to do command
position_pa to translate and rotate and then to do
subtract.
Maybe it's interrupted between the commands. I could not sure about that.