|
1:旧家イトウ家の小技裏技（その１５） 江須扇 12/31 09:07 ------------------------------------------------------------------------------------------- その１５）ＷｉｎｄｏｗｓＡＰでのソース編集 ------------------------------------------------------------------------------------------- 最新版のＦｉｌｖｅｒｔ（Ｖｅｒ５．０）ではＡ−ＶＸのソースエディターが提供されたようです。 その機能を真似てＪＣＬを作ってみました。 ＳＹＳ＠ＪＳＬに下記のをＪＣＬ名ＰＣＥＤＩＴと登録し修正したいソースをＴＥＳＴ０１とした時 ＲＵＮ ＰＣＥＤＩＴ，（ＴＥＳＴ０１）； で可能です。 但し、Ｗｉｎｄｏｗｓ側のエディターの自動起動はＰＣ／ＷＳ−ＥＭＬがＵ７５８３０−Ｐ７０３以降になります。 自動起動はエミュレータを立ち上げ直後は巧く行きますが、何度もやるとゴミが入りファイルが呼べません。 ターラヤンさんのＣＯＢＯＬで作ったものを使うほうが確実です。 手動起動ならば、Ａ−ＶＸ�鍵聞澆任△譴丕錬砲隼廚い泙后� Ａ−ＶＸ?は＃ＰＣＣＮＶは共有ファイルは指定できないので無理と思います。 代替機能として＃ＦＴＣＮＶを使えば可能かもしれません（たぶん） なお、元ソースを置換しますのでテストはくれぐれもご注意ください。 ＳＵＬのバックアップを採る事をお奨めします。 また、更新番号（ＲＥＶ）は付きませんのでその点もご理解ください。 以下、サンプルＪＣＬ ------------------------------------------------------------------------------------------- /RUN #LBM; PRD=PRN999_ MDE=MSD_ MCI=_ MFI=WORKSUL_ ←ソースの入っているライブラリ名 ACT=SELECT_ ←抽出を指定 ODE=MSD_ OCI=_ OFI=CIF_ ←８０バイトのカードイメージファイル NAM=&0_ ←ＪＣＬの仮パラメータ（メンバー名入力用） ODE=999_ ACT=999_ DIR=NO_ MDE=END_ /> ; /RUN #NFCNV; MN1=C_ ←変換指定 MN2=AD_ ←Ａ−ＶＸ形式からＤＯＳ形式を指定 PA1=MSD_ PA2=_ PA3=CIF_ ←８０バイトのカードイメージファイルを指定 PA4=1_ PA5=C80_ ←英数字項目８０桁を指定 PB1=G:\LINKA-VX\COBOLSOURCE.CBL_ ←共有フォルダーを指定 PB2=TXTJ_ ←テキスト（ＪＩＳ）を指定 PB3=EXCLUSIVE_ ←排他モードを指定 PB7=C_ PB8=CREATE_ ←生成モードを指定 MN1=Q_ /> ; // S0101407; // S0101006; // Q00NOTEPAD \\EXP600\LINKA-VX\COBOLSOURCE.CBL ; ←共有フォルダを指定 // ; // ; // ; // ＥＤＩＴが終了したら再開(CTRL+PF5)してください。 ; /PAUSE ; /RUN #NFCNV,DEV=MSD; MN1=C_ ←変換指定 MN2=DA_ ←ＤＯＳ形式からＡ−ＶＸ形式を指定 PA1=MSD_ PA2=_ PA3=CIF_ ←８０バイトのカードイメージファイルを指定 PA4=1_ PA5=C80_ ←英数字項目８０桁を指定 PB1=G:\LINKA-VX\COBOLSOURCE.CBL_ ←共有フォルダーを指定 PB2=TXTJ_ ←テキスト（ＪＩＳ）を指定 PB3=PROTECT_ ←保護モードを指定 PB7=C_ PB9=COPY_ ←複写モードを指定 MN1=Q_ /> ; /RUN #LBM; PRD=PRN999_ MDE=MSD_ MCI=_ MFI=WORKSUL_ ←ソースの入っているライブラリ名 ACT=REPLACE_ ←置換を指定 IDE=MSD_ ICI=_ IFI=CIF_ ←８０バイトのカードイメージファイル TYP=COBOL_ ←ＣＯＢＯＬを指定 LIN=YES_ NAM=&0_ ←ＪＣＬの仮パラメータ（メンバー名入力用） NAM=_ IDE=999_ ACT=999_ DIR=NO_ MDE=END_ /> ; ------------------------------------------------------------------------------------------- 今年最後の小技裏技をお届けしました。 本年は誠にありがとうございました。 来年も引き続き、小技裏技を投稿しますので宜しくお付き合いをお願い申し上げます。 |