1

古いFortan77コードをVB.netに変換する必要があります。私たちの誰もFortranを知らないので、私たちは大きな進歩を遂げました。ただし、ネストされた暗黙のdoループがいくつかある次のwriteステートメントに遭遇しました。私たちは暗黙のdoループに精通していますが、MN：MNのコロンの重要性が何であるかはわかりません。このステートメントでは、後者のようなコンマを使用した暗黙のdoループを見たことがあります(NREC,MN)。

Logical*1 DECLN(492)

WRITE(6,9238)NPERMN(NREC),CUSIPS(NREC),TICKRS(NREC),NAMES(NREC),(DECLN(MN:MN),MN=1,30),(SCORES(NREC,MN),MN=1,30))

format(I7, 1X, A8, 1X, A8, 1X, A20, 1X, 12A1, 1X, 12A1, 1X, 6A1/(12F10.5))
4

3 に答える 3

4 
DECLN(MN:MN)

と呼ばれる文字変数からの1文字の抽出のように見えますDECLN。表現

(DECLN(MN:MN),MN=1,30)

（これは式です）プログラムは、最初の30文字を30個の個別の文字としてio-implied-do書き込みます。DECLNフォーム

(DECLN(1:30))

同じ文字を1回の30文字の長さで書き込みます。

DECLN(MN:MN)それはランク1配列の1要素セクションである可能性があります。そのDECLN場合、それは奇妙な書き方です。DECLN(MN)

于 2012-08-01T15:13:14.283 に答える
2

DECLN（MN：MN）は、文字列から1文字を抽出するために使用されます。

于 2012-08-01T15:13:32.163 に答える
0

アップデートで指摘されているように、DECLNは文字ではありません。これは1バイトのLOGICAL配列（証券に関する情報を含む）です。（DECLN（MN：MN）、MN = 1,30）は最初の30個の要素を識別していますが、もっと簡単に記述できると思います（DECLN（MN）、MN = 1,30）。CUSIP（9桁のコード）はA8で記述されており、チェックサムを切り捨てます（通常、十分な手順です。ほとんどの清算機関はそれを無視するため、ブライアンは知っていると思います）。

于 2018-06-11T00:10:01.510 に答える