Your changes are ok, but I define the api-calls and references like this:
$set constant UNICODE (0)
$IF UNICODE = 0
78 Suffix value "A".
$ELSE
78 Suffix value "W".
$END
78 ShellExecute value "ShellExecute" & Suffix.
78 GetCurrentDirectory value "GetCurrentDirectory" & Suffix.
78 GetUserName value "GetUserName" & Suffix.
78 GetComputerName value "GetComputerName" & Suffix.
78 CreateProcess value "CreateProcess" & Suffix.
78 WaitForSingleObject value "WaitForSingleObject".
78 SW-HIDE value 0.
78 SW-SHOWMINNOACTIVE value 7.
01 int is typedef pic s9(SZ) comp-5.
01 HINSTANCE is typedef int.
01 se-hInstance HINSTANCE.
and so on.
regards
Georg