11.25.RPG400ネストマーカー

				Wiki
	updated on 2004.06.24

タイトル	RPG400ネストマーカー
コマンド名	NSTUPD
サイズ	9 KB
内容	RPGのIF・DOネスト、および、ENDxx更新です。
対応機種	AS/400 V3.1(これ以降も可能)
使用言語	RPG400　CLP CMD
ライセンス	フリーソフト（利用既定）
ダウンロード	不具合が見つかりました。しばらく、ダウンロードを中止します。2002-2-4

ソースメンバーリスト

NSTUPD	CMD	NEST MARKER
NSTUPDCL	CLP	CPPです。
NSTUPDR	RPG	RPG400用マーカ設定です。
NSTUPDR2	RPG	RPG IV用マーカ設定です。

このｚｉｐファイルは、保管ファイルを固めたものです。

保管された ﾗｲﾌﾞﾗﾘｰ. :   QTEMP                  リリース・レベル  . :   V4R2M0 
ASP . . . . . . . . :   1                      データの圧縮  . . . :   YES    
保管ファイル  . . . :   NSTSAVF                表示された ｵﾌﾞｼﾞｪｸﾄ :   1      
  ライブラリー  . . :     IPLTEMP              保管された OBJ 数 . :   1      
レコード  . . . . . :   76                     アクセス・パス  . . :   0      
保管コマンド  . . . :   SAVOBJ                                                
活動時保管  . . . . :   *NO                                                   
保管日／時刻  . . . :   01/06/24   15:57:39                                   
                                                                              
オプションを入力して，実行キーを押してください。                              
 5= 保管されたデータ・ベース・ファイル・メンバーの表示                        
                                                                              
PT  ｵﾌﾞｼﾞｪｸﾄ           ﾀｲﾌﾟ      属性          所有者           ｻｲｽﾞ   ﾃﾞｰﾀ   
    NST                *FILE    PF            KAKEFUDA        122880   YES

 ﾒﾝﾊﾞｰ      
 NSTINST                           
 NSTUPD                            
 NSTUPDCL                          
 NSTUPDR                           
 NSTUPDR2

1) RSTOBJ OBJ(NST) SAVLIB(QTEMP) DEV(*SAVF) SAVF(xxxx/NSTSAVF) 
これを対話型で行ってください。小さいので、直ぐ終わります。

2) QTEMPの中にソースファイルNSTができます。

3) その中のソースメンバーNSTINSTをコンパイルしてください。

4) コマンドはKTKUTLというライブラリーに作成されます。予め準備しておいてください。さらに、
CALL NSTINST ('NST' 'QTEMP') 
を実行してください。

You are at K's tips-n-kicks of AS/400

SEO		[PR] 爆速!無料ブログ無料ホームページ開設無料ライブ放送