parser

Написать ответ на текущее сообщение

 

 
   команды управления поиском

а лучше так (более концептуально)

Sergey M. 23.10.2004 00:08

@print[title;hash][key;value]
<p>$title ^hash.foreach[key;value]{$key}[ | ]</p>
=$hash.[zzz].rrggbb=

@main[]
$table[^table::create{color	rrggbb
red	ff0000
green	00ff00
blue	0000ff
_default	000000}
]

$b_hash[$._default[]]
^table.menu{
	^if($table.color eq "_default"){
		$b_hash._default[$table.fields]
	}{
		^b_hash.add[$.[$table.color][$table.fields]]
	}
}
^print[b_hash:;$b_hash]
причём значение в исходной таблице не обязательно должно быть eq "_default", оно может быть любым на усмотрение, вплоть до "", нужно будет просто заменить условие на !def $table.color...

Ну это были размышления на тему "динамическое заполнение хеша данными из таблицы с формированием валидного ключа $._default[] и без использования ^process[]". Может кому пригодится :)