($title_img_alt)

こちらからの投稿は、先頭に表示されているコメントへの返信になります。
サービスプログラムが作成できない 塩野 さん [ 11月24日(金) 10時24分 ]
消費税を計算するサービスプログラムを作ろうとしていますが
モジュールの作成までは行くのですが、サービスプログラムのコンパイルを行うと
「 サービス・プログラム PROC001 は作成されなかった。」というメッセージが出て
作成されません。 どこに問題点があるのかご教示頂けますでしょうか?
よろしくお願いします。


ソース SRCFILE(@SHIOG/QRPGLESRC)  

**FREE
//===============================================================*
//====【PGM】: PROC001
//====【見出し】:サービスプログラム001
//
//  CRTRPGMOD MODULE(QTEMP/PROC001) SRCFILE(@SHIOG/QRPGLESRC)
//  DBGVIEW(*SOURCE) AUT(*ALL)
//===============================================================*
CTL-OPT NOMAIN ;
CTL-OPT DFTNAME(PROC001) ;
//
//===============================================================*
//====【PGM】: TAX_CALC
//====【見出し】:消費税額算出  サブプロシージャ
//
//  CRTRPGMOD MODULE(QTEMP/TAX_CALC) SRCFILE(@SHIOG/QRPGLESRC)
//  DBGVIEW(*SOURCE) AUT(*ALL)
//
//===============================================================*
DCL-C SALES_TAX CONST(0.10) ;
//
DCL-PROC TAX_CALC EXPORT;

  DCL-PI *N  PACKED(11:0) ;
    EXCLUDING_TAX PACKED(11:0) VALUE ;
  END-PI;

  RETURN EXCLUDING_TAX * (1 + SALES_TAX) ;
END-PROC;
//-------------------------------------------*     


モジュール作成コンパイル
CRTRPGMOD MODULE(QTEMP/PROC001) SRCFILE(@SHIOG/QRPGLESRC)  
DBGVIEW(*SOURCE) AUT(*ALL)    


サービスプログラム作成コンパイル ←これがうまく行きません
CRTSRVPGM SRVPGM(MGSPGMT/PROC001) MODULE(QTEMP/PROC001)   
SRCFILE(@SHIOG/QRPGLESRC) AUT(*ALL)                       
                             
RE:サービスプログラムが作成できない IKD さん [ 11月28日(火) 15時21分 ]
CRTSRVPGM でSRCFILE に QSRVSRC ではなくQRPGLESRCが指定されているようですが
SRVSRCを指定しないとだめです。
ご質問のときには「うまくいきません」ではなく必ずエラー・メッセージを
くわしく説明しないと回答できません。
ご自分のわかっていることはすべて書くようにしてください。

お名前

パスワード

メールアドレス

タイトル

ホームページ

アドレス

項目