問題タブ [gnucobol]

乱数ジェネレーターを作成しようとしています (乱数は後で [AZ] 文字に変換されます)。ランダム ジェネレーターの主要部分は動作していますが、常に同じランダム結果を受け取り0.6734141422ます。

私が直面しているもう 1 つの問題は、プログラムのコンパイルが速すぎるということです。現在の日付をミリ秒単位で使用しているため、プログラムを高速にコンパイルすると、同じシードがRANDOM関数に与えられます。に適用する前に、各シードをカウンターで割るカウンターを単純に追加することを考えていましたRANDOM。これで十分でしょうか、それとももっと洗練されたソリューションがありますか?

異なるシード値が適用されているにもかかわらず、常に同じランダムな結果を受け取る理由を誰かに説明してもらえますか? プログラムを実行するたびに、この結果が得られます。

私が読んだ限り、OpenCobolに準拠しているPerCobolコンパイラを使用しています。

総括する：

• 均等なシードを克服するにはどうすればよいですか?

• 異なるシードで同じランダム結果を受け取るのはなぜですか?

  /li>

出力例:

私の元の問題 (英数字で構成されるランダムなパスワードの作成) にアプローチするための提案があれば、それも喜んで聞きます。

編集:シードを省略すると、両方の問題が一度に修正されます。この結論の背後にある詳細については、以下のコメントを参照してください。別のシードでも同じ値が得られる理由について誰かが説明してくれたら、それを聞いてうれしいです!

OpenCOBOL は、バイナリをコンパイルする途中で中間 C ソースを使用し、libc ユニバース全体にアクセスできるようにします。複数の SWIG ラッパーを集中的に埋め込むことを目標に:

gcc は非常に優れたバイナリを構築し、Java と COBOL コンパイラの C 出力がうまく混ざり合っています。

swig -tclこれまでのところ、 、-perl、-pythonおよびのみがテストされ-javaています (もちろんすべて異なりnextbig_wrapper.cます)。

ブレンディング（たとえば）swig -javaと同じものをswig -python横切ることには、どのくらいの悲しみが伴いますか？2 つ以上のターゲットファイルを管理する際に手動で介入するための既知のイディオムはありますか? それとも、やってはいけないこととして知られていることですか？nextbig.cnextbig.i_wrapper.c

私は主に2つの関数を呼び出しています。(Decrypt) と呼ばれる 2 番目の関数は、その内部で最初の関数 (Encrypt) を呼び出します。したがって、ここでは Encrypt が 2 回呼び出されています。メインで 1 回、次に Decrypt で 1 回。

問題は、この方法で機能することを拒否することです。Encrypt がメインで使用されると、プログラムのどこでも Encrypt を使用できなくなります。変数がまだ使用されているようで、新しい変数を渡すことができません。

たとえば、メイン関数から Encrypt を削除し、Decrypt のみを呼び出すと、正常に動作します。理由がわかりません。

Cobol でネストされた if ステートメントを使用しようとしています。私が知る限り、スタイルガイドに従っていますが、エラーが発生し続けます:

file_name.cob:64: エラー: 構文エラー、予期しない ELSE <- これは 2 番目の ELSE ステートメントです

コードの目的は Caesar 暗号として機能することですが、エラーを生成しているのはネストされた if ステートメントのみのようです。最初の IF ステートメントの ELSE 句の後にネストされたステートメントを入れようとしましたが、それも失敗しました。

編集:私はopen-cobolを使用しており、「-free」オプションでコンパイルしています

ありがとう！

このネストされた実行ループを COBOL で実行できないのはなぜですか?

END-PERFORMを入れると。EXIT PROGRAM の直前にある最後の行よりも早く、どの行でも動作します。しかし、毎回 INPUT C 値を表示するプログラムが必要です。外側の実行ループで。それは私を夢中にさせます。

私はCobolを勉強していますが、ファイルを読み取るときに問題があり、cobolはファイルのステータスを35として返しています...インターネットでこのステータスが何であるかを確認しました。私が理解していることから、システムはファイルが見つかりませんが、システムが識別する列を使用して、実行可能ファイルと同じディレクトリにファイルを作成しました...

どうすればこれを解決できますか?

私は COBOL を初めて使用します。最新のトレーニング アクティビティでは、次のような 3 つの項目の出力を取得しようとします。

1. 0000/2013
2. 00012345
3. 12345**

以下のコードを試してみましたが、明らかに必要な出力が得られません。ゼロは表示されません。

SQL サーバーにデータをロードしようとしています。したがって、以下のレイアウトに適したテーブルスキーマを誰でも提案できます。