OpenSTAAD Macro for Moving Nodes

I'm working with a larger STAAD model that was generated from a 3D model software. There are a lot of problems with beams being not being connected or aligned. I started to write a macro that would allow me to move a node to closest point on a selected beam but I'm having problems with the SetNodeCoordinate command. The SetNodeCoordinate runs but nothing seems to happen. I am able to create a new node in the desired location with the AddNode command but moving a node would be much better.

Here's a minimal code and STAAD file that I'm testing on.

Sub Test()

Dim OS As Object
Set OS = GetObject(, "StaadPro.OpenSTAAD")

OS.Geometry.SetNodeCoordinate 3, 30, 0, 0

End Sub

Alternatively, if there's a command to change the beam incidence that would also work but currently I'm doing that part manually.

Thank you.

communities.bentley.com/.../Test-Node-Coordinate.STD