Sample Script:

FTP RMTSYS('162.252.12.150') PORT(821) SECCNN(*SSL) 
EDATxxxUSF ExxxEDI 
FADA 
BINARY 
LOCSITE NAMEFMT 1 
LCD /LOCALDIR/OUTBOX 
MPut * 
GET STAT 
CLOSE 


Please Note:
The newer version of the AS400 operating system dropped some older FTPS protocols
If needed, IBM is able to add these protocols back in