
JAVAからAS/400のプログラムを起動しようとしています。
AS/400側はCLのプログラムで、
1.パラメータを受け取ってデータエリアの更新
2.他PGMのCALL(パラメータの内容を印刷)
の2つを行おうとしています。
実行したところ、1.のデータエリア更新はできているのですが、2.の他PGMのCALLが実行されません。
同じような経験をされた方で、何かご存じの方がいらっしゃいましたら、よろしくご教授ください。
以下、ソースを示します。
JAVA側の内容
import java.io.*;
import com.ibm.as400.access.*;
public class TESTD{
public static void main( String args[] ){
try{
CallAS400( args[0] );
}catch(Exception e){
System.out.println( e.getMessage() );
}
}
private static void CallAS400(String RCode){
try{
AS400 sys = new AS400(sysName,USER,PASS);
ProgramParameter[] parmList = new ProgramParameter[1];
AS400Text nametext = new AS400Text(6);
parmList[0] = new ProgramParameter(nametext.toBytes(RCode));
ProgramCall pgm = new ProgramCall(sys,TEST.PGM,parmList);
pgm.run();
sys.disconnectAllServices();
}catch(Exception e){
System.out.println( e.getMessage() );
}
}
}
*AS/400側:TEST.PGM の内容
PGM: PGM PARM(&CODE)
DCL VAR(&CODE) TYPE(*CHAR) LEN(6)
CHGDTAARA DTAARA(QTEMP/DTA) VALUE(&CODE)
CALL PGM(TESTPRINT) PARM(0 0 &CODE)
RETURN
ENDPGM
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
あるプログラムのコマンドライ...
-
PICマイコンのコピー(クローン...
-
読み込み中にアクセス違反が発...
-
モジュール、アプリケーション...
-
ドロップダウンリストの文字を...
-
「Outlookが他のプログラムによ...
-
VBAでユーザーフォームが自動的...
-
VBAにてメール作成した際、一部...
-
Excelに埋め込んだVBAのプログ...
-
未使用の変数を一括検索する方法
-
自動クエリとはどういうもので...
-
エクセルVBA 検索時に除外を設...
-
VC++コンソールアプリでウイン...
-
C言語で実行時間を指定して終了...
-
visual studio 2019を使ってい...
-
Excelで4096点以上のFFTの方法
-
銃を発砲するならともかく、日...
-
Vba UserFormを前面に出す方法...
-
方対数グラフを書く為の計算方...
-
写真のプログラムは、1からnま...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
あるプログラムのコマンドライ...
-
銃を発砲するならともかく、日...
-
Excelで4096点以上のFFTの方法
-
VBAにてメール作成した際、一部...
-
読み込み中にアクセス違反が発...
-
OS入ってる機器のソフト・アプ...
-
PICマイコンのコピー(クローン...
-
Vba UserFormを前面に出す方法...
-
未使用の変数を一括検索する方法
-
ドロップダウンリストの文字を...
-
powered byの表記について
-
VBAでユーザーフォームが自動的...
-
XnViewにwebpを「いつも開く」...
-
「Outlookが他のプログラムによ...
-
Excelに埋め込んだVBAのプログ...
-
自動クエリとはどういうもので...
-
UWSCで指定のフォルダを開きたい。
-
TMBMSRV.exeによるCPU使用率上昇
-
バッチ、vbs等でのソフトウェア...
-
Pro*Cで動的SQLを実現する為の...
おすすめ情報