How to change the current workspace directory in MapBasic

Products affected: MapInfo Pro™, MapBasic™ 
There is no method to change the workspace path using MapBasic. However, if users are opening workspaces from the File > Open dialog then they can use the GetCurrentPath$ statement to return the path to the workspace, for example:
include "mapbasic.def"
declare sub main

sub main
dim sMiPrfFile as string
Print sMiPrfFile 
end sub
UPDATED:  December 6, 2019