in ibmi ,as400 ,there is a cl source code like this XXXXXXXXXXPGM XXXXXXXXXXDCL VAR(&MSG) TYPE(*CHAR) LEN(6) XXXXXXXXXXDCL VAR(&PROFILE) TYPE(*CHAR) LEN(10) XXXXXXXXXXCHGJOB LOG(4 0 *MSG)...

in ibmi ,as400 ,there is a cl source code like this

0001.00 PGM
0002.00 DCL VAR(&MSG) TYPE(*CHAR) LEN(6)
0003.00 DCL VAR(&PROFILE) TYPE(*CHAR) LEN(10)
0004.00 CHGJOB LOG(4 0 *MSG) LOGCLPGM(*YES)
0005.00 DSPUSRPRF USRPRF(&PROFILE)
0006.00 SNDMSG MSG(&MSG) TOUSR(&PROFILE)
0007.00 ENDPGM

do the following changes
The &PROFILE variable must be your user profile.
The &MSG variable must be “Hello World”.
Add a command of your choice.
then create a program that will successfully execute.
Test the program interactively.
and i changed it like this
0001.00 PGM
0002.00 DCL VAR(HELLOWORLD) TYPE(*CHAR) LEN(6)
0003.00 DCL VAR(USER009) TYPE(*CHAR) LEN(10)
0004.00 CHGJOB LOG(4 0 *MSG) LOGCLPGM(*YES)
0005.00 DSPUSRPRF USRPRF(USER009)
0006.00 SNDMSG MSG(HELLOWORLD) TOUSR(USER009)
0007.00 ENDPGM

i want to know is my change right ?what code should i add to make it run and test it ?