Menu.AddCondition.qsrc 389 B

1234567891011
  1. # Menu.AddCondition
  2. if $ARGS[0] = '' or $ARGS[1] = '': exit
  3. !----------
  4. ARGS[10] = dyneval("Result = arrsize('otg_Menyu_<<$ARGS[0]>>')")
  5. if dyneval("$Result = $otg_Menyu_<<$ARGS[0]>>[<<ARGS[10]>>-1]") = '-:-': exit
  6. !----------
  7. dynamic "
  8. $otg_Menyu_<<$ARGS[0]>>_Parameters['<<ARGS[10]>>_In'] = '<<replace($ARGS[1],'''','''''')>>'
  9. "
  10. --- Menu.AddCondition ---------------------------------