ソース編集君でCOBOL編集時、エラー発生
m03cobol get_cond　でエラーとなる
実行時エラー'5'
プロシージャの呼び出し、または引数が不正です。

対象行：
GET_COND = RTrim$(Right$(AR_SRC(R, 1), Len(AR_SRC(R, 1)) - 11))

修正してみたのでこれでうまくいくか試してもらえませんか。
本体のみこちらに置き換えてください。
そして結果を教えてください。

ht@tp://srcedit.pekori.jp/beta.zip
（@を削ってください）

早急な対応、ありがとうございます。

エラーとなっていた数本試しましたが
エラーは、出ませんでした。

また、内容も問題ないようです。

しばらく、このバージョンで使わせていただきます。

ベータ版で色々試していると
別のエラーが発生しました。

実行時エラー'1004'
アプリケーション定義またはオブジェクト定義のエラーです。

M03COBOLのTREE_REEDIT_RTN
対象行：
With WS2.Cells(R2, WS2.Hyperlinks(H).Range.Column + 1).AddComment
※同じ行が３か所あるようですが、一番最後の行です。

宜しくお願い致します。

エラーとなる入力がないため今回も手探りで対応してみました。
対応がうまくいっているかわからないので確認をお願いします。

本体のみこちらに置き換えてください。
そして結果を教えてください。

ht@tp://srcedit.pekori.jp/beta2.zip
（@を削ってください）

対応、ありがとうございます。
本来ですと、ソースをお渡しし検証して頂くのがベストですが
色々と・・・手探り、申し訳ないです。

検証：
以前、発生した物は正常に終了しますが
新たにエラーが発生ししました。

実行時エラー'1004';
アプリケーション定義またはオブジェクト定義のエラーです。

対象行：
M03COBOLのINPUT_RTNの
'分離符除去
AR_WK(R, 1) = Application.Substitute(AR_WK(R, 1), ";", " ")
です。

また、別では、「XX列を見て！」的なメッセージが表示されたので
見てみたのですが

EVALUATE ABCDE
WHEN " "
WHEN "1"
MOVE AAA TO BBB
WHEN OTHER
MOVE 1 TO CCC
MOVE DDD TO EEE
END-EVALUATE.

の様なEVALUATE分の終了が判別できず、ネスト不正に
なっているようでした。

度々、申し訳ありませんが
以上、ご対応のほど、宜しくお願い致します。

エラー対応したいのですが、今回の2件については両方とも、
原因がまったく予想もつかないため難しいです。

了解しました。

今回のエラーですが
あくまで感覚的な物ですが、全体の１割も出ない様な状態ですので
出れば、致し方なし。と、言う感じで使って行きます。

ありがとうございました。

その後、色々とわかってきました。

実行時エラー'1004';
アプリケーション定義またはオブジェクト定義のエラーです。
この場合は、ソースに文字コード"00"NULL？が入っており
正しくソースが読めていない様でした。
※スペース（20）に置き換えるとエラーが出なくなりました。
読み込み時、無視するか、スペースに置き換えは可能でしょうか？

また、”ネスト不備？”ですが
END-IF.　などの行の後ろにコメントがあるとかなりの確率で
”ネスト不備？”となるようです。

対応の参考になればと思い、投稿いたしました。

情報ありがとうございます。

> 実行時エラー'1004';
> アプリケーション定義またはオブジェクト定義のエラーです。
> この場合は、ソースに文字コード"00"NULL？が入っており
> 正しくソースが読めていない様でした。

再現しませんでした。
"00"があってもエラーにはなりませんでした。
もっとも"00"までしか読み込めず正しく処理はできませんでしたが。

> ※スペース（20）に置き換えるとエラーが出なくなりました。
> 読み込み時、無視するか、スペースに置き換えは可能でしょうか？

対応は現時点では難しそうです。
そもそも"00"までしか読み込めず、そこでファイル終端になってるっぽいので。

> また、”ネスト不備？”ですが
> END-IF.　などの行の後ろにコメントがあるとかなりの確率で
> ”ネスト不備？”となるようです。

この部分の数行のサンプルをここに記載できませんか。
内容はぼかして構いませんので。
どのようなソースなのかまだイメージできてません。

> 再現しませんでした。
> "00"があってもエラーにはなりませんでした。
> もっとも"00"までしか読み込めず正しく処理はできませんでしたが。

"00"は、ソースの途中、コメント行の漢字の前にありました。
※サクラエディターでは気が付かなかったのですが、NoEditorでは読み込み時
　メッセージが表示されるので、そこで気が付きました。

対応、難しそう　と言う事で了解しました。

また、ネスト不備のサンプルを記述します。
※数行ですが、こちらでネスト不備は確認しました
−−−−−ここから−−−−−
*-----------------------------------------------------------------012345
* こめんと 012345
*-----------------------------------------------------------------012345
ABCDE-FGHI. 012345
* 012345
IF AAAAA NOT = BBBBB 012345
ADD 100 TO DDDDD 012345
END-IF. 012345
* 012345
ABCDE-FGHI-EXT. 012345
EXIT. 012345
−−−−−ここまで−−−−−
ちなみにコメントカラム位置は１としています。

申し訳ないですが、貼り付けたソースの半角スペースが
詰まってしまいましたが、"012345"が行末のコメントとなりますので
間に半角スペースを補完ください。

以上、宜しくお願い致します。

ありがとうございます。再現できました。対応は考えます。
ただ行末のコメント（73〜80カラム目）って難しいんですよね。
ホストからソースをダウンロードすると漢字のシフトコードが詰まる分
73カラム目以降が固定にならないので。

対応版の3.82をリリースしました。ご確認ください。
Nullの件も対応できました。

> 対応版の3.82をリリースしました。ご確認ください。
> Nullの件も対応できました。

確認しました。
ネスト不備は、出なくなったようです。
ご対応、ありがとうございます。
お疲れ様でした。