| Line | |
|---|
| 1 | #file=geisa_post_nbcl |
|---|
| 2 | #on entry: $menu_opt=...Nbcl=n&... (POST method) |
|---|
| 3 | # or: $menu_opt=...Nbclu=u&...Nbcld=d... (POST method) |
|---|
| 4 | #on exit: defines $nbcl=",nbclass=[n|10*d+u]" if [n|10*d+u] != $nbcld |
|---|
| 5 | # $nbcl="" otherwise. |
|---|
| 6 | # $execute_parms=$execute_parms$nbcl |
|---|
| 7 | nbcld=10 |
|---|
| 8 | ifs=$IFS;IFS="&";nbcl=;m=;for s in $menu_opt;do |
|---|
| 9 | l=`expr "$s" : 'Nbcl=\(.*\)'` |
|---|
| 10 | [ "$l" ]&&{ [ "$l" != "$nbcld" ]&&nbcl=",nbclas=$l";break;} |
|---|
| 11 | l=`expr "$s" : 'Nbcld=\(.*\)'` |
|---|
| 12 | [ "$l" ]&&{ m=$l; continue;} |
|---|
| 13 | [ "$m" ]||continue |
|---|
| 14 | l=`expr "$s" : 'Nbclu=\(.*\)'` |
|---|
| 15 | [ "$l" ]&&{ l=`expr 10 \* $m + $l`;[ "$l" != "$nbcld" ]&&nbcl=",nbclas=$l";break;} |
|---|
| 16 | done;IFS=$ifs |
|---|
| 17 | execute_parms=$execute_parms$nbcl |
|---|
Note: See
TracBrowser
for help on using the repository browser.
