Subversion Repositories wimsdev

!set methtit=¸ù¾Ý(²»)µÈʽ·Ö½â³É¸÷ÖÖÇé¿ö
!set methenv=ZZ QQ RR
!set methparmtype=function, choice 6, function
!set methhelp=Õâ¸ö·½·¨¸ù¾ÝÒ»¸öµÈʽ»ò²»µÈʽ³ÉÁ¢Óë·ñ°ÑÄ¿Ç°Çé¿ö·Ö³ÉÁ½ÖÖÇé¿ö.\
µÈʽ/²»µÈʽ»òÆäÄæ¿ÉÒÔÏàÓ¦µØ¼Óµ½Á½ÖÖÇé¿öµÄ¼ÙÉèÀï.

!if $wims_read_parm iswordof form check
 !goto $wims_read_parm
!endif

!exit
:form
 °ÑÄ¿Ç°Çé¿ö¸ù¾ÝÒÔÏÂ(²»)µÈʽ³ÉÁ¢Óë·ñ·Ö³ÉÁ½ÖÖÇé¿ö <br>
 <input size=10 name=methparm1 value="$methparm1">
 !formselect methparm2 from 1 to 6 prompt =,!=,<,>,<=,>=
 <input size=10 name=methparm3 value="$methparm3">
!exit
:check
 sign1=!item $methparm2 of =,!=,<,>,<=,>=
 sign2=!item $methparm2 of !=,=,>=,<=,>,<

 casesplit=$methparm1 $sign1 $methparm3\
$methparm1 $sign2 $methparm3
 methexp=·Ö³ÉÇé¿ö \($methparm1 $sign1 $methparm3) Óë \($methparm1 $sign2 $methparm3)

!exit