MySQL操作程序二十九(零件單位/圖號選擇功能)
返回
- 借用mscshowparts.pl的DWG顯示
- mscshowpartsone.pl修改=>LOOP操作,把selected加上去
- mscpartsupdate.pl修改=>不須修改?
- HTML文件修改
<![CDATA[
mscshowpartsone.pl的追加
# 顯示DWG圖號
@loop1 = ();
$t{DWG} = $self->dbh->selectrow_array("SELECT DWG FROM main_type1 WHERE id = $t{tid}");
@{ $t{DWGs} } = split(/=/,$t{DWG});
$t{selected} = $t{loops}{"dwg_id"};
for $n ( 0 .. $#{ $t{DWGs} } ) {
$t{ns} = $n + 1;
if ($t{ns} == $t{selected}) {
$t{list1} = '<option value="' . $t{ns} . '" selected>' . $t{DWGs}[$n] . '</option>'
} else {
$t{list1} = '<option value="' . $t{ns} . '">' . $t{DWGs}[$n] . '</option>'
}
my %row = (
list => $t{list1}
);
push(@loop1, \%row);
}
$t{template}->param(LOOP1 => \@loop1);
# 單位的LOOP顯示
@loop = ();
@{ $t{units} } = qw/PCS SET BOX ROLL PAIR CAN DOZ KGS MTR SHT TUBE PKT/;
$t{selected} = $t{loops}{"Nuid"};
for $n ( 0 .. $#{ $t{units} } ) {
$t{ns} = $n + 1;
if ($t{ns} == $t{selected}) {
$t{list1} = '<option value="' . $t{ns} . '" selected>' . $t{units}[$n] . '</option>'
} else {
$t{list1} = '<option value="' . $t{ns} . '">' . $t{units}[$n] . '</option>'
}
my %row = (
list => $t{list1}
);
push(@loop, \%row);
}
$t{template}->param(LOOP => \@loop);
mscparst2.htm
新
<tr><td>dwg_id</td><td>
<select name="dwg_id" size=1>
<TMPL_LOOP NAME="LOOP1">
<TMPL_VAR NAME="list">
</TMPL_LOOP>
</select>
<TMPL_VAR NAME="dwg_id">
</td></tr>
<tr><td>Nuid</td><td>
<select name="Nuid" size=1>
<TMPL_LOOP NAME="LOOP">
<TMPL_VAR NAME="list">
</TMPL_LOOP>
</select>
<TMPL_VAR NAME="Nuid">
</td></tr>
舊
<tr><td>dwg_id</td><td><input type=text size=100 name=dwg_id value="<TMPL_VAR NAME="dwg_id">"></td></tr>
<input type="hidden" name="dwg_id" value="<TMPL_VAR NAME="dwg_id">">
<tr><td>Nuid</td><td><input type=text size=100 name=Nuid value="<TMPL_VAR NAME="Nuid">"></td></tr>
<input type="hidden" name="Nuid" value="<TMPL_VAR NAME="Nuid">">
]]>
返回
敦煌市|
肃宁县|
龙山县|
津市市|
永定县|
铜鼓县|
德惠市|
平利县|
廉江市|
山东|
辰溪县|
伊金霍洛旗|
冕宁县|
天台县|
会东县|
浙江省|
柯坪县|
汪清县|
镇沅|
巴彦淖尔市|
玉环县|
十堰市|
木里|
丰镇市|
原阳县|
顺平县|
奉新县|
安远县|
衡南县|
夏津县|
五莲县|
巩义市|
绥滨县|
新沂市|
桦川县|
宁城县|
平遥县|
鸡西市|
宿州市|
宕昌县|
丹棱县|