SMAEB03401_조영제재고관리(knuh).xfdl 54 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMAEB03401" position="absolute 0 0 1198 774" titletext="조영제/재료 재고관리" oninit="SMAEB03401_oninit" onload="SMAEB03401_onload">
  5. <Layouts>
  6. <Layout>
  7. <Button position="absolute 805 67 873 89" id="btn_dayend" class="btn4" enable="false" visible="false" text="일마감" anchor="top right"/>
  8. <Button position="absolute 510 524 590 546" id="btn_rept" class="btn4" text="입고저장" visible="false" anchor="right bottom"/>
  9. <Button position="absolute 865 524 945 546" id="button1" class="btn4" text="입고저장" visible="false" anchor="right bottom"/>
  10. <Div position="absolute 0 15 1198 745" id="group2" scrollbars="autoboth" anchor="all">
  11. <Layouts>
  12. <Layout>
  13. <Static text="입출고 현황" position="absolute 0 59 105 74" id="caption22" class="tit_2" anchor="default"/>
  14. <Shape position="absolute 0 73 1045 79" linetype="horizontal" id="line7" class="line_1" anchor="left top right"/>
  15. <Grid position="absolute 0 79 1045 505" id="grd_dyelist" anchor="all" cellsizingtype="both" autoenter="key" binddataset="ds_main_dyestoclist_item" onkillfocus="group2_grd_dyelist_onkillfocus" oncelldblclick="group2_grd_dyelist_oncelldblclick" selecttype="multirow">
  16. <Formats>
  17. <Format id="default">
  18. <Columns>
  19. <Column size="25" band="left"/>
  20. <Column size="90"/>
  21. <Column size="220"/>
  22. <Column size="70"/>
  23. <Column size="70"/>
  24. <Column size="70"/>
  25. <Column size="70"/>
  26. <Column size="70"/>
  27. <Column size="70"/>
  28. <Column size="270"/>
  29. <Column size="0"/>
  30. <Column size="0"/>
  31. <Column size="0"/>
  32. </Columns>
  33. <Rows>
  34. <Row size="24" band="head"/>
  35. <Row size="24" band="head"/>
  36. <Row size="24"/>
  37. </Rows>
  38. <Band id="head">
  39. <Cell rowspan="2" taborder="undefined"/>
  40. <Cell col="1" rowspan="2" text="조영제/재료 코드" wordwrap="char" taborder="undefined"/>
  41. <Cell col="2" rowspan="2" text="조영제/재료명" taborder="undefined"/>
  42. <Cell col="3" rowspan="2" text="전일재고" taborder="undefined"/>
  43. <Cell col="4" rowspan="2" text="수 령" taborder="undefined"/>
  44. <Cell col="5" rowspan="2" text="총 수" taborder="undefined"/>
  45. <Cell col="6" colspan="2" text="소 모" taborder="undefined"/>
  46. <Cell col="8" rowspan="2" text="현재고" taborder="undefined"/>
  47. <Cell col="9" rowspan="2" text="비 고" taborder="undefined"/>
  48. <Cell col="10"/>
  49. <Cell col="11"/>
  50. <Cell col="12"/>
  51. <Cell row="1" col="6" text="불 출"/>
  52. <Cell row="1" col="7" text="일소모"/>
  53. <Cell row="1" col="10"/>
  54. <Cell row="1" col="11"/>
  55. <Cell row="1" col="12"/>
  56. </Band>
  57. <Band id="body">
  58. <Cell celltype="head"/>
  59. <Cell col="1" style="align:left;" text="bind:goodcd"/>
  60. <Cell col="2" displaytype="combo" style="align:left;padding:0 2 0 2;" text="bind:goodcd" combodataset="ds_main_goodinfo" combocodecol="goodcd" combodatacol="goodnm" enable="false"/>
  61. <Cell col="3" displaytype="number" edittype="masknumber" style="align:right;" text="bind:agojego" mask="#,##9.##" editautoselect="true"/>
  62. <Cell col="4" displaytype="number" edittype="masknumber" style="align:right;" text="bind:receive" mask="#,##9.##" editautoselect="true"/>
  63. <Cell col="5" displaytype="number" style="align:right;" text="bind:totsu" mask="#,##9.##"/>
  64. <Cell col="6" displaytype="number" edittype="masknumber" style="align:right;" text="bind:outgo" mask="#,##9.##" editautoselect="true"/>
  65. <Cell col="7" displaytype="number" edittype="masknumber" style="align:right;" text="bind:dayused" mask="#,##9.##" editautoselect="true" enable="true"/>
  66. <Cell col="8" displaytype="number" style="align:right;" text="bind:presentcnt" mask="#,##9.##"/>
  67. <Cell col="9" displaytype="text" edittype="text" style="align:left;" text="bind:rem" editautoselect="true" enable="true"/>
  68. <Cell col="10" text="bind:iodd"/>
  69. <Cell col="11" text="bind:suppdeptcd"/>
  70. <Cell col="12" text="bind:sectcd"/>
  71. </Band>
  72. </Format>
  73. </Formats>
  74. </Grid>
  75. <Grid position="absolute 0 536 1045 725" id="datagrid1" binddataset="ds_main_dyecdpamlist_item" anchor="left right bottom" cellsizingtype="both" selecttype="multirow">
  76. <Formats>
  77. <Format id="default">
  78. <Columns>
  79. <Column size="25" band="left"/>
  80. <Column size="58"/>
  81. <Column size="54"/>
  82. <Column size="75"/>
  83. <Column size="97"/>
  84. <Column size="95"/>
  85. <Column size="202"/>
  86. <Column size="77"/>
  87. <Column size="195"/>
  88. <Column size="43"/>
  89. <Column size="50"/>
  90. <Column size="75"/>
  91. <Column size="0"/>
  92. <Column size="0"/>
  93. </Columns>
  94. <Rows>
  95. <Row size="24" band="head"/>
  96. <Row size="24"/>
  97. </Rows>
  98. <Band id="head">
  99. <Cell/>
  100. <Cell col="1" text="등록번호"/>
  101. <Cell col="2" text="환자명"/>
  102. <Cell col="3" text="실시일자"/>
  103. <Cell col="4" text="검사실"/>
  104. <Cell col="5" text="처방코드"/>
  105. <Cell col="6" text="처방명"/>
  106. <Cell col="7" text="재료코드"/>
  107. <Cell col="8" text="재료명"/>
  108. <Cell col="9" text="용 량"/>
  109. <Cell col="10" text="규 격"/>
  110. <Cell col="11" text="처방일자"/>
  111. <Cell col="12" text="구분"/>
  112. <Cell col="13" text="검사실코드"/>
  113. </Band>
  114. <Band id="body">
  115. <Cell celltype="head" text="expr:currow+1"/>
  116. <Cell col="1" text="bind:pid"/>
  117. <Cell col="2" text="bind:hngnm"/>
  118. <Cell col="3" displaytype="date" text="bind:excuexectodd"/>
  119. <Cell col="4" style="align:left;" text="bind:basecdflagdesc"/>
  120. <Cell col="5" text="bind:calcscorcd"/>
  121. <Cell col="6" style="align:left;" text="bind:excucdnm"/>
  122. <Cell col="7" text="bind:goodcd"/>
  123. <Cell col="8" style="align:left;" text="bind:goodnm"/>
  124. <Cell col="9" text="bind:drugqty"/>
  125. <Cell col="10" text="bind:speccd"/>
  126. <Cell col="11" displaytype="date" text="bind:prcpdd"/>
  127. <Cell col="12" text="bind:instcd"/>
  128. <Cell col="13" text="bind:excuroomcd"/>
  129. </Band>
  130. </Format>
  131. </Formats>
  132. </Grid>
  133. <Static text="조영제코드별 환자 조회" position="absolute 0 514 170 530" id="caption1" class="tit_2" anchor="left bottom"/>
  134. <Button position="absolute 988 52 1044 74" id="btn_dissu" class="btn4" enable="false" text="수정" anchor="top right" visible="true"/>
  135. <Button position="absolute 917 52 985 74" id="btn_disone" class="btn4" text="일마감" anchor="top right" enable="false"/>
  136. <Div position="absolute 435 265 760 395" id="grp_excucdrem" visible="false" anchor="default">
  137. <Layouts>
  138. <Layout>
  139. <Shape position="absolute 0 0 324 121" id="rectangle2" type="rectangle" anchor="default"/>
  140. <Calendar position="absolute 215 40 315 59" id="input2" class="input_search" mask="yyyy-mm-dd" anchor="default"/>
  141. <Static text="적용일자 :" position="absolute 13 41 91 58" id="caption2" class="search_name" visible="true" anchor="default"/>
  142. <Button position="absolute 255 90 311 112" id="button4" class="btn4" text="닫기" anchor="default" onclick="group2_grp_excucdrem_button4_onclick"/>
  143. <Button position="absolute 195 90 251 112" id="button5" class="btn4" text="적용" anchor="default" onclick="group2_grp_excucdrem_button5_onclick"/>
  144. <Static text="마감정리" position="absolute 6 7 179 24" id="caption8" class="tit_2" anchor="default"/>
  145. <Calendar position="absolute 105 40 205 59" id="input1" class="input_search" mask="yyyy-mm-dd" anchor="default"/>
  146. </Layout>
  147. </Layouts>
  148. </Div>
  149. <Grid position="absolute 1050 79 1194 724" id="datagrid2" binddataset="ds_main_dyemagamlist_item" anchor="top right bottom" cellsizingtype="both" selecttype="multirow">
  150. <Formats>
  151. <Format id="default">
  152. <Columns>
  153. <Column size="25" band="left"/>
  154. <Column size="68"/>
  155. <Column size="33"/>
  156. </Columns>
  157. <Rows>
  158. <Row size="24" band="head"/>
  159. <Row size="24"/>
  160. </Rows>
  161. <Band id="head">
  162. <Cell/>
  163. <Cell col="1" text="마감일자"/>
  164. <Cell col="2" text="마감"/>
  165. </Band>
  166. <Band id="body">
  167. <Cell celltype="head" text="expr:currow+1"/>
  168. <Cell col="1" displaytype="date" text="bind:iodd"/>
  169. <Cell col="2" text="bind:magamflag"/>
  170. </Band>
  171. </Format>
  172. </Formats>
  173. </Grid>
  174. <Static text="월별 검사실 마감여부" position="absolute 1049 58 1197 75" id="caption3" class="tit_2" anchor="top right"/>
  175. <Shape id="line00" class="line_1" position="absolute 0 74 1045 80" anchor="left top right"/>
  176. <Shape id="line01" class="line_1" position="absolute 0 75 1045 81" anchor="left top right"/>
  177. <Shape id="line02" class="line_1" position="absolute 1050 73 1194 79" anchor="top right"/>
  178. <Shape id="line03" class="line_1" position="absolute 1050 74 1194 80" anchor="top right"/>
  179. <Shape id="line04" class="line_1" position="absolute 1050 75 1194 81" anchor="top right"/>
  180. <Shape id="line05" class="line_1" position="absolute 0 530 1045 536" anchor="left right bottom"/>
  181. <Shape id="line06" class="line_1" position="absolute 0 531 1045 537" anchor="left right bottom"/>
  182. <Shape id="line08" class="line_1" position="absolute 0 532 1045 538" anchor="left right bottom"/>
  183. <Button id="btn_save" taborder="1" text="일마감" class="btn4" position="absolute 917 52 985 74" onclick="group2_btn_save_onclick" anchor="top right"/>
  184. <Button id="btn_del" taborder="2" text="수정" class="btn4" position="absolute 988 52 1044 74" onclick="group2_btn_del_onclick" anchor="top right"/>
  185. <Button position="absolute 834 52 914 74" id="btn_excsave" class="btn7" text="엑셀저장" anchor="top right" onclick="group2_btn_excsave_onclick"/>
  186. <Button id="button6" taborder="3" text="마감정리" class="btn4" position="absolute 965 509 1045 531" onclick="group2_button6_onclick" anchor="right bottom"/>
  187. <CheckBox id="chk_notzero" taborder="4" text="일소모가 없으면 제외" value="false" position="absolute 624 51 785 70"/>
  188. </Layout>
  189. </Layouts>
  190. </Div>
  191. <Div position="absolute 0 745 1195 770" id="grp_btn" anchor="left right bottom">
  192. <Layouts>
  193. <Layout>
  194. <Button position="absolute 0 0 56 22" id="button2" class="btn6" text="출력" anchor="default" onclick="grp_btn_button2_onclick"/>
  195. </Layout>
  196. </Layouts>
  197. </Div>
  198. <Static id="caption6" text="조영제/재료 소모재고일지" class="tit_1" position="absolute 0 0 200 25"/>
  199. <Div id="group4" taborder="1" class="div_SA" position="absolute 0 25 1194 65" anchor="left top right">
  200. <Layouts>
  201. <Layout>
  202. <Static id="caption19" text="입출고 일자 :" class="search_name" position="absolute 10 13 115 30" anchor="default"/>
  203. <Calendar id="ipt_iodd" taborder="2" class="input_search" position="absolute 104 11 204 30" mask="yyyy-mm-dd" anchor="default"/>
  204. <Shape id="line6" linetype="vertical" class="line_4" position="absolute 1113 10 1119 32" anchor="top right"/>
  205. <Static id="caption20" text="검사실 :" class="search_name" position="absolute 238 13 321 30" anchor="default"/>
  206. <Button id="button3" taborder="3" text="조회" class="btn1" position="absolute 1129 10 1185 32" anchor="top right" onclick="group4_button3_onclick"/>
  207. <Combo id="cmb_sectcd" taborder="4" innerdataset="@ds_cmb_info_initexcuroomgrp2" codecolumn="excuroomgrpcdid" datacolumn="excuroomgrpcdnm" position="absolute 302 11 489 30" anchor="default"/>
  208. <Static id="caption21" text="조영제/재료코드 :" class="search_name" visible="false" position="absolute 731 13 858 30" anchor="default"/>
  209. <Combo id="cmb_goodcd" taborder="5" innerdataset="@ds_temp_goodlist_item" codecolumn="goodcd" datacolumn="goodnm" visible="false" position="absolute 855 12 1103 31" anchor="default"/>
  210. <Radio id="Radio00" taborder="6" columncount="3" rowcount="0" position="absolute 534 8 710 32" codecolumn="codecolumn" datacolumn="datacolumn" value="C" index="0" onitemchanged="group4_Radio00_onitemchanged">
  211. <Dataset id="innerdataset">
  212. <ColumnInfo>
  213. <Column id="codecolumn" size="256"/>
  214. <Column id="datacolumn" size="256"/>
  215. </ColumnInfo>
  216. <Rows>
  217. <Row>
  218. <Col id="codecolumn">A</Col>
  219. <Col id="datacolumn">전체</Col>
  220. </Row>
  221. <Row>
  222. <Col id="codecolumn">C</Col>
  223. <Col id="datacolumn">조영제</Col>
  224. </Row>
  225. <Row>
  226. <Col id="codecolumn">M</Col>
  227. <Col id="datacolumn">재료</Col>
  228. </Row>
  229. </Rows>
  230. </Dataset>
  231. </Radio>
  232. </Layout>
  233. </Layouts>
  234. </Div>
  235. </Layout>
  236. </Layouts>
  237. <Objects>
  238. <Dataset id="ds_main_mainlist_uselist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  239. <ColumnInfo>
  240. <Column id="goodcd" type="STRING" size="256"/>
  241. <Column id="goodnm" type="STRING" size="256"/>
  242. <Column id="iodd" type="STRING" size="256"/>
  243. <Column id="qty" type="STRING" size="256"/>
  244. <Column id="usernm" type="STRING" size="256"/>
  245. <Column id="ioflag" type="STRING" size="256"/>
  246. <Column id="sectcd" type="STRING" size="256"/>
  247. <Column id="suppdeptcd" type="STRING" size="256"/>
  248. </ColumnInfo>
  249. <Rows>
  250. <Row>
  251. <Col id="goodcd"/>
  252. <Col id="goodnm"/>
  253. <Col id="iodd"/>
  254. <Col id="qty"/>
  255. <Col id="usernm"/>
  256. <Col id="ioflag"/>
  257. <Col id="sectcd"/>
  258. <Col id="suppdeptcd"/>
  259. </Row>
  260. </Rows>
  261. </Dataset>
  262. <Dataset id="ds_main_mainlist_wlnlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  263. <ColumnInfo>
  264. <Column id="goodcd" type="STRING" size="256"/>
  265. <Column id="goodnm" type="STRING" size="256"/>
  266. <Column id="iodd" type="STRING" size="256"/>
  267. <Column id="qty" type="STRING" size="256"/>
  268. <Column id="usernm" type="STRING" size="256"/>
  269. <Column id="ioflag" type="STRING" size="256"/>
  270. <Column id="sectcd" type="STRING" size="256"/>
  271. <Column id="suppdeptcd" type="STRING" size="256"/>
  272. </ColumnInfo>
  273. <Rows>
  274. <Row>
  275. <Col id="goodcd"/>
  276. <Col id="goodnm"/>
  277. <Col id="iodd"/>
  278. <Col id="qty"/>
  279. <Col id="usernm"/>
  280. <Col id="ioflag"/>
  281. <Col id="sectcd"/>
  282. <Col id="suppdeptcd"/>
  283. </Row>
  284. </Rows>
  285. </Dataset>
  286. <Dataset id="ds_main_goodlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  287. <ColumnInfo>
  288. <Column id="goodcd" type="STRING" size="256"/>
  289. <Column id="goodnm" type="STRING" size="256"/>
  290. <Column id="speccd" type="STRING" size="256"/>
  291. <Column id="safestocqty" type="STRING" size="256"/>
  292. <Column id="exstocqty" type="STRING" size="256"/>
  293. <Column id="wlnqty" type="STRING" size="256"/>
  294. <Column id="sumqty" type="STRING" size="256"/>
  295. <Column id="useqty" type="STRING" size="256"/>
  296. <Column id="stocqty" type="STRING" size="256"/>
  297. <Column id="reqqty" type="STRING" size="256"/>
  298. </ColumnInfo>
  299. <Rows>
  300. <Row>
  301. <Col id="goodcd"/>
  302. <Col id="goodnm"/>
  303. <Col id="speccd"/>
  304. <Col id="safestocqty"/>
  305. <Col id="exstocqty"/>
  306. <Col id="wlnqty"/>
  307. <Col id="sumqty"/>
  308. <Col id="useqty"/>
  309. <Col id="stocqty"/>
  310. <Col id="reqqty"/>
  311. </Row>
  312. </Rows>
  313. </Dataset>
  314. <Dataset id="ds_main_dyestoclist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_dyestoclist_item_oncolumnchanged">
  315. <ColumnInfo>
  316. <Column id="goodcd" type="STRING" size="256"/>
  317. <Column id="instcd" type="STRING" size="256"/>
  318. <Column id="agojego" type="STRING" size="256"/>
  319. <Column id="receive" type="STRING" size="256"/>
  320. <Column id="totsu" type="STRING" size="256"/>
  321. <Column id="outgo" type="STRING" size="256"/>
  322. <Column id="dayused" type="STRING" size="256"/>
  323. <Column id="presentcnt" type="STRING" size="256"/>
  324. <Column id="rem" type="STRING" size="256"/>
  325. <Column id="srchflag" type="STRING" size="256"/>
  326. <Column id="magamflag" type="STRING" size="256"/>
  327. </ColumnInfo>
  328. <Rows>
  329. <Row>
  330. <Col id="goodcd"/>
  331. <Col id="instcd"/>
  332. <Col id="agojego"/>
  333. <Col id="receive"/>
  334. <Col id="totsu"/>
  335. <Col id="outgo"/>
  336. <Col id="dayused"/>
  337. <Col id="presentcnt"/>
  338. <Col id="rem"/>
  339. <Col id="srchflag"/>
  340. <Col id="magamflag"/>
  341. </Row>
  342. </Rows>
  343. </Dataset>
  344. <Dataset id="ds_main_goodinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  345. <Dataset id="ds_main_dyecdpamlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  346. <ColumnInfo>
  347. <Column id="pid" type="STRING" size="256"/>
  348. <Column id="hngnm" type="STRING" size="256"/>
  349. <Column id="excuexectodd" type="STRING" size="256"/>
  350. <Column id="basecdflagdesc" type="STRING" size="256"/>
  351. <Column id="calcscorcd" type="STRING" size="256"/>
  352. <Column id="excucdnm" type="STRING" size="256"/>
  353. <Column id="goodcd" type="STRING" size="256"/>
  354. <Column id="goodnm" type="STRING" size="256"/>
  355. <Column id="drugqty" type="STRING" size="256"/>
  356. <Column id="speccd" type="STRING" size="256"/>
  357. <Column id="prcpdd" type="STRING" size="256"/>
  358. <Column id="instcd" type="STRING" size="256"/>
  359. <Column id="excuroomcd" type="STRING" size="256"/>
  360. </ColumnInfo>
  361. <Rows>
  362. <Row>
  363. <Col id="pid"/>
  364. <Col id="hngnm"/>
  365. <Col id="excuexectodd"/>
  366. <Col id="basecdflagdesc"/>
  367. <Col id="calcscorcd"/>
  368. <Col id="excucdnm"/>
  369. <Col id="goodcd"/>
  370. <Col id="goodnm"/>
  371. <Col id="drugqty"/>
  372. <Col id="speccd"/>
  373. <Col id="prcpdd"/>
  374. <Col id="instcd"/>
  375. <Col id="excuroomcd"/>
  376. </Row>
  377. </Rows>
  378. </Dataset>
  379. <Dataset id="ds_main_dyemagamlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  380. <ColumnInfo>
  381. <Column id="iodd" type="STRING" size="256"/>
  382. <Column id="magamflag" type="STRING" size="256"/>
  383. </ColumnInfo>
  384. <Rows>
  385. <Row>
  386. <Col id="iodd"/>
  387. <Col id="magamflag"/>
  388. </Row>
  389. </Rows>
  390. </Dataset>
  391. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  392. <ColumnInfo>
  393. <Column id="srchiodd" type="STRING" size="256"/>
  394. <Column id="srchsectcd" type="STRING" size="256"/>
  395. <Column id="srchgoodcd" type="STRING" size="256"/>
  396. <Column id="srchgoodnm" type="STRING" size="256"/>
  397. <Column id="sectcd" type="STRING" size="256"/>
  398. <Column id="srchdd" type="STRING" size="256"/>
  399. <Column id="sdate" type="STRING" size="256"/>
  400. <Column id="edate" type="STRING" size="256"/>
  401. <Column id="itemcd" type="STRING" size="256"/>
  402. </ColumnInfo>
  403. <Rows>
  404. <Row>
  405. <Col id="srchiodd"/>
  406. <Col id="srchsectcd"/>
  407. <Col id="srchgoodcd"/>
  408. <Col id="srchgoodnm"/>
  409. <Col id="sectcd"/>
  410. <Col id="srchdd"/>
  411. <Col id="sdate"/>
  412. <Col id="edate"/>
  413. </Row>
  414. </Rows>
  415. </Dataset>
  416. <Dataset id="ds_send_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  417. <ColumnInfo>
  418. <Column id="iptflag" type="STRING" size="256"/>
  419. <Column id="goodcd" type="STRING" size="256"/>
  420. <Column id="sectcd" type="STRING" size="256"/>
  421. <Column id="qty" type="STRING" size="256"/>
  422. <Column id="ioflag" type="STRING" size="256"/>
  423. <Column id="iodd" type="STRING" size="256"/>
  424. <Column id="suppdeptcd" type="STRING" size="256"/>
  425. <Column id="mainflag" type="STRING" size="256"/>
  426. </ColumnInfo>
  427. <Rows>
  428. <Row>
  429. <Col id="iptflag"/>
  430. <Col id="goodcd"/>
  431. <Col id="sectcd"/>
  432. <Col id="qty"/>
  433. <Col id="ioflag"/>
  434. <Col id="iodd"/>
  435. <Col id="suppdeptcd"/>
  436. <Col id="mainflag"/>
  437. </Row>
  438. </Rows>
  439. </Dataset>
  440. <Dataset id="ds_send_req_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  441. <Dataset id="ds_cmb_info_initexcuroomgrp2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  442. <ColumnInfo>
  443. <Column id="excuroomgrpcdid" type="STRING" size="256"/>
  444. <Column id="excuroomgrpcdnm" type="STRING" size="256"/>
  445. </ColumnInfo>
  446. <Rows>
  447. <Row/>
  448. </Rows>
  449. </Dataset>
  450. <Dataset id="ds_cmb_info_goodlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  451. <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  452. <ColumnInfo>
  453. <Column id="goodcd" type="STRING" size="256"/>
  454. <Column id="goodnm" type="STRING" size="256"/>
  455. <Column id="speccd" type="STRING" size="256"/>
  456. <Column id="safestocqty" type="STRING" size="256"/>
  457. <Column id="inswlniodd" type="STRING" size="256"/>
  458. <Column id="inswlngoodcd" type="STRING" size="256"/>
  459. <Column id="inswlnqty" type="STRING" size="256"/>
  460. <Column id="setwlniodd" type="STRING" size="256"/>
  461. <Column id="setwlngoodcd" type="STRING" size="256"/>
  462. <Column id="setwlnqty" type="STRING" size="256"/>
  463. <Column id="insuseiodd" type="STRING" size="256"/>
  464. <Column id="insusegoodcd" type="STRING" size="256"/>
  465. <Column id="insuseqty" type="STRING" size="256"/>
  466. <Column id="setuseiodd" type="STRING" size="256"/>
  467. <Column id="setusegoodcd" type="STRING" size="256"/>
  468. <Column id="setuseqty" type="STRING" size="256"/>
  469. <Column id="count" type="STRING" size="256"/>
  470. </ColumnInfo>
  471. <Rows>
  472. <Row>
  473. <Col id="goodcd"/>
  474. <Col id="goodnm"/>
  475. <Col id="speccd"/>
  476. <Col id="safestocqty"/>
  477. <Col id="inswlniodd"/>
  478. <Col id="inswlngoodcd"/>
  479. <Col id="inswlnqty"/>
  480. <Col id="setwlniodd"/>
  481. <Col id="setwlngoodcd"/>
  482. <Col id="setwlnqty"/>
  483. <Col id="insuseiodd"/>
  484. <Col id="insusegoodcd"/>
  485. <Col id="insuseqty"/>
  486. <Col id="setuseiodd"/>
  487. <Col id="setusegoodcd"/>
  488. <Col id="setuseqty"/>
  489. <Col id="count"/>
  490. </Row>
  491. </Rows>
  492. </Dataset>
  493. <Dataset id="ds_rexprnt_dyestoclist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  494. <Dataset id="ds_temp_goodlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  495. <ColumnInfo>
  496. <Column id="goodcd" type="STRING" size="256"/>
  497. <Column id="goodnm" type="STRING" size="256"/>
  498. </ColumnInfo>
  499. <Rows>
  500. <Row/>
  501. </Rows>
  502. </Dataset>
  503. <Dataset id="ds_rexprnt_dyestoclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  504. <ColumnInfo>
  505. <Column id="srchiodd" type="STRING" size="256"/>
  506. <Column id="srchsectcd" type="STRING" size="256"/>
  507. <Column id="srchexcuroomgrp" type="STRING" size="256"/>
  508. <Column id="srchsudept" type="STRING" size="256"/>
  509. </ColumnInfo>
  510. <Rows>
  511. <Row>
  512. <Col id="srchiodd"/>
  513. <Col id="srchsectcd"/>
  514. <Col id="srchexcuroomgrp"/>
  515. <Col id="srchsudept"/>
  516. </Row>
  517. </Rows>
  518. </Dataset>
  519. </Objects>
  520. <Bind>
  521. <BindItem id="item0" compid="group4.cmb_goodcd" propid="text" datasetid="ds_send" columnid="srchgoodcd"/>
  522. <BindItem id="item2" compid="group4.ipt_iodd" propid="text" datasetid="ds_send" columnid=""/>
  523. <BindItem id="item3" compid="group4.ipt_iodd" propid="value" datasetid="ds_send" columnid="srchiodd"/>
  524. <BindItem id="item4" compid="group2.grp_excucdrem.input1" propid="value" datasetid="ds_send" columnid="sdate"/>
  525. <BindItem id="item5" compid="group2.grp_excucdrem.input2" propid="value" datasetid="ds_send" columnid="edate"/>
  526. <BindItem id="item1" compid="group4.cmb_sectcd" propid="value" datasetid="ds_send" columnid="srchsectcd"/>
  527. <BindItem id="item6" compid="group4.Radio00" propid="value" datasetid="ds_send" columnid="itemcd"/>
  528. </Bind>
  529. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  530. * System Name :
  531. * Job Name :
  532. * Creator :
  533. * Make Date : 2016-06-17
  534. * Description :
  535. *---------------------------------------------------------------------------------------
  536. * Modify Date Modifier Modify Description
  537. *---------------------------------------------------------------------------------------
  538. * 2016-06-17 Live Converter TF->XP
  539. *
  540. *---------------------------------------------------------------------------------------
  541. ****************************************************************************************/
  542. //=======================================================================================
  543. // Lib Include
  544. //---------------------------------------------------------------------------------------
  545. include "com_commonxp::comm_main.xjs"
  546. include "ast_examcurexp::AEZ0001.xjs"
  547. //=======================================================================================
  548. // Global Form Variable
  549. //---------------------------------------------------------------------------------------
  550. var arErrorCode = new HashArray();
  551. var gSuppdeptcd = "";
  552. //=======================================================================================
  553. // Function
  554. //---------------------------------------------------------------------------------------
  555. /****************************************************************************************
  556. * Argument : N/A
  557. * Description : 사용안함
  558. ****************************************************************************************/
  559. function getGridData() {
  560. if(ds_send.getColumn(0,"srchiodd") != "") {
  561. model.setValue("/root/temp/goodnm", cmb_goodcd.label);
  562. model.setValue("/root/temp/inswlnqty", "0");
  563. model.setValue("/root/temp/setwlnqty", "0");
  564. model.setValue("/root/temp/insuseqty", "0");
  565. model.setValue("/root/temp/setuseqty", "0");
  566. model.removeNodeset("/root/main/mainlist");
  567. model.removeNodeset("/root/main/goodlist/item");
  568. btn_inSave.disabled = true;
  569. btn_inUpdt.disabled = true;
  570. btn_outSave.disabled = true;
  571. btn_outUpdt.disabled = true;
  572. ipt_inswlnday.disabled = true;
  573. ipt_insuseday.disabled = true;
  574. submit("TRAEB03401");
  575. model.setValue("/root/send/srchiodd", getCurrentDate());
  576. var srchgoodcd = ds_send.getColumn(0,"srchgoodcd");
  577. if (srchgoodcd != "") {
  578. btn_inSave.disabled = false;
  579. btn_outSave.disabled = false;
  580. ipt_inswlnday.disabled = false;
  581. ipt_insuseday.disabled = false;
  582. }
  583. // if(model.getXPathValue("count(/root/main/mainlist/wlnlist)") > 0)
  584. // {
  585. // btn_inSave.disabled = true;
  586. // ipt_inswlnqty.disabled = true;
  587. // btn_inUpdt.disabled = false;
  588. // ipt_setwlnqty.disabled = false;
  589. // }
  590. // else
  591. // {
  592. // btn_inUpdt.disabled = true;
  593. // ipt_setwlnqty.disabled = true;
  594. // btn_inSave.disabled = false;
  595. // ipt_inswlnqty.disabled = false;
  596. // }
  597. //
  598. // if(model.getXPathValue("count(/root/main/mainlist/uselist)") > 0)
  599. // {
  600. // btn_outSave.disabled = true;
  601. // ipt_insuseqty.disabled = true;
  602. // btn_outUpdt.disabled = false;
  603. // ipt_setuseqty.disabled = false;
  604. // }
  605. // else
  606. // {
  607. // btn_outUpdt.disabled = true;
  608. // ipt_setuseqty.disabled = true;
  609. // btn_outSave.disabled = false;
  610. // ipt_insuseqty.disabled = false;
  611. // }
  612. model.refresh();
  613. }
  614. else
  615. {
  616. messageBox("날짜를", "C001");
  617. }
  618. }
  619. /****************************************************************************************
  620. * Argument : N/A
  621. * Description : 입출고현황 조회
  622. ****************************************************************************************/
  623. function getDyeList() {
  624. if( utlf_isNull(ds_send.getColumn(0,"srchiodd")) ){
  625. sysf_messageBox("입고일자를", "I007");
  626. return;
  627. }
  628. if( utlf_isNull(ds_send.getColumn(0,"srchsectcd")) ){
  629. sysf_messageBox("검사실을", "I007");
  630. return;
  631. }
  632. //2011.07.12 추가처방시 심사실에서 직접입력한경우도 같이 포함해서 조회되게 수정 - 박재영
  633. if(ds_send.getColumn(0,"srchsectcd") == "MCC011"){
  634. ds_send_data.setColumn(0,"mainflag", "Y");
  635. }else{
  636. ds_send_data.setColumn(0,"mainflag", "");
  637. }
  638. // 2011.02.07 c y w 조회시 환자정보리스트 클리어
  639. ds_main_dyecdpamlist_item.clearData();
  640. ds_main_dyestoclist_item.clearData();
  641. // var row = ds_main_dyestoclist_item.rowposition;
  642. dsf_createDsRow("ds_req", [
  643. {col:"srchiodd", type:"STRING", size:256, val:ds_send.getColumn(0,"srchiodd")}
  644. , {col:"suppdeptcd", type:"STRING", size:256, val:gSuppdeptcd}
  645. , {col:"srchsectcd", type:"STRING", size:256, val:ds_send.getColumn(0,"srchsectcd")}
  646. , {col:"mainflag", type:"STRING", size:256, val:ds_send_data.getColumn(0,"mainflag")}
  647. , {col:"itemcd", type:"STRING", size:256, val:ds_send.getColumn(0,"itemcd")}
  648. ]);
  649. var oParam = {};
  650. oParam.id = "TRAEB03402";
  651. oParam.service = "examcurebaseapp.DyeCode";
  652. oParam.method = "reqGetDyeStocMngtList";
  653. oParam.inds = "req=ds_req";
  654. oParam.outds = "ds_main_dyestoclist_item=item";
  655. oParam.async = false;
  656. oParam.callback = "cf_TRAEB03402";
  657. tranf_submit(oParam);
  658. //sysf_messageBox("0 =" + group2.chk_notzero.value);
  659. if (group2.chk_notzero.value == true ) {
  660. ds_main_dyestoclist_item.filter("dayused != '0'");
  661. } else {
  662. ds_main_dyestoclist_item.filter("");
  663. }
  664. if(arErrorCode.pop("TRAEB03402") > -1) {
  665. if( ds_main_dyestoclist_item.getColumn(0,"srchflag") == "1" ){ // 재고테이블에 데이터가 있을 경우
  666. if( ds_main_dyestoclist_item.getColumn(0,"magamflag") == "S" ){ // 마감여부가 S일 경우
  667. group2.btn_save.visible = true;
  668. group2.btn_del.visible = true;
  669. group2.btn_disone.visible = false;
  670. group2.btn_dissu.visible = false;
  671. }else{ // 마감했을경우 버튼 비활성화.
  672. group2.btn_save.visible = false;
  673. group2.btn_del.visible = false;
  674. group2.btn_disone.visible = true;
  675. group2.btn_dissu.visible = true;
  676. }
  677. }else if( ds_main_dyestoclist_item.getColumn(0,"srchflag") == "2" ){ // 데이터가 없을경우 활성화.
  678. //20200204
  679. if (group4.Radio00.value == "A" ) {
  680. group2.btn_save.visible = true;
  681. } else {
  682. group2.btn_save.visible = false;
  683. }
  684. group2.btn_del.visible = false;
  685. group2.btn_dissu.visible = true;
  686. ds_main_dyestoclist_item.updatecontrol = false;
  687. if( ds_main_dyestoclist_item.getColumn(0,"magamflag") == "D" ){
  688. for(var a = 0 ; a < ds_main_dyestoclist_item.rowcount ; a++ ){
  689. ds_main_dyestoclist_item.setRowType(a,Dataset.ROWTYPE_UPDATE);
  690. }
  691. }else{sysf_trace(ds_main_dyestoclist_item.rowcount);
  692. for(var a = 0 ; a < ds_main_dyestoclist_item.rowcount ; a++ ){
  693. ds_main_dyestoclist_item.setRowType(a,Dataset.ROWTYPE_INSERT);
  694. }
  695. }
  696. ds_main_dyestoclist_item.updatecontrol = true;
  697. }else{ //1 , 2 아니고 null일 경우 비활성화.
  698. group2.btn_save.visible = false;
  699. group2.btn_del.visible = false;
  700. group2.btn_disone.visible = true;
  701. group2.btn_dissu.visible = true;
  702. }
  703. //2011.07.19 조영제 조영제 월별 마감일자,마감여부
  704. dsf_createDsRow("ds_req", [
  705. {col:"srchiodd", type:"STRING", size:256, val:ds_send.getColumn(0,"srchiodd")}
  706. , {col:"suppdeptcd", type:"STRING", size:256, val:gSuppdeptcd}
  707. , {col:"srchsectcd", type:"STRING", size:256, val:ds_send.getColumn(0,"srchsectcd")}
  708. ]);
  709. var oParam = {};
  710. oParam.id = "TRAEB03405";
  711. oParam.service = "examcurebaseapp.DyeCode";
  712. oParam.method = "reqGetDyeMagamLst";
  713. oParam.inds = "req=ds_req";
  714. oParam.outds = "ds_main_dyemagamlist_item=item";
  715. oParam.async = true;
  716. //oParam.callback = "cf_TRAEB03405";
  717. tranf_submit(oParam);
  718. }
  719. }
  720. function cf_TRAEB03402(sSvcId, nErrorCode, sErrorMsg) {
  721. arErrorCode.push(sSvcId, nErrorCode);
  722. }
  723. /****************************************************************************************
  724. * Argument : oTrgtGrid - 그리드ID
  725. * : nColumnIndx - Col Index
  726. * Description : 그리드 바인딩 Cell Name
  727. ****************************************************************************************/
  728. function lf_getBindCellName(oTrgtGrid, nColumnIndx){
  729. var sRtnText = "";
  730. var sTrgtText = oTrgtGrid.getCellProperty("body", nColumnIndx, "text");
  731. if(!utlf_isNull( sTrgtText)){
  732. sRtnText = sTrgtText.replace("bind:", "");
  733. }
  734. return sRtnText;
  735. }
  736. //=======================================================================================
  737. // Event
  738. //---------------------------------------------------------------------------------------
  739. /****************************************************************************************
  740. * Components : Form
  741. * Components ID : SMAEB03401
  742. * Event : oninit
  743. * Argument : 01.obj : Object Event has occurred
  744. * : 02.e : Event Object
  745. * Description : 화면 처음 초기화시 폼초기화
  746. ****************************************************************************************/
  747. function SMAEB03401_oninit(obj:Form, e:InitEventInfo)
  748. {
  749. frmf_initForm(obj); // 폼 초기화
  750. }
  751. /****************************************************************************************
  752. * Components : Form
  753. * Components ID : SMAEB03401
  754. * Event : onload
  755. * Argument : 01.obj : Object Event has occurred
  756. * : 02.e : Event Object
  757. * Description : 화면 처음 초기화시 폼초기화
  758. ****************************************************************************************/
  759. function SMAEB03401_onload(obj:Form, e:LoadEventInfo)
  760. {
  761. lf_aezfSetSuppDeptcd(); //AEZ0001.xjs
  762. gSuppdeptcd = frmf_getParameter("AST_DEPTCD");
  763. //20161207 메뉴에서 파라메터 가져오기
  764. var gvMenuParam = frmf_getMenuParam();
  765. //alert(gvMenuParam);
  766. if ( !utlf_isNull(gvMenuParam) && gvMenuParam != "null" ) {
  767. gSuppdeptcd = gvMenuParam ;
  768. }
  769. trace("gSuppdeptcd = " + gSuppdeptcd);
  770. grdf_setRowTypeIcon(group2.grd_dyelist, 0); // 그리드 상태 표시
  771. ds_send.setColumn(0,"srchiodd" , utlf_getCurrentDate());
  772. ds_send.setColumn(0,"edate" , utlf_getCurrentDate());
  773. if (gSuppdeptcd == "2220000000") {
  774. ds_send.setColumn(0,"itemcd" , 'A' );
  775. group2.chk_notzero.value = true;
  776. } else {
  777. ds_send.setColumn(0,"itemcd" , 'C' );
  778. }
  779. ds_main_mainlist_uselist.clearData();
  780. ds_main_mainlist_wlnlist.clearData();
  781. dsf_createDsRow("ds_reqparam", [
  782. {col:"basesuppdeptcd", type:"STRING", size:256, val:gSuppdeptcd}
  783. , {col:"rbasecdflag", type:"STRING", size:256, val:"R"}
  784. , {col:"ebasecdflag", type:"STRING", size:256, val:"E"}
  785. , {col:"instcd", type:"STRING", size:256, val:""}
  786. , {col:"initflag", type:"STRING", size:256, val:"1"}
  787. , {col:"alladdyn", type:"STRING", size:256, val:""}
  788. ]);
  789. var oParam = {};
  790. oParam.id = "TRAEA01301";
  791. oParam.service = "examcureacptexecapp.ExamCureAcpt";
  792. oParam.method = "reqGetInitExamCureRoomGrpCodeList";
  793. oParam.inds = "reqparam=ds_reqparam";
  794. oParam.outds = "ds_cmb_info_initexcuroomgrp2=initexcuroomgrp2";
  795. oParam.async = false;
  796. oParam.callback = "cf_TRAEA01301";
  797. tranf_submit(oParam);
  798. ds_cmb_info_initexcuroomgrp2.deleteRow(0);
  799. ds_cmb_info_initexcuroomgrp2.rowposition = 0;
  800. dsf_createDsRow("ds_req", [
  801. {col:"basesuppdeptcd", type:"STRING", size:256, val:gSuppdeptcd}
  802. , {col:"srchgoodcd", type:"STRING", size:256, val:ds_send.getColumn(0,"srchgoodcd")}
  803. , {col:"srchgoodnm", type:"STRING", size:256, val:ds_send.getColumn(0,"srchgoodnm")}
  804. ]);
  805. var oParam = {};
  806. oParam.id = "TRAEB03501";
  807. oParam.service = "examcurebaseapp.DyeCode";
  808. oParam.method = "reqGetDyeCodeList";
  809. oParam.inds = "req=ds_req";
  810. oParam.outds = "ds_main_goodinfo=item";
  811. oParam.async = false;
  812. //oParam.callback = "cf_TRAEB03501";
  813. tranf_submit(oParam);
  814. group4.cmb_sectcd.index = 0;
  815. //20200204
  816. if (group4.Radio00.value == "A" ) {
  817. group2.btn_save.visible = true;
  818. } else {
  819. group2.btn_save.visible = false;
  820. }
  821. group2.btn_del.visible = false;
  822. group2.btn_disone.visible = true;
  823. group2.btn_dissu.visible = true;
  824. }
  825. function cf_TRAEA01301(sSvcId, nErrorCode, sErrorMsg) {
  826. if(nErrorCode < 0) return;
  827. ds_cmb_info_initexcuroomgrp2.updateColID("basecdcnts","excuroomgrpcdid");
  828. ds_cmb_info_initexcuroomgrp2.updateColID("basecdcnts2","excuroomgrpcdnm");
  829. }
  830. /****************************************************************************************
  831. * Components : Button
  832. * Components ID : group4.button3
  833. * Event : onclick
  834. * Argument : 01.obj : Object Event has occurred
  835. * : 02.e : Event Object
  836. * Description : 조회
  837. ****************************************************************************************/
  838. function group4_button3_onclick(obj:Button, e:ClickEventInfo)
  839. {
  840. getDyeList();
  841. }
  842. /****************************************************************************************
  843. * Components : Button
  844. * Components ID : group2.btn_excsave
  845. * Event : onclick
  846. * Argument : 01.obj : Object Event has occurred
  847. * : 02.e : Event Object
  848. * Description : 엑셀저장
  849. ****************************************************************************************/
  850. function group2_btn_excsave_onclick(obj:Button, e:ClickEventInfo)
  851. {
  852. if( ds_main_dyestoclist_item.rowcount > 0 ){
  853. grdf_exportExcel(group2.grd_dyelist, "입출고현황", "입출고현황", false, "", "user", false);
  854. } else {
  855. sysf_messageBox("조회된 데이터가 ", "I004");
  856. }
  857. }
  858. /****************************************************************************************
  859. * Components : Button
  860. * Components ID : group2.btn_save
  861. * Event : onclick
  862. * Argument : 01.obj : Object Event has occurred
  863. * : 02.e : Event Object
  864. * Description : 일마감
  865. ****************************************************************************************/
  866. function group2_btn_save_onclick(obj:Button, e:ClickEventInfo)
  867. {
  868. if (ds_send.getColumn(0,"itemcd") <> 'A') {
  869. sysf_messageBox("일마감은 전체조회에서만 가능합니다 ", "");
  870. return;
  871. }
  872. var cnt = ds_main_dyestoclist_item.rowcount;
  873. if( cnt > 0 ) {
  874. if( utlf_isNull(ds_send.getColumn(0,"srchiodd")) ){
  875. sysf_messageBox("입고일자를", "I007");
  876. } else {
  877. if( sysf_messageBox("조영제 재고정보를","Q002")==6 ) {
  878. var dsUpdate = grdf_getGridUpdateData(group2.grd_dyelist, "all");
  879. grdf_setStatusColumn(dsUpdate, "m");
  880. ds_send_req_data1.copyData(dsUpdate, true);
  881. var oParam = {};
  882. oParam.id = "TXAEB03402";
  883. oParam.service = "examcurebaseapp.DyeCode";
  884. oParam.method = "reqSetDyeUpList";
  885. oParam.inds = "req=ds_send_req_data1";
  886. oParam.outds = "ds_temp=item";
  887. oParam.async = false;
  888. //oParam.callback = "cf_TXAEB03402";
  889. tranf_submit(oParam);
  890. getDyeList();
  891. }
  892. }
  893. }else{
  894. sysf_messageBox("저장할 입고정보가", "I004");
  895. }
  896. }
  897. /****************************************************************************************
  898. * Components : Button
  899. * Components ID : group2.btn_del
  900. * Event : onclick
  901. * Argument : 01.obj : Object Event has occurred
  902. * : 02.e : Event Object
  903. * Description : 수정
  904. ****************************************************************************************/
  905. function group2_btn_del_onclick(obj:Button, e:ClickEventInfo)
  906. {
  907. var cnt = ds_main_dyestoclist_item.rowcount;
  908. if( cnt > 0 ) {
  909. if( utlf_isNull(ds_send.getColumn(0,"srchiodd")) ){
  910. sysf_messageBox("입고일자를", "I007");
  911. }else{
  912. if ( sysf_messageBox("조영제 재고정보를","Q001")==6 ) {
  913. dsf_createDsRow("ds_req", [
  914. {col:"srchiodd", type:"STRING", size:256, val:ds_send.getColumn(0,"srchiodd")}
  915. , {col:"suppdeptcd", type:"STRING", size:256, val:gSuppdeptcd}
  916. , {col:"srchsectcd", type:"STRING", size:256, val:ds_send.getColumn(0,"srchsectcd")}
  917. ]);
  918. var oParam = {};
  919. oParam.id = "TXAEB03404";
  920. oParam.service = "examcurebaseapp.DyeCode";
  921. oParam.method = "reqSetDyeStocDelUpdt";
  922. oParam.inds = "req=ds_req";
  923. oParam.outds = "ds_temp=item";
  924. oParam.async = false;
  925. oParam.callback = "cf_TXAEB03404";
  926. tranf_submit(oParam);
  927. if( arErrorCode.pop("TXAEB03404") > -1 ){
  928. ds_main_dyestoclist_item.clearData();
  929. }else{
  930. getDyeList();
  931. }
  932. }
  933. }
  934. } else {
  935. sysf_messageBox("삭제할 입고정보가", "I004");
  936. }
  937. }
  938. function cf_TXAEB03404(sSvcId, nErrorCode, sErrorMsg) {
  939. arErrorCode.push(sSvcId, nErrorCode);
  940. }
  941. /****************************************************************************************
  942. * Components : Grid
  943. * Components ID : group2.grd_dyelist
  944. * Event : onkillfocus
  945. * Argument : 01.obj : Object Event has occurred
  946. * : 02.e : Event Object
  947. * Description : 그리드 미선택시?
  948. ****************************************************************************************/
  949. function group2_grd_dyelist_onkillfocus(obj:Grid, e:KillFocusEventInfo)
  950. {
  951. // if( ds_main_dyestoclist_item.rowposition > -1 ){
  952. // if( !utlf_isNull(ds_main_dyestoclist_item.getColumn(0,"goodcd")) ) {
  953. // var colidx = group2.grd_dyelist.currentcol;
  954. // var row = ds_main_dyestoclist_item.rowposition;
  955. // alert("1");
  956. // // 수령
  957. // if(lf_getBindCellName(group2.grd_dyelist,colidx) == "receive") {
  958. // var totsu = 0;
  959. // totsu = parseFloat(ds_main_dyestoclist_item.getColumn(row,"agojego"))+parseFloat( ds_main_dyestoclist_item.getColumn(row,"receive"));
  960. // ds_main_dyestoclist_item.setColumn(row,"totsu" , totsu );
  961. // }
  962. // // 전일재고수령
  963. // if(lf_getBindCellName(group2.grd_dyelist,colidx) == "agojego") {
  964. // var totsu = 0;
  965. // totsu = parseFloat(ds_main_dyestoclist_item.getColumn(row,"agojego"))+parseFloat( ds_main_dyestoclist_item.getColumn(row,"receive"));
  966. // ds_main_dyestoclist_item.setColumn(row,"totsu" , totsu );
  967. // }
  968. //
  969. // var presentcnt = 0;
  970. // presentcnt = parseFloat( ds_main_dyestoclist_item.getColumn(row,"totsu")) - parseFloat(ds_main_dyestoclist_item.getColumn(row,"outgo")) - parseFloat( ds_main_dyestoclist_item.getColumn(row,"dayused"))
  971. // ds_main_dyestoclist_item.setColumn(row,"presentcnt" , presentcnt );
  972. // }
  973. // }
  974. }
  975. /****************************************************************************************
  976. * Components : Grid
  977. * Components ID : group2.grd_dyelist
  978. * Event : oncelldblclick
  979. * Argument : 01.obj : Object Event has occurred
  980. * : 02.e : Event Object
  981. * Description : 그리드 더블클릭시
  982. ****************************************************************************************/
  983. function group2_grd_dyelist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  984. {
  985. var colidx = group2.grd_dyelist.currentcol;
  986. if( e.row > -1 ) {
  987. if(lf_getBindCellName(group2.grd_dyelist,colidx) == "goodcd") {
  988. ds_send_data.setColumn(0,"sectcd" , ds_send.getColumn(0,"srchsectcd"));
  989. ds_send_data.setColumn(0,"goodcd" , ds_main_dyestoclist_item.getColumn(e.row,"goodcd"));
  990. ds_send_data.setColumn(0,"suppdeptcd" , gSuppdeptcd);
  991. ds_send_data.setColumn(0,"iodd" , ds_send.getColumn(0,"srchiodd"));
  992. //2011.07.12 추가처방시 심사실에서 직접입력한경우도 같이 포함해서 조회되게 수정 - 박재영
  993. if(ds_send.getColumn(0,"srchsectcd") == "MCC011"){
  994. ds_send_data.setColumn(0,"mainflag", "Y");
  995. }else{
  996. ds_send_data.setColumn(0,"mainflag", "");
  997. }
  998. // 2011.02.07 c y w 조회시 환자정보리스트 클리어
  999. ds_main_dyecdpamlist_item.clearData();
  1000. var oParam = {};
  1001. oParam.id = "TRAEB03403";
  1002. oParam.service = "examcurebaseapp.DyeCode";
  1003. oParam.method = "reqGetDyeCodePamLst";
  1004. oParam.inds = "req=ds_send_data";
  1005. oParam.outds = "ds_main_dyecdpamlist_item=item";
  1006. oParam.async = true;
  1007. //oParam.callback = "cf_TRAEB03403";
  1008. tranf_submit(oParam);
  1009. }
  1010. }
  1011. }
  1012. /****************************************************************************************
  1013. * Components : Button
  1014. * Components ID : group2.button6
  1015. * Event : onclick
  1016. * Argument : 01.obj : Object Event has occurred
  1017. * : 02.e : Event Object
  1018. * Description : 마감정리
  1019. ****************************************************************************************/
  1020. function group2_button6_onclick(obj:Button, e:ClickEventInfo)
  1021. {
  1022. group2.grp_excucdrem.visible = true;
  1023. ds_send.setColumn(0,"sdate", ds_send.getColumn(0,"srchiodd"));
  1024. }
  1025. /****************************************************************************************
  1026. * Components : Button
  1027. * Components ID : group2.grp_excucdrem.button5
  1028. * Event : onclick
  1029. * Argument : 01.obj : Object Event has occurred
  1030. * : 02.e : Event Object
  1031. * Description : 적용
  1032. ****************************************************************************************/
  1033. function group2_grp_excucdrem_button5_onclick(obj:Button, e:ClickEventInfo)
  1034. {
  1035. if( sysf_messageBox("조영제 마감정리를","Q002")==6 ) {
  1036. dsf_createDsRow("ds_req", [
  1037. {col:"sdate", type:"STRING", size:256, val:ds_send.getColumn(0,"sdate")}
  1038. , {col:"edate", type:"STRING", size:256, val:ds_send.getColumn(0,"edate")}
  1039. , {col:"srchsectcd", type:"STRING", size:256, val:ds_send.getColumn(0,"srchsectcd")}
  1040. , {col:"suppdeptcd", type:"STRING", size:256, val:gSuppdeptcd}
  1041. ]);
  1042. var oParam = {};
  1043. oParam.id = "TXAEB03405";
  1044. oParam.service = "examcurebaseapp.DyeCode";
  1045. oParam.method = "reqSetDyeStocproc";
  1046. oParam.inds = "req=ds_req";
  1047. oParam.outds = "ds_temp=item";
  1048. oParam.async = true;
  1049. //oParam.callback = "cf_TXAEB03405";
  1050. tranf_submit(oParam);
  1051. }
  1052. }
  1053. /****************************************************************************************
  1054. * Components : Button
  1055. * Components ID : group2.grp_excucdrem.button4
  1056. * Event : onclick
  1057. * Argument : 01.obj : Object Event has occurred
  1058. * : 02.e : Event Object
  1059. * Description : 닫기
  1060. ****************************************************************************************/
  1061. function group2_grp_excucdrem_button4_onclick(obj:Button, e:ClickEventInfo)
  1062. {
  1063. group2.grp_excucdrem.visible = false;
  1064. }
  1065. /****************************************************************************************
  1066. * Components : Button
  1067. * Components ID : grp_btn.button2
  1068. * Event : onclick
  1069. * Argument : 01.obj : Object Event has occurred
  1070. * : 02.e : Event Object
  1071. * Description : 출력
  1072. ****************************************************************************************/
  1073. function grp_btn_button2_onclick(obj:Button, e:ClickEventInfo)
  1074. {
  1075. dsf_copyColInfo(ds_rexprnt_dyestoclist_item,ds_main_dyestoclist_item);
  1076. var cnt = ds_main_dyestoclist_item.rowcount;
  1077. for( var i = 0; i < cnt; i++ ){
  1078. var nRow = ds_rexprnt_dyestoclist_item.addRow();
  1079. ds_rexprnt_dyestoclist_item.copyRow(nRow,ds_main_dyestoclist_item,i);
  1080. ds_rexprnt_dyestoclist_item.setColumn(nRow,"goodcd",group2.grd_dyelist.getCellText(i,2));
  1081. dsf_makeValue(ds_rexprnt_dyestoclist_item,"goodcdd","string",ds_main_dyestoclist_item.getColumn(i,"goodcd"),nRow);
  1082. }
  1083. ds_rexprnt_dyestoclist.setColumn(0,"srchiodd" , group4.ipt_iodd.text );
  1084. ds_rexprnt_dyestoclist.setColumn(0,"srchsectcd" , group4.cmb_sectcd.text );
  1085. ds_rexprnt_dyestoclist.setColumn(0,"srchsudept" , sysf_getUserInfo("dutplcenm") );
  1086. // exeReportPreview("RPAEB03401", "XMLSTR" , "" , "" , "false" , "", "", "", "", "false");
  1087. var objDOM = rptf_createDOM(); // DOM 객체 설정
  1088. var objParam = new Object();
  1089. rptf_setNodeListToDOM(objDOM, "/root/rexprnt/dyestoclist/item" , ds_rexprnt_dyestoclist_item); // 데이터셋 1
  1090. rptf_setNodeListToDOM(objDOM, "/root/rexprnt/dyestocinfo" , ds_rexprnt_dyestoclist); // 데이터셋 2
  1091. objParam.xml_data_XML1 = objDOM.documentElement.source;
  1092. //var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=0";
  1093. var option = "open=1;save=1;directprint=0;print=1;zoom=0";
  1094. rptf_exeReportPreview30(["RPAEB03401"],[objParam], option);
  1095. //ds_rexprnt_dyestoclist_item.clear();
  1096. }
  1097. function ds_main_dyestoclist_item_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  1098. {
  1099. if( e.row > -1 ){
  1100. if( !utlf_isNull(obj.getColumn(0,"goodcd")) ) {
  1101. // var colidx = e.col;
  1102. var row = e.row;
  1103. // 수령
  1104. if(e.columnid == "receive") {
  1105. var totsu = 0;
  1106. totsu = parseFloat(obj.getColumn(row,"agojego"))+parseFloat( obj.getColumn(row,"receive"));
  1107. obj.setColumn(row,"totsu" , totsu );
  1108. }
  1109. // 전일재고수령
  1110. if(e.columnid == "agojego") {
  1111. var totsu = 0;
  1112. totsu = parseFloat(obj.getColumn(row,"agojego"))+parseFloat( obj.getColumn(row,"receive"));
  1113. obj.setColumn(row,"totsu" , totsu );
  1114. }
  1115. var presentcnt = 0;
  1116. presentcnt = parseFloat( obj.getColumn(row,"totsu")) - parseFloat(obj.getColumn(row,"outgo")) - parseFloat( obj.getColumn(row,"dayused"))
  1117. obj.setColumn(row,"presentcnt" , presentcnt );
  1118. }
  1119. }
  1120. }
  1121. function group4_Radio00_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  1122. {
  1123. //20200204
  1124. if (group4.Radio00.value == "A" ) {
  1125. group2.btn_save.visible = true;
  1126. } else {
  1127. group2.btn_save.visible = false;
  1128. }
  1129. }
  1130. ]]></Script>
  1131. </Form>
  1132. </FDL>