CVTDATコマンドを使用し日付の計算を行なえます。
日付フォーマットが　YMD、MDY、DMYであっても正しく計算してくれます。

当HP　AS/400　Tips&Techniques　の　
コマンド-[24.CVTDAT　日付形式変換コマンドの利用]-に
サンプルプログラムがありますので、参照ください。