Moving Source Code from another platform to ILE COBOL/400

There must be an easier, or more proper way to do this......

I have COBOL source code residing on an AIX box that I want to move to the
AS/400.

Here's what I did to move it:

1) In the QCBLLESRC file, I created an empty CBL source member named   TEST
(type CBL)

2) On the AIX box, I opened an FTP connection to the AS/400

3) I changed directory to the AS/400 library

4) I then did:   put  TEST.CBL  QCBLLESRC.TEST

5) I closed the FTP connection

At this point, my code was intact.  I had to change a couple of DISPLAY and
ACCEPT lines, but after doing so, I was able to compile and run
successfully.

I tried this omitting step 1 above, put then my source code does not have a
'TYPE' once it is copied to the 400.

I'm sure there must be an easier way to do this....

Is there someone on this group that has any suggestions?
Does anyone have any scripts, etc to automatically make the minor source
code changes required?

Thanks!

PS - I will keep the group updated with new information regarding this if
anyone is interested