40年目にして初めてΣ( ̄ロ ̄lll)ガーン

●前の記事にコメント

簡単なマスタ保守プログラムなら30分 にコメントを頂きました。
その記事に載せた私のサンプルソースコードで、不要な部分があるとの事でした

それは、私のサンプルコードでは
1 DOWEQ 1

<メインロジック>

ENDDO
としていました。
それは、<メインロジック>を終了条件が成り立つまで無限ループさせるためでした。

しかし、コメントして下さった方は、
最初の[1 DOWEQ 1]と、最後の[ENDDO]が要らないとの事でした
●衝撃

私は衝撃を受けました(笑)
RPGでシステム開発しながら40年近く・・・
RPG言語にこんな仕様があったなんて初めて知りました

ちなみに、RPG言語にこの仕様(コードロジック部分では、
<最後まで実行すると最初に戻る>って言うのを
ご存じの方はどれほどおられるんでしょうか???
●確かに

RPG サイクルプログラミングでは、そうでした
コードロジック(C仕様書の部分)について、最後まで実行すると最初に戻る
ってのは知っていました

ただ、RPGサイクルプログラミングとRPG言語は別物だと思い込んでいましたから
わざわざ、他の言語と同様に、無限ループを起こさせるためのコードを書いていました
40年近くずっと(笑)
●新たな知識に触れる

私も半世紀以上(実は還暦過ぎてる(笑))生きてきて
新たな事に出会うのはしょっちゅう
でも、RPGは専門分野ーって思ってきたのに・・・世界は広いなー(*^▽^*)

ちなみに、RPG3, RPG4, FF-RPG(フリーフォームRPG)で書いたサンプルプログラム
三つとも、教えてもらったようにコーディングしてみてコンパイル・動作確認しました
いやー! ちゃんと動くんですよねー! すごぉぉぉぉぉい(笑)


人気ブログランキング
人気ブログランキング







posted by Y.Taki@AS400 at 05:46| Comment(0) | TrackBack(0) | AS/400

2024年11月16日

ファン
検索
<< 2024年11月 >>
1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29 30
最新記事
写真ギャラリー
最新コメント
タグクラウド
カテゴリーアーカイブ
プロフィール
Y.Taki@AS400さんの画像
Y.Taki@AS400
IBM AS/400で稼働するシステムの開発・追加を担当して30年以上になります。使えば使うほどこの AS/400 が好きになりました。 こんなSEがいろいろな視点から様々な業務などについて語ります。
Mobilize your Site
スマートフォン版を閲覧 | PC版を閲覧
Share by: