• 締切済み

COBOLで、Shellを起動するには？

chinkovicの回答

回答No.2

メーカ系SEです。 プログラマではないので、コーディング等細かいことは言えませんが、私のプロジェクトではこのようにしています。 (1)C言語のサブルーチンでsystem()とかいう関数でスクリプトを実行。 (2)このサブルーティンをCOBOLからCALLする。 これじゃだめですかね？

この回答がついた質問に戻る
回答 全件
コンパイラでリンク定義する事で可能と思います。 （静的リンク定義にす…
  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. その他（プログラミング・開発）

関連するQ&A

  • COBOLのＰＥＲＦＯＲＭ文

    COBOL初心者です。 COBOL97使用で、 02 VAL OCCURS 15 TIMES PIC 9(4). と定義して、 PERFORM TEST BEFORE VARYING COUNTER FROM 1 BY 1 UNTIL COUNTER > 15 のPERFORM文を書きました。 エラーもなく起動したのですが、 １５回過ぎても永遠処理が終わりません。 無限ループというのでしょうか？ 15回目でバチッと終わるにはどういたらよいでしょうか？ どなたかお助け下さい。

  • COBOLから呼ばれる時

    COBOLプログラムから呼び出され、ファイルのレコードを一行読んでレコードの内容を返すというｃサブルーチンを作っているのですが、COBOL←→ｃ間でのインタフェースの扱いかたがよくわからなくて困っています。（ちなみにこのモジュールはｃからも呼ばれる事がある） COBOLはコピー句(test001.cbl, test002.cbl)に値を入れて、ｃサブルーチンにそれを渡しています。 テストはCOBOL85を使用してるので、ｃサブルーチンの中のデータを見ることができません。なので、返ってくるコピー句の中身を見るのですが、とにかく値が設定されてかえってこないのです。ただ単にロジックのバグと言う可能性もあるけど（＾＾； 私はインタフェース環境の事がまだ良く解っていないので、今回こちらに質問した次第です。経験者の方がいましたら、どうかおしえてください。 あ、それからCOBOLから渡される値は、c側では全てchar型で受け取らなければいけないような話しを聞いたのですが、本当でしょうか？ もう一つ。 コピー句の中で「F-CODE　PIC X(2)」のようにハイフンがあるのですが、ｃではハイフンが使えないからダメなんでしょうか？ たくさん質問してしまいましたが、どうかよろしく。 /COBOL側/ -------------------------------------------------- CALL 'TEST1' USING BY VALUE TEST001 TEST002. -------------------------------------------------- /ｃサブルーチン側/ -------------------------------------------------- int TEST1(test001, test002) char *test001; char *test002; { 　　　　・ 　　　　・ 　　　　・ return (0); } --------------------------------------------------

  • COBOLのRETURN-CODE

    メインフレームのCOBOLでは、RETURN-CODE特殊レジスタにリターン・コードを設定し、親のプログラムやOSで拾うことができました。 引数で受け渡しした方が、詳細情報をやり取りできるため、利用頻度は高いとは言えませんでしたが。 http://oshiete1.goo.ne.jp/qa3192627.html の質問＆回答では、「COBOLのCALL文で呼ばれたプログラムから、戻り値は返却できない」といった回答がありました。Windows版のCOBOLでは、RETURN-CODEは未サポートなのでしょうか？

  • cobolの関連ソースについて

    今、触ったこともないｃｏｂｏｌのソースの管理をやれ、と言われてます。 で、ｃｏｂｏｌの実行プログラム、拡張子は、*****.so 見たいな感じなのですが、それをコンパイルするのに、多くのソースがいるみたいなのです、その関連を調べろ、と言われました。たとえば、ｃｏｂｏｌのmakefileと呼ばれているものを、ｕｎｉｘ上でｖｉで開いてみると、「ヘッダープログラム」なるコメント文が書いていたり、オブジェクトとか書いていたり、、そして、そのヘッダーの部分をみると、たしかにプログラムの名称が書いているので、今度はそのプログラムの中身を見てみると、同じように、また違うプログラムを参照しているようなのです。ひとつの実行ファイルを生成するのに、ソースがツリー構造になっていて、それをすべて理解する必要があるのですが、中身をみたときに、どういうコマンド等を参照していけばいいのかわかりません。 分かりやすく整理すると、ある実行プログラムを生成するのに、ソースが必要なのですが、そのソースの全てを洗い出すには、どうすればいいのか？ということなのですが、 詳しい方、ぜひよろしくお願いします！

  • 　cobolのカーソルについて

    　cobolのカーソルについて 　初投稿させていただきます。ですので体裁やルールを守れていない場合は、ご指摘願います。 　cobolにおいて埋め込みSQL文によるカーソルをオープンし、fetchでテーブルを読み込む作業についてなんですが、一度のプログラム起動において同じテーブルを複数回読むにはどのようなソースを描けばよいのでしょうか。 　具体的にはあるテーブルの５個のレコードを上から順に何度も読むといった次第です。 　お分かりになられる方がいましたら、ご指導願います。よろしくお願いします。

  • Shell関数で起動したメディアプレーヤーを終了したい。

    以前このコーナーで質問して教えて頂いたShell関数でメディアプレーヤーを起動できました。（以下にそのコーディングを記載しました） 今度は起動したメディアプレーヤーをVBから終了する方法が知りたいのですが教えて頂けませんか。 Shell ("C:\Program Files\Windows Media Player\wmplayer.exe /1 G:\TEST.wma ,vbMinimizedFocus") 宜しくお願いします。

  • VB6のWScript.Shellについて

    ＶＢ６のWScript.Shellで、他のＶＢ６プログラムを起動する時の戻り値について教えてください。 ＡというＶＢプログラムからＢというＶＢプログラムを起動するシステムがあります。 Ｂというプログラムで取得した値をＡに返す方法はありますでしょうか？ Ａのソースは以下の通りです。 --------------------------------------------- sub test() dim objWshShell set objWshShell = Wscript.CreateObject("WScript.Shell") objWshShell.Run "C:\B.exe" & " " & hikisu1 & " " & hikisu2 , 1, wait End Function ---------------------------------------------- objWshShell.Runの戻り値はtrueまたはfalseのみのようです。 Ｂ.exeからtrue、false以外の値を取得する方法はありますか？ また、やり方はobjWshShell.Runでなくてもよいです。 よろしくお願いします。

  • VBのshellについて。

    すみません。教えてください。 環境OS:winXP ソフト:VB6.0 sp5 内容:shellを利用してbatファイルをキックさせようとしていますがうまくいかないのです。 --VBソース-- Str = "C:\program file\SOFT\test.bat" & "/w" nR = shell(Str,1) -- batファイルの中身-- @echo dir %1 > "C:\Program File\SOFT\log.txt" 以上のデータなのですが、EXEを作成し、Shellを起動するとエラーが帰ります。 確認したところ、windows2000では問題ないのですが、XPではProgram Fileのスペースが問題で、エラーになってしまうのです。 教えていただきたいのは、 １．本当にXPではスペースのあるディレクトリ名はエラーになるのかということ。 ２．もしエラーになるのであれば、対応策。 の上記の２点を教えてくださいませ。 いろいろ試し、探しているのですが、なかなか見つからず困っています。　XPのみできないっていうのも半信半疑だし・・・・ お願いします。

  • Shellスクリプトについて

    趣味で自宅にubuntuを入れて、Linuxの本を片手にもって勉強している学生です それでshellスクリプトでテストの結果を入力したら自動的にA.B.Cと認識するプログラムを作ったんですけど $ ./test ./test: line 4: echoPlease input your record: command not found 12 ./test: line 7: case12in: command not found ./test: line 8: syntax error near unexpected token `)' ./test: line 8: `100 | 99 | 98 | 97 | 96 | 95 | 94 | 93 | 92 | 91| 90 ) echo"A";;' なぜコマンドが見つからないのかわかりません ちなみにプログラムは #!/bin/sh echo"Please input your record" read record case"$record"in 100|99|98|97|96|95|94|93|92|91|90) echo"A";; 89|88|87|86|85|84|83|82|81|80) echo"B";; 79|78|77|76|75|74|73|72|71|70) echo"C";; 69|68|67|66|65|64|63|62|61|60) echo"D";; 59|58|57|56|55|54|53|52|51|50) echo"E";; 49|48|47|46|45|44|43|42|41|40) echo"F";; 39|38|37|36|35|34|33|32|31|30) echo"G";; 29|28|27|26|25|24|23|22|21|20) echo"H";; 19|18|17|16|15|14|13|12|11|10) echo"I";; 9|8|7|6|5|4|3|2|1|0) echo"J";; *)echo"sorry,answer not recognized";; esac exit もしどこか間違っていたら教えてください

  • ShellからTruncate【Linux】

    現在、ShellでSQL*PLUSを起動し、 テーブルをTruncateしようとしているのですが、 直接コマンドで実行すると可能なんですが、Shellで実行すると接続してすぐに切断されSQLが実行されません。 <Souce> ora_pass=TEST/TEST@DB log_pth=/home/oracle/TEST/04_log/ scrLOG=${log_pth}SHELL.log echo "S" sqlplus $ora_pass <<EOF > $scrLOG truncate table W_BSL_INV; EOF echo "E" ちなみにSelect文はｓｃrLOGに正常に出力されます。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する
質問する