プログラム dcl-s custNo; dcl-s custName; input custNo; if custNo = '1001'; eval custName = 'KURUMON'; else; eval custName = 'UNKNOWN'; endif; display 'CUSTOMER NO:' + custNo; display 'NAME:' + custName; 入力(JSON) { "custNo": "1001" } 実行 Java変換 Main.java 保存 別サンプル 端末UIへ AS/400トップ