Primitive コレクション

LANSA Primitive コレクション (PRIM_PCOL) は、すべてのコレクション・コンポーネントの基礎となります。

FOR/ENDFORループを使用して、どのコレクションの項目にもアクセスできます。

例えば、このClickイベントは、サブメニュー#SMNU_1を探して項目を反復し、サブメニューを無効にします。

Evtroutine Handling(#PHBN_1.Click)

For Each(#Current) In(#smnu_1.Items)
Set Com(#Current) Enabled(False)
Endfor
Endroutine