SPPIE00120_발주내역조회.xfdl 23 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437
  1. <?xml version="1.0" encoding="utf-8" standalone="no"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPPIE00120" position="absolute 0 0 783 585" titletext="발주내역조회" onload="SPPIE00120_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div id="group3" scrollbars="autoboth" position="absolute 0 68 780 555" style="" anchor="all">
  8. <Layouts>
  9. <Layout width="780" height="487">
  10. <Shape id="line1" class="line_10" linetype="horizontal" position="absolute 0 22 780 25" style="" anchor="left top right"/>
  11. <Static id="caption2" class="tit_2" position="absolute 0 4 121 20" style="" text="발주내역" anchor="left top"/>
  12. <Grid id="grd_purcdetl" binddataset="ds_main_list01_gridpurcdetl" class="datagrid2" position="absolute 0 25 780 487" style="" onlbuttonup="group3_grd_purcdetl_onlbuttonup" ontextchanged="group3_grd_purcdetl_ontextchanged" anchor="all" onexpandup="group3_grd_purcdetl_onexpandup" cellclickbound="cell">
  13. <Formats>
  14. <Format id="default">
  15. <Columns>
  16. <Column size="38"/>
  17. <Column size="80"/>
  18. <Column size="100"/>
  19. <Column size="149"/>
  20. <Column size="80"/>
  21. <Column size="80"/>
  22. <Column size="85"/>
  23. <Column size="85"/>
  24. <Column size="80"/>
  25. <Column size="85"/>
  26. <Column size="85"/>
  27. <Column size="80"/>
  28. <Column size="120"/>
  29. <Column size="80"/>
  30. <Column size="100"/>
  31. <Column size="76"/>
  32. <Column size="96"/>
  33. <Column size="106"/>
  34. <Column size="75"/>
  35. <Column size="0"/>
  36. <Column size="0"/>
  37. <Column size="0"/>
  38. </Columns>
  39. <Rows>
  40. <Row size="26" band="head"/>
  41. <Row size="25"/>
  42. </Rows>
  43. <Band id="head">
  44. <Cell text="신고&#10;여부"/>
  45. <Cell col="1" text="EDI코드"/>
  46. <Cell col="2" text="물품코드"/>
  47. <Cell col="3" text="물품명"/>
  48. <Cell col="4" text="구매일자"/>
  49. <Cell col="5" text="발주일자"/>
  50. <Cell col="6" text="발주량"/>
  51. <Cell col="7" text="발주금액"/>
  52. <Cell col="8" text="단가"/>
  53. <Cell col="9" text="전 발주량"/>
  54. <Cell col="10" text="전 발주금액"/>
  55. <Cell col="11" text="전 단가"/>
  56. <Cell col="12" text="수정일시"/>
  57. <Cell col="13" text="수가보험가"/>
  58. <Cell col="14" text="규격"/>
  59. <Cell col="15" text="단위"/>
  60. <Cell col="16" text="사업자등록번호"/>
  61. <Cell col="17" text="거래처명"/>
  62. <Cell col="18" text="신고서구분"/>
  63. <Cell col="19"/>
  64. <Cell col="20"/>
  65. <Cell col="21"/>
  66. <Cell col="22" text="청구일자"/>
  67. <Cell col="23" text="입원일자"/>
  68. <Cell col="24" text="적용일자"/>
  69. <Cell col="25" text="환자유형"/>
  70. <Cell col="26" text="조합기호"/>
  71. <Cell col="27" text="장애수첩"/>
  72. <Cell col="28" text="접수번호"/>
  73. <Cell col="29" text="심사차수"/>
  74. <Cell col="30" text="일련번호"/>
  75. <Cell col="31" text="처리구분"/>
  76. <Cell col="32" text="총진료비(청구)"/>
  77. <Cell col="33" text="본인부담(청구)"/>
  78. <Cell col="34" text="청구금액"/>
  79. <Cell col="35" text="비고"/>
  80. <Cell col="36" text="생성여부"/>
  81. </Band>
  82. <Band id="body">
  83. <Cell displaytype="checkbox" edittype="checkbox" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:notiyn" expr="notiyn == 'Y' || notiyn == '1' ? 1 : 0"/>
  84. <Cell col="1" edittype="text" style="align:left;background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:edicd"/>
  85. <Cell col="2" displaytype="normal" edittype="text" style="align:left;background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:goodcd" expandshow="show"/>
  86. <Cell col="3" edittype="text" style="align:left;background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:itemnm"/>
  87. <Cell col="4" displaytype="date" edittype="date" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:purcdmnddd"/>
  88. <Cell col="5" displaytype="date" edittype="date" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:windd"/>
  89. <Cell col="6" displaytype="number" edittype="masknumber" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:winqty"/>
  90. <Cell col="7" displaytype="number" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:winamt"/>
  91. <Cell col="8" displaytype="number" edittype="masknumber" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:oneunitcost"/>
  92. <Cell col="9" displaytype="number" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:bfwinqty"/>
  93. <Cell col="10" displaytype="number" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:bfwinamt"/>
  94. <Cell col="11" displaytype="number" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:bfoneunitcost"/>
  95. <Cell col="12" displaytype="date" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:systemdt"/>
  96. <Cell col="13" displaytype="text" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:insurbpnt"/>
  97. <Cell col="14" displaytype="text" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:goodspec"/>
  98. <Cell col="15" displaytype="text" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:winunit"/>
  99. <Cell col="16" displaytype="text" style="align:left;background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:entrregno"/>
  100. <Cell col="17" displaytype="text" style="align:left;background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:custnm"/>
  101. <Cell col="18" displaytype="text" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:reptflag"/>
  102. <Cell col="19" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:appdd"/>
  103. <Cell col="20" displaytype="number" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:appseqno"/>
  104. <Cell col="21" style="background:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');background2:EXPR(ucostequalyn == 'N' ? '#ffff99' : 'default');" text="bind:ucostequalyn"/>
  105. </Band>
  106. </Format>
  107. </Formats>
  108. </Grid>
  109. <Static id="caption3" position="absolute 75 5 235 20" style="color:#ff6600;" text="(실제 발주한 내역 조회결과)" anchor="left top"/>
  110. <Button id="button7" class="btn7" position="absolute 704 1 780 20" style="" text="액셀저장" onclick="group3_button7_onclick"/>
  111. <Button id="button3" class="btn2" visible="true" position="absolute 596 1 649 20" style="" text="행추가" onclick="group3_button3_onclick"/>
  112. <Button id="button4" class="btn2" visible="true" position="absolute 650 1 703 20" style="" text="행삭제" onclick="group3_button4_onclick"/>
  113. </Layout>
  114. </Layouts>
  115. </Div>
  116. <Div id="group2" position="absolute 0 25 780 65" style="" class="div_SA" anchor="left top right">
  117. <Layouts>
  118. <Layout>
  119. <Button id="btn_srch" class="btn1" taborder="4" position="absolute 715 10 771 32" style="" text="조회" onclick="group2_btn_srch_onclick" anchor="top right"/>
  120. <Shape id="line13" class="line_4" linetype="vertical" position="absolute 707 10 710 32" style="" anchor="top right"/>
  121. <Calendar id="ipt_todd" class="input_s_essential" taborder="2" mask="yyyy-mm-dd" position="absolute 211 11 306 30" style="" anchor="left top"/>
  122. <Edit id="ipt_srchcond2" class="input_search" taborder="3" position="absolute 435 11 530 30" style="" anchor="left top" onkeyup="group2_ipt_srchcond2_onkeyup" autoselect="true" imemode="alpha" inputmode="upper"/>
  123. <Radio datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="rdo_srchcond1" position="absolute 320 12 430 32" style="" onclick="group2_rdo_srchcond1_onclick" anchor="left top">
  124. <Dataset id="innerdataset">
  125. <ColumnInfo>
  126. <Column id="codecolumn"/>
  127. <Column id="datacolumn"/>
  128. </ColumnInfo>
  129. <Rows>
  130. <Row>
  131. <Col id="codecolumn">1</Col>
  132. <Col id="datacolumn">EDI</Col>
  133. </Row>
  134. <Row>
  135. <Col id="codecolumn">2</Col>
  136. <Col id="datacolumn">처방코드</Col>
  137. </Row>
  138. </Rows>
  139. </Dataset>
  140. </Radio>
  141. <Static id="caption1" position="absolute 195 14 210 29" style="" text="~" anchor="left top"/>
  142. <Calendar id="ipt_fromdd" class="input_s_essential" taborder="1" mask="yyyy-mm-dd" position="absolute 96 11 191 30" style="" anchor="left top" onkillfocus="group2_ipt_fromdd_onkillfocus">
  143. <Static id="caption7"/>
  144. </Calendar>
  145. <Static id="caption6" class="search_name" position="absolute 6 11 95 28" style="" text="발주일자 :" anchor="left top"/>
  146. <CheckBox id="checkbox1" taborder="5" text="단가차이 품목만 조회" position="absolute 546 10 683 30" truevalue="Y" onchanged="group2_checkbox1_onchanged"/>
  147. </Layout>
  148. </Layouts>
  149. </Div>
  150. <Static id="cap_title" text="발주내역조회" class="tit_1" position="absolute 0 0 325 25"/>
  151. <Button id="button1" taborder="1" text="닫기" onclick="grp_btn_button1_onclick" class="btn4" position="absolute 724 560 780 582" anchor="right bottom"/>
  152. <Button id="button2" taborder="2" text="저장" onclick="grp_btn_button2_onclick" class="btn4" position="absolute 664 560 720 582" anchor="right bottom"/>
  153. <Static id="caption4" text="EDI 코드 '-'는 심평원 치료재료 구입 통보대상이 아님" position="absolute 4 565 430 580" style="color:#ff0000ff;font:Dotum,9,bold;" anchor="left bottom"/>
  154. </Layout>
  155. </Layouts>
  156. <Objects>
  157. <Dataset id="ds_main_list01_gridpurcdetl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep" oncolumnchanged="ds_main_list01_gridpurcdetl_oncolumnchanged">
  158. <ColumnInfo>
  159. <Column id="notiyn" type="STRING" size="256"/>
  160. <Column id="edicd" type="STRING" size="256"/>
  161. <Column id="goodcd" type="STRING" size="256"/>
  162. <Column id="itemnm" type="STRING" size="256"/>
  163. <Column id="purcdmnddd" type="STRING" size="256"/>
  164. <Column id="windd" type="STRING" size="256"/>
  165. <Column id="winqty" type="STRING" size="256"/>
  166. <Column id="winamt" type="STRING" size="256"/>
  167. <Column id="oneunitcost" type="STRING" size="256"/>
  168. <Column id="goodspec" type="STRING" size="256"/>
  169. <Column id="winunit" type="STRING" size="256"/>
  170. <Column id="entrregno" type="STRING" size="256"/>
  171. <Column id="custnm" type="STRING" size="256"/>
  172. <Column id="reptflag" type="STRING" size="256"/>
  173. </ColumnInfo>
  174. </Dataset>
  175. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep" oncolumnchanged="ds_send_oncolumnchanged">
  176. <ColumnInfo>
  177. <Column id="fromdd" type="STRING" size="256"/>
  178. <Column id="todd" type="STRING" size="256"/>
  179. <Column id="srchcond1" type="STRING" size="256"/>
  180. <Column id="srchcond2" type="STRING" size="256"/>
  181. <Column id="exceptfromdd" type="STRING" size="256"/>
  182. <Column id="temp" type="STRING" size="256"/>
  183. <Column id="srchcond3" type="STRING" size="256"/>
  184. </ColumnInfo>
  185. <Rows>
  186. <Row>
  187. <Col id="fromdd"/>
  188. <Col id="todd"/>
  189. <Col id="srchcond1">1</Col>
  190. <Col id="srchcond2"/>
  191. <Col id="exceptfromdd"/>
  192. <Col id="temp"/>
  193. <Col id="srchcond3"/>
  194. </Row>
  195. </Rows>
  196. </Dataset>
  197. <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  198. <ColumnInfo/>
  199. </Dataset>
  200. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  201. <ColumnInfo>
  202. <Column id="hidden" type="STRING" size="256"/>
  203. </ColumnInfo>
  204. </Dataset>
  205. <Dataset id="ds_main_list01" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  206. <ColumnInfo/>
  207. </Dataset>
  208. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
  209. <ColumnInfo>
  210. <Column id="init" type="STRING" size="256"/>
  211. </ColumnInfo>
  212. <Rows>
  213. <Row>
  214. <Col id="init"/>
  215. </Row>
  216. </Rows>
  217. </Dataset>
  218. <Dataset id="ds_hidden_smpic00200" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  219. <ColumnInfo>
  220. <Column id="con1_dd" type="STRING" size="256"/>
  221. <Column id="con2_gsflag" type="STRING" size="256"/>
  222. <Column id="con3_search1" type="STRING" size="256"/>
  223. <Column id="srchdrugcd" type="STRING" size="256"/>
  224. <Column id="con5_insu" type="STRING" size="256"/>
  225. <Column id="con_ordinptflag" type="STRING" size="256"/>
  226. </ColumnInfo>
  227. <Rows>
  228. <Row/>
  229. </Rows>
  230. </Dataset>
  231. </Objects>
  232. <Bind>
  233. <BindItem id="item0" compid="group2.ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
  234. <BindItem id="item1" compid="group2.ipt_srchcond2" propid="value" datasetid="ds_send" columnid="srchcond2"/>
  235. <BindItem id="item2" compid="group2.rdo_srchcond1" propid="value" datasetid="ds_send" columnid="srchcond1"/>
  236. <BindItem id="item3" compid="group2.ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
  237. <BindItem id="item4" compid="group2.checkbox1" propid="value" datasetid="ds_send" columnid="srchcond3"/>
  238. </Bind>
  239. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  240. * System Name :
  241. * Job Name :
  242. * Creator :
  243. * Make Date : 2017-06-19
  244. * Description :
  245. *---------------------------------------------------------------------------------------
  246. * Modify Date Modifier Modify Description
  247. *---------------------------------------------------------------------------------------
  248. * 2017-06-19 Live Converter TF->XP
  249. *
  250. *---------------------------------------------------------------------------------------
  251. ****************************************************************************************/
  252. include "com_commonxp::comm_main.xjs";
  253. function SPPIE00120_onload(obj:Form, e:LoadEventInfo) {
  254. frmf_initForm(obj);
  255. grdf_initGrid(group3.grd_purcdetl);
  256. grdf_setToolTipBind(group3.grd_purcdetl);
  257. var vcalcscorcd = "";
  258. vcalcscorcd = opener.frmf_getParameter("calcscorcd");
  259. if(!utlf_isNull(vcalcscorcd)) {
  260. ds_send.setColumn( 0, "srchcond1", "2");
  261. ds_send.setColumn( 0, "srchcond2", opener.frmf_getParameter("calcscorcd"));
  262. group2.btn_srch.setFocus();
  263. group2.btn_srch.click();
  264. } else {
  265. ds_main_list01_gridpurcdetl.clearData();
  266. }
  267. }
  268. function group3_button7_onclick(obj:Button, e:ClickEventInfo) {
  269. if(ds_main_list01_gridpurcdetl.rowcount > 0) {
  270. grdf_exportExcel(group3.grd_purcdetl,"발주내역조회","sheet1");
  271. } else {
  272. sysf_messageBox("조회된 데이터가 ", "I004");
  273. }
  274. }
  275. function group3_button3_onclick(obj:Button, e:ClickEventInfo) {
  276. var row = ds_main_list01_gridpurcdetl.addRow();
  277. ds_main_list01_gridpurcdetl.setColumn(row,"appdd",utlf_getCurrentDate());
  278. }
  279. function group3_button4_onclick(obj:Button, e:ClickEventInfo) {
  280. var arrPostion = new Array();
  281. arrPostion[0] = ds_main_list01_gridpurcdetl.rowposition;
  282. grdf_setStatus(group3.grd_purcdetl, "D", arrPostion);
  283. //ds_main_list01_gridpurcdetl.deleteRow(ds_main_list01_gridpurcdetl.rowposition);
  284. }
  285. function grp_btn_button1_onclick(obj:Button, e:ClickEventInfo) {
  286. // 윈도우 닫기
  287. this.close();
  288. }
  289. function grp_btn_button2_onclick(obj:Button, e:ClickEventInfo) {
  290. if ( sysf_messageBox("","Q002")==6 ) {
  291. var update = grdf_getGridUpdateData(group3.grd_purcdetl);
  292. if(update.rowcount == 0){
  293. sysf_messageBox("업데이트 정보가 없습니다.", "I");
  294. return 0;
  295. } else {
  296. var oParam = {};
  297. oParam.id = "TXPIE00120";
  298. oParam.service = "edimngtapp.EdiMngt";
  299. oParam.method = "reqSetPurcDetlByMis";
  300. oParam.inds = "req=ds_main_list01_gridpurcdetl:U";
  301. oParam.async = false;
  302. oParam.typeStr = "m";
  303. tranf_submit(oParam);
  304. }
  305. }
  306. group2.btn_srch.click();
  307. }
  308. function group2_btn_srch_onclick(obj:Button, e:ClickEventInfo) {
  309. if(utlf_isNull(group2.ipt_fromdd.value) && utlf_isNull(group2.ipt_srchcond2.value)) {
  310. sysf_messageBox("발주일자 또는 EDI코드나 처방코드를","C001");
  311. group2.ipt_fromdd.setFocus();
  312. return true;
  313. }
  314. ds_main_list01_gridpurcdetl.clearData();
  315. var oParam = {};
  316. oParam.id = "TRPIE00120";
  317. oParam.service = "edimngtapp.EdiMngt";
  318. oParam.method = "reqGetPurcDetlByMis";
  319. oParam.inds = "req=ds_send";
  320. oParam.outds = "ds_main_list01_gridpurcdetl=gridpurcdetl";
  321. oParam.async = false;
  322. //oParam.callback = "cf_TRPIE00120";
  323. tranf_submit(oParam);
  324. }
  325. function group2_ipt_srchcond2_onkeyup(obj:Edit, e:KeyEventInfo) {
  326. if(e.keycode == "13") {
  327. if(utlf_isNull(group2.ipt_srchcond2.value)) {
  328. return false;
  329. }
  330. group2.btn_srch.setFocus();
  331. group2.btn_srch.click();
  332. }
  333. }
  334. function group2_rdo_srchcond1_onclick(obj:Radio, e:ClickEventInfo) {
  335. group2.ipt_srchcond2.value = "";
  336. group2.ipt_srchcond2.setFocus();
  337. }
  338. function group2_ipt_fromdd_onkillfocus(obj:Calendar, e:KillFocusEventInfo) {
  339. group2.ipt_todd.value = group2.ipt_fromdd.value;
  340. }
  341. function ds_main_list01_gridpurcdetl_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  342. {
  343. if( e.columnid == "notiyn" ){
  344. obj.setColumn(e.row, "notiyn", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
  345. }
  346. if( e.columnid == "winqty" ){
  347. var oneunitcost = obj.getColumn(e.row, "oneunitcost");
  348. var amt = e.newvalue * oneunitcost;
  349. obj.setColumn(e.row, "winamt", amt);
  350. }
  351. if( e.columnid == "oneunitcost"){
  352. var winqty = obj.getColumn(e.row, "winqty");
  353. var amt = winqty * e.newvalue;
  354. obj.setColumn(e.row, "winamt", amt);
  355. }
  356. }
  357. function group3_grd_purcdetl_onexpandup(obj:Grid, e:GridMouseEventInfo)
  358. {
  359. ds_hidden_smpic00200.setColumn(0, "con1_dd", utlf_getCurrentDate());
  360. ds_hidden_smpic00200.setColumn(0, "con2_gsflag", "S");
  361. ds_hidden_smpic00200.setColumn(0, "con3_search1", "calcscorcd");
  362. ds_hidden_smpic00200.setColumn(0, "srchdrugcd", ds_main_list01_gridpurcdetl.getColumn(ds_main_list01_gridpurcdetl.rowposition, "goodcd"));
  363. ds_hidden_smpic00200.setColumn(0, "con5_insu", "insu");
  364. ds_hidden_smpic00200.setColumn(0, "con_ordinptflag", "PAM");
  365. //frmf_setParameter("openflag", "edicd");
  366. var objArgs = new Object();
  367. objArgs.arg_ds_temp = ds_hidden_smpic00200;
  368. frmf_modal("SMPIC00200", "SMPIC00200", objArgs, "", "", "", "", "", "", "", "", "", "M");
  369. ds_main_list01_gridpurcdetl.setColumn(ds_main_list01_gridpurcdetl.rowposition, "goodcd", ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd"));
  370. ds_main_list01_gridpurcdetl.setColumn(ds_main_list01_gridpurcdetl.rowposition, "itemnm", ds_temp_picmmech.getColumn(0, "picmmech_hngnm"));
  371. ds_main_list01_gridpurcdetl.setColumn(ds_main_list01_gridpurcdetl.rowposition, "edicd", ds_temp_picmmech.getColumn(0, "picmmech_insuedicd"));
  372. }
  373. function group2_checkbox1_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  374. {
  375. }
  376. function ds_send_cancolumnchange(obj:Dataset, e:DSColChangeEventInfo)
  377. {
  378. }
  379. function ds_send_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  380. {
  381. if( e.columnid == "srchcond3" ){
  382. obj.setColumn(e.row, "srchcond3", (e.newvalue == "Y") ? "Y" : "");
  383. }
  384. }
  385. ]]></Script>
  386. </Form>
  387. </FDL>