Google
オフコン練習帳内を検索
インターネット全体を検索

NECオフコン関連
オフコン一般
情報

[掲示板に戻る]

Re:JCL上での質問です 0e0e 2005-12-14 12:14
ありがとうございます！ RH 2005-12-14 19:47
Re:ありがとうございます！ オフコン人 2005-12-15 23:47

7 Re:JCL上での質問です
0e0e 2005-12-14 12:14  [返信] [編集]

こんな感じかな・・・


workで


000820 01  CALL-PAR.
000830     02 F          PIC X(15) VALUE "#NFCNV,DEV=MSD;".
000840     02 F          PIC X(25) VALUE "MN1=C_MN2=AD_PA1=MSD_PA3=".
000850     02 INFILNM    PIC X(17).
000860     02 F          PIC X(19) VALUE "_PA4=1_PA5=C80_PB1=".
000870     02 OUTFILPATH PIC X(25).
000880     02 F          PIC X(26) VALUE "_PB2=TXTJ_PB3=SHARE_PB7=C_".
000890     02 F          PIC X(14) VALUE "PB8=ADD_MN1=Q_".
000900     02 F          PIC X(02) VALUE "/>".
000910 01  CALL-SIZE     PIC 9(04) VALUE 143.


プロシジャで


001040*
001050     MOVE 入力ファイル名               TO INFILNM.
001060     MOVE "D:\aaaa\出力ファイル名.TXT" TO OUTFILPATH.
001070*
001260     CALL "CBLRUN" USING CALL-PAR CALL-SIZE.
001280     STOP RUN.


9 ありがとうございます！
RH 2005-12-14 19:47  [返信] [編集]

0e0eさんありがとうございます。

この方法で大丈夫です！

そもそも、あまりCOBOLでNFCNVをやった事がなかったので

手法が眼中にありませんでした。

江須扇さん

オフコン人さん

うどんさん

重ねて御礼を申し上げます。
10 Re:ありがとうございます！
オフコン人 2005-12-15 23:47  [返信] [編集]

RHさん、失礼いたしました。



中途半端なことを書いた後、フォローいただきましたこと感謝いたします。

急に出張で心配していたのですが、皆さん、ありがとうございました。

BluesBB ©Sting_Band