SMABC00500_혈액입고관리.xfdl 25 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMABC00500" position="absolute 0 0 1196 741" titletext="조혈모세포 입고관리" oninit="SMABC00500_oninit" onload="SMABC00500_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption6" text="조혈모세포실 입고관리" class="tit_1" position="absolute 0 0 189 23"/>
  8. <Button id="btn_save" taborder="1" text="저장" class="btn4" position="absolute 1138 21 1194 43" anchor="top right" onclick="btn_save_onclick"/>
  9. <Div id="grp_sea" taborder="2" class="div_SA" position="absolute 0 44 1194 105" anchor="left top right">
  10. <Layouts>
  11. <Layout>
  12. <Static id="caption2" text="입고일 :" class="search_name" position="absolute 15 9 101 26"/>
  13. <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1104 8 1110 51" anchor="top right"/>
  14. <Button id="btn_sea" taborder="1" text="조회" class="btn1" position="absolute 1123 7 1179 29" anchor="top right" onclick="grp_sea_btn_sea_onclick"/>
  15. <Edit id="ipt_pid" taborder="2" class="input_search" position="absolute 430 8 530 27" autoselect="true" onkeyup="grp_sea_ipt_pid_onkeyup"/>
  16. <Static id="caption16" text="등록번호 :" class="search_name" position="absolute 344 9 430 26"/>
  17. <Static id="caption5" text="입고장소 :" class="search_name" position="absolute 545 9 631 26"/>
  18. <Combo id="combo14" taborder="3" innerdataset="@ds_init_cmbinfo_deliveflag_A0156" codecolumn="cdid" datacolumn="cdnm" class="combo_search" position="absolute 634 8 750 27"/>
  19. <Calendar id="input5" taborder="4" class="input_s_essential" position="absolute 225 8 325 27" dateformat="yyyy-MM-dd" autoselect="true"/>
  20. <Static id="caption4" text="제대혈은행 :" class="search_name" position="absolute 545 35 644 52"/>
  21. <Static id="caption3" text="골수은행 :" class="search_name" position="absolute 344 36 430 53"/>
  22. <Combo id="combo1" taborder="5" innerdataset="@ds_init_cmbinfo_bonebank_B004" class="combo_search" position="absolute 433 35 530 54" datacolumn="hsctmdlnm" codecolumn="hsctmdlcd"/>
  23. <Edit id="ipt_delivepsnnm" taborder="6" class="input_search" enable="false" visible="false" position="absolute 924 9 1004 28"/>
  24. <Static id="caption7" text="입고자 :" class="search_name" position="absolute 765 10 838 27"/>
  25. <Edit id="ipt_winpsnid" taborder="7" class="input_search" position="absolute 841 9 921 28" autoselect="true" inputmode="upper"/>
  26. <Calendar id="input2" taborder="8" class="input_s_essential" position="absolute 100 8 200 27" dateformat="yyyy-MM-dd" value="null" autoselect="true"/>
  27. <Static id="caption8" text="~" position="absolute 207 8 219 28"/>
  28. <Static id="caption9" text="혈액번호 :" class="search_name" visible="false" position="absolute 770 35 856 52"/>
  29. <Edit id="input3" taborder="9" class="input_search" visible="false" position="absolute 860 35 975 54" autoselect="true"/>
  30. <Combo id="combo2" taborder="10" innerdataset="@ds_init_cmbinfo_cordbank_B005" class="combo_search" position="absolute 646 35 750 54" datacolumn="hsctmdlnm" codecolumn="hsctmdlcd"/>
  31. </Layout>
  32. </Layouts>
  33. </Div>
  34. <Static id="caption1" text="조혈모세포 입고리스트" class="tit_2" position="absolute 0 117 200 138"/>
  35. <Button id="btn_excsave" taborder="3" text="엑셀저장" class="btn7" position="absolute 1114 114 1194 133" anchor="top right" onclick="btn_excsave_onclick"/>
  36. <Shape id="line1" class="line_10" position="absolute 0 133 1194 139" anchor="left top right"/>
  37. <Grid id="grd_stemcellwinlist" taborder="4" binddataset="ds_main_stemcellcwin_stemcellcwinlist" useinputpanel="false" position="absolute 0 138 1194 738" autofittype="col" cellsizingtype="col" anchor="all">
  38. <Formats>
  39. <Format id="default">
  40. <Columns>
  41. <Column size="23"/>
  42. <Column size="127"/>
  43. <Column size="110"/>
  44. <Column size="116"/>
  45. <Column size="100"/>
  46. <Column size="101"/>
  47. <Column size="107"/>
  48. <Column size="100"/>
  49. <Column size="0"/>
  50. <Column size="114"/>
  51. <Column size="143"/>
  52. <Column size="100"/>
  53. <Column size="0"/>
  54. <Column size="0"/>
  55. <Column size="0"/>
  56. <Column size="0"/>
  57. <Column size="0"/>
  58. <Column size="0"/>
  59. <Column size="0"/>
  60. <Column size="0"/>
  61. <Column size="0"/>
  62. <Column size="0"/>
  63. </Columns>
  64. <Rows>
  65. <Row size="24" band="head"/>
  66. <Row size="24"/>
  67. </Rows>
  68. <Band id="head">
  69. <Cell/>
  70. <Cell col="1" text="입고일시"/>
  71. <Cell col="2" text="등록번호"/>
  72. <Cell col="3" text="환자명"/>
  73. <Cell col="4" text="병실"/>
  74. <Cell col="5" text="입고장소"/>
  75. <Cell col="6" text="골수은행"/>
  76. <Cell col="7" text="제대혈은행"/>
  77. <Cell col="8" text="혈액번호"/>
  78. <Cell col="9" text="이송자"/>
  79. <Cell col="10" text="Stem Cell Source"/>
  80. <Cell col="11" text="입고자"/>
  81. <Cell col="12" text="입고자ID"/>
  82. <Cell col="13" text="winseqno"/>
  83. <Cell col="14" text="windd"/>
  84. <Cell col="15" text="wintm"/>
  85. <Cell col="16" text="적용일자"/>
  86. <Cell col="17" text="처방환자"/>
  87. <Cell col="18" text="지시처방명"/>
  88. <Cell col="19" text="PRCPNO"/>
  89. <Cell col="20" text="PRCPHISTNO"/>
  90. <Cell col="21" text="execprcpno"/>
  91. </Band>
  92. <Band id="body">
  93. <Cell celltype="head"/>
  94. <Cell col="1" displaytype="date" edittype="none" text="bind:windt" mask="yyyy-MM-dd hh:mm:ss" editautoselect="true" calendardisplaynulltype="nulltext"/>
  95. <Cell col="2" displaytype="text" edittype="text" style="align:center middle;" text="bind:pid"/>
  96. <Cell col="3" text="bind:hngnm"/>
  97. <Cell col="4" text="bind:roomcd"/>
  98. <Cell col="5" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:deliveflag" combodataset="ds_init_cmbinfo_deliveflag_A0156" combocodecol="cdid" combodatacol="cdnm"/>
  99. <Cell col="6" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:bonebank" combodataset="ds_init_cmbinfo_bonebank_B004" combocodecol="hsctmdlcd" combodatacol="hsctmdlnm"/>
  100. <Cell col="7" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:cordbank" combodataset="ds_init_cmbinfo_cordbank_B005" combocodecol="hsctmdlcd" combodatacol="hsctmdlnm"/>
  101. <Cell col="8" displaytype="text" edittype="text" text="bind:blodno"/>
  102. <Cell col="9" displaytype="normal" edittype="normal" style="align:center middle;" text="bind:tranpsn" editautoselect="true"/>
  103. <Cell col="10" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:comprod" combodataset="ds_init_cmbinfo_stemcellsource_A0159" combocodecol="cdid" combodatacol="cdnm"/>
  104. <Cell col="11" displaytype="normal" edittype="normal" style="align:center middle;" text="bind:winpsnnm" editautoselect="true"/>
  105. <Cell col="12" text="bind:winpsnid"/>
  106. <Cell col="13" text="bind:winseqno"/>
  107. <Cell col="14" text="bind:windd"/>
  108. <Cell col="15" text="bind:wintm"/>
  109. <Cell col="16" text="bind:prcpdd" mask="yyyy-mm-dd"/>
  110. <Cell col="17" displaytype="none" edittype="none" text="bind:prcpid"/>
  111. <Cell col="18" displaytype="none" edittype="none" text="bind:prcpnm"/>
  112. <Cell col="19" displaytype="none" edittype="none" text="bind:prcpno"/>
  113. <Cell col="20" displaytype="none" edittype="none" text="bind:prcphistno"/>
  114. <Cell col="21" displaytype="none" edittype="none" text="bind:execprcpno"/>
  115. </Band>
  116. </Format>
  117. </Formats>
  118. </Grid>
  119. <Button id="btn_grdadd" taborder="5" text="행추가" class="btn2" position="absolute 1002 114 1055 133" anchor="top right" onclick="btn_grdadd_onclick"/>
  120. <Button id="btn_grddel" taborder="6" text="행삭제" class="btn2" position="absolute 1058 114 1111 133" anchor="top right" onclick="btn_grddel_onclick"/>
  121. <Button id="btn_grdcopy" taborder="7" text="행복사" class="btn2" visible="false" position="absolute 946 114 999 133" anchor="top right" onclick="btn_grdcopy_onclick"/>
  122. </Layout>
  123. </Layouts>
  124. <Objects>
  125. <Dataset id="ds_send_baseinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  126. <ColumnInfo>
  127. <Column id="wintodd" type="STRING" size="256"/>
  128. <Column id="winfromdd" type="STRING" size="256"/>
  129. <Column id="pid" type="STRING" size="256"/>
  130. <Column id="deliveflag" type="STRING" size="256"/>
  131. <Column id="bonebank" type="STRING" size="256"/>
  132. <Column id="cordbank" type="STRING" size="256"/>
  133. <Column id="blodno" type="STRING" size="256"/>
  134. <Column id="winpsnid" type="STRING" size="256"/>
  135. </ColumnInfo>
  136. <Rows>
  137. <Row>
  138. <Col id="wintodd"/>
  139. <Col id="winfromdd"/>
  140. <Col id="pid"/>
  141. <Col id="deliveflag"/>
  142. <Col id="bonebank"/>
  143. <Col id="cordbank"/>
  144. <Col id="blodno"/>
  145. <Col id="winpsnid"/>
  146. </Row>
  147. </Rows>
  148. </Dataset>
  149. <Dataset id="ds_main_userinfo_winpsn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  150. <ColumnInfo>
  151. <Column id="winpsnid" type="STRING" size="256"/>
  152. <Column id="winpsnnm" type="STRING" size="256"/>
  153. </ColumnInfo>
  154. <Rows>
  155. <Row>
  156. <Col id="winpsnid"/>
  157. <Col id="winpsnnm"/>
  158. </Row>
  159. </Rows>
  160. </Dataset>
  161. <Dataset id="ds_init_cmbinfo_deliveflag_A0156" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  162. <ColumnInfo>
  163. <Column id="cdnm" type="STRING" size="256"/>
  164. <Column id="cdid" type="STRING" size="256"/>
  165. </ColumnInfo>
  166. </Dataset>
  167. <Dataset id="ds_init_cmbinfo_bonebank_B004" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  168. <ColumnInfo>
  169. <Column id="hsctmdlcd" type="STRING" size="256" sumtext=""/>
  170. <Column id="hsctmdlnm" type="STRING" size="256" sumtext=""/>
  171. <Column id="hsctlrgcd" type="STRING" size="256" sumtext=""/>
  172. </ColumnInfo>
  173. </Dataset>
  174. <Dataset id="ds_init_cmbinfo_cordbank_B005" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  175. <ColumnInfo>
  176. <Column id="hsctmdlcd" type="STRING" size="256" sumtext=""/>
  177. <Column id="hsctmdlnm" type="STRING" size="256" sumtext=""/>
  178. <Column id="hsctlrgcd" type="STRING" size="256" sumtext=""/>
  179. </ColumnInfo>
  180. </Dataset>
  181. <Dataset id="ds_init_cmbinfo_stemcellsource_A0159" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  182. <ColumnInfo>
  183. <Column id="cdnm" type="STRING" size="256"/>
  184. <Column id="cdid" type="STRING" size="256"/>
  185. </ColumnInfo>
  186. </Dataset>
  187. <Dataset id="ds_main_stemcellcwin_stemcellcwinlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_stemcellcwin_stemcellcwinlist_oncolumnchanged">
  188. <ColumnInfo>
  189. <Column id="windd" type="STRING" size="256" sumtext="입고일자"/>
  190. <Column id="windt" type="STRING" size="256" sumtext="입고일시"/>
  191. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  192. <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
  193. <Column id="roomcd" type="STRING" size="256" sumtext="환자명"/>
  194. <Column id="deliveflag" type="STRING" size="256" sumtext="입고장소"/>
  195. <Column id="bonebank" type="STRING" size="256" sumtext="골수은행"/>
  196. <Column id="cordbank" type="STRING" size="256" sumtext="제대혈은행"/>
  197. <Column id="blodno" type="STRING" size="256" sumtext="골수번호"/>
  198. <Column id="tranpsn" type="STRING" size="256" sumtext="이송자"/>
  199. <Column id="comprod" type="STRING" size="256" sumtext="성분제제"/>
  200. <Column id="winpsnnm" type="STRING" size="256" sumtext="입고자이름"/>
  201. <Column id="wintm" type="STRING" size="256" sumtext="입고일시"/>
  202. <Column id="winpsnid" type="STRING" size="256" sumtext="입고일시"/>
  203. <Column id="winseqno" type="INT" size="256" sumtext="입고일련번호"/>
  204. <Column id="chk" type="STRING" size="256" sumtext="확인"/>
  205. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  206. <Column id="prcpid" type="STRING" size="256" sumtext="처방환자"/>
  207. <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
  208. <Column id="prcpno" type="INT" size="256" sumtext="처방번호"/>
  209. <Column id="prcphistno" type="INT" size="256" sumtext="처방이력번호"/>
  210. <Column id="execprcpno" type="INT" size="256" sumtext="처방유일번호"/>
  211. <Column id="scs" type="STRING" size="256"/>
  212. </ColumnInfo>
  213. </Dataset>
  214. <Dataset id="ds_send_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  215. <Dataset id="ds_send_patbaseinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  216. <ColumnInfo>
  217. <Column id="pid" type="STRING" size="256"/>
  218. </ColumnInfo>
  219. <Rows>
  220. <Row/>
  221. </Rows>
  222. </Dataset>
  223. <Dataset id="ds_temp_patbaseinfo_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  224. <ColumnInfo>
  225. <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
  226. <Column id="roomcd" type="STRING" size="256" sumtext="병실"/>
  227. </ColumnInfo>
  228. </Dataset>
  229. <Dataset id="ds_send_userinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  230. <ColumnInfo>
  231. <Column id="userid" type="STRING" size="256"/>
  232. </ColumnInfo>
  233. <Rows>
  234. <Row/>
  235. </Rows>
  236. </Dataset>
  237. <Dataset id="ds_temp_userinfo_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  238. <ColumnInfo>
  239. <Column id="userid" type="STRING" size="256"/>
  240. <Column id="usernm" type="STRING" size="256"/>
  241. </ColumnInfo>
  242. </Dataset>
  243. </Objects>
  244. <Bind>
  245. <BindItem id="item0" compid="grp_sea.input2" propid="value" datasetid="ds_send_baseinfo" columnid="winfromdd"/>
  246. <BindItem id="item1" compid="grp_sea.input5" propid="value" datasetid="ds_send_baseinfo" columnid="wintodd"/>
  247. <BindItem id="item2" compid="grp_sea.ipt_pid" propid="value" datasetid="ds_send_baseinfo" columnid="pid"/>
  248. <BindItem id="item3" compid="grp_sea.combo14" propid="value" datasetid="ds_send_baseinfo" columnid="deliveflag"/>
  249. <BindItem id="item4" compid="grp_sea.ipt_winpsnid" propid="value" datasetid="ds_send_baseinfo" columnid="winpsnid"/>
  250. <BindItem id="item5" compid="grp_sea.ipt_delivepsnnm" propid="value" datasetid="ds_main_userinfo_winpsn" columnid="winpsnnm"/>
  251. <BindItem id="item6" compid="grp_sea.combo1" propid="value" datasetid="ds_send_baseinfo" columnid="bonebank"/>
  252. <BindItem id="item7" compid="grp_sea.combo2" propid="value" datasetid="ds_send_baseinfo" columnid="cordbank"/>
  253. <BindItem id="item8" compid="grp_sea.input3" propid="value" datasetid="ds_send_baseinfo" columnid="blodno"/>
  254. </Bind>
  255. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  256. * System Name :
  257. * Job Name :
  258. * Creator :
  259. * Make Date : 2015-11-13
  260. * Description :
  261. *---------------------------------------------------------------------------------------
  262. * Modify Date Modifier Modify Description
  263. *---------------------------------------------------------------------------------------
  264. * 2015-11-13 Live Converter TF->XP
  265. *
  266. *---------------------------------------------------------------------------------------
  267. ****************************************************************************************/
  268. include "com_commonxp::comm_main.xjs";
  269. include "ast_hsctxp::bmtcommon.xjs";
  270. function SMABC00500_oninit(obj:Form, e:InitEventInfo)
  271. {
  272. frmf_initForm(obj);
  273. }
  274. function SMABC00500_onload(obj:Form, e:LoadEventInfo)
  275. {
  276. grdf_initGrid(grd_stemcellwinlist);
  277. grdf_setRowTypeIcon(grd_stemcellwinlist, 0);
  278. var arrParam = [{dsNm: "ds_init_cmbinfo_deliveflag_A0156", cdGrpId: "A0156"}
  279. , {dsNm: "ds_init_cmbinfo_stemcellsource_A0159", cdGrpId: "A0159"}]
  280. appf_getCodeList(arrParam);
  281. var arrParam2 = [{dsNm: "ds_init_cmbinfo_bonebank_B004", cdGrpId: "B004", cd: "SC"}
  282. ,{dsNm: "ds_init_cmbinfo_cordbank_B005", cdGrpId: "B005", cd: "SC"}];
  283. aboGetCodeList(arrParam2);
  284. ds_init_cmbinfo_deliveflag_A0156.insertRow(0);
  285. ds_init_cmbinfo_bonebank_B004.insertRow(0);
  286. ds_init_cmbinfo_cordbank_B005.insertRow(0);
  287. ds_send_baseinfo.setColumn(0, "wintodd", utlf_getCurrentDate());
  288. ds_send_baseinfo.setColumn(0, "winfromdd", utlf_getCurrentDate());
  289. btn_save.enable = frmf_checkAuth("X") ;
  290. btn_excsave.enable = frmf_checkAuth("P") ;
  291. }
  292. function grp_sea_ipt_pid_onkeyup(obj:Edit, e:KeyEventInfo)
  293. {
  294. if(e.keycode == 13)
  295. {
  296. obj.updateToDataset();
  297. grp_sea_btn_sea_onclick();
  298. }
  299. }
  300. function grp_sea_btn_sea_onclick(obj:Button, e:ClickEventInfo)
  301. {
  302. fGetStemCellList();
  303. }
  304. function fGetStemCellList()
  305. {
  306. var oParam = {};
  307. oParam.id = "TRABC00501";
  308. oParam.service = "hsctstemcellapp.StemCellDelive";
  309. oParam.method = "reqGetStemCellWinList";
  310. oParam.inds = "req=ds_send_baseinfo";
  311. oParam.outds = "ds_main_stemcellcwin_stemcellcwinlist=stemcellcwinlist";
  312. oParam.async = false;
  313. //oParam.callback = "cf_TRABC00501";
  314. tranf_submit(oParam);
  315. }
  316. function ds_main_stemcellcwin_stemcellcwinlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  317. {
  318. if (e.columnid == "pid")
  319. {
  320. ds_send_patbaseinfo.setColumn(0, "pid", obj.getColumn(e.row, "pid"));
  321. var oParam = {};
  322. oParam.id = "TRABC00501";
  323. oParam.service = "hsctstemcellapp.StemCellDelive";
  324. oParam.method = "reqGetPatBaseInfo";
  325. oParam.inds = "req=ds_send_patbaseinfo";
  326. oParam.outds = "ds_temp_patbaseinfo_item=item";
  327. oParam.async = false;
  328. oParam.callback = "cf_TRABC00501";
  329. tranf_submit(oParam);
  330. }
  331. if (e.columnid == "winpsnnm")
  332. {
  333. ds_send_userinfo.setColumn(0, "userid", obj.getColumn(e.row, "winpsnnm").toUpperCase())
  334. var oParam = {};
  335. oParam.id = "TRABC00602";
  336. oParam.service = "hsctstemcellapp.StemCellDelive";
  337. oParam.method = "reqGetUserInfo";
  338. oParam.inds = "req=ds_send_userinfo";
  339. oParam.outds = "ds_temp_userinfo_item=item";
  340. oParam.async = false;
  341. oParam.callback = "cf_TRABC00602";
  342. tranf_submit(oParam);
  343. }
  344. if(e.columnid == "tranpsn")
  345. {
  346. ds_send_userinfo.setColumn(0, "userid", obj.getColumn(e.row, "tranpsn").toUpperCase());
  347. var oParam = {};
  348. oParam.id = "TRABC00602";
  349. oParam.service = "hsctstemcellapp.StemCellDelive";
  350. oParam.method = "reqGetUserInfo";
  351. oParam.inds = "req=ds_send_userinfo";
  352. oParam.outds = "ds_temp_userinfo_item=item";
  353. oParam.async = false;
  354. oParam.callback = "cf_TRABC00602_1";
  355. tranf_submit(oParam);
  356. }
  357. }
  358. function cf_TRABC00501(sSvcId, nErrorCode, sErrorMsg)
  359. {
  360. if(nErrorCode < 0)
  361. {
  362. return;
  363. }
  364. else
  365. {
  366. ds_main_stemcellcwin_stemcellcwinlist.setColumn(ds_main_stemcellcwin_stemcellcwinlist.rowposition, "hngnm", ds_temp_patbaseinfo_item.getColumn(0, "hngnm"));
  367. ds_main_stemcellcwin_stemcellcwinlist.setColumn(ds_main_stemcellcwin_stemcellcwinlist.rowposition, "roomcd", ds_temp_patbaseinfo_item.getColumn(0, "roomcd"));
  368. }
  369. }
  370. function cf_TRABC00602_1(sSvcId, nErrorCode, sErrorMsg)
  371. {
  372. if(nErrorCode < 0)
  373. {
  374. return;
  375. }
  376. else
  377. {
  378. if(!utlf_isNull(ds_temp_userinfo_item.getColumn(0, "usernm")))
  379. {
  380. ds_main_stemcellcwin_stemcellcwinlist.setColumn(ds_main_stemcellcwin_stemcellcwinlist.rowposition, "tranpsn", ds_temp_userinfo_item.getColumn(0, "usernm"));
  381. }
  382. }
  383. }
  384. function cf_TRABC00602(sSvcId, nErrorCode, sErrorMsg)
  385. {
  386. if(nErrorCode < 0)
  387. {
  388. return;
  389. }
  390. else
  391. {
  392. ds_main_stemcellcwin_stemcellcwinlist.setColumn(ds_main_stemcellcwin_stemcellcwinlist.rowposition, "winpsnid", ds_temp_userinfo_item.getColumn(0, "userid"));
  393. ds_main_stemcellcwin_stemcellcwinlist.setColumn(ds_main_stemcellcwin_stemcellcwinlist.rowposition, "winpsnnm", ds_temp_userinfo_item.getColumn(0, "usernm"));
  394. }
  395. }
  396. function btn_grdcopy_onclick(obj:Button, e:ClickEventInfo)
  397. {
  398. var iSelRow = ds_main_stemcellcwin_stemcellcwinlist.rowposition;
  399. var iAddRow = ds_main_stemcellcwin_stemcellcwinlist.addRow();
  400. ds_main_stemcellcwin_stemcellcwinlist.copyRow(iAddRow, ds_main_stemcellcwin_stemcellcwinlist, iSelRow);
  401. ds_main_stemcellcwin_stemcellcwinlist.setColumn(iAddRow, "winseqno", "");
  402. ds_main_stemcellcwin_stemcellcwinlist.setColumn(iAddRow, "chk", "Y");
  403. }
  404. function btn_grdadd_onclick(obj:Button, e:ClickEventInfo)
  405. {
  406. var row = ds_main_stemcellcwin_stemcellcwinlist.addRow();
  407. ds_main_stemcellcwin_stemcellcwinlist.setColumn(row, "windt",utlf_getCurrentDate()+utlf_getCurrentTime());
  408. ds_main_stemcellcwin_stemcellcwinlist.setColumn(row, "windd",utlf_getCurrentDate());
  409. ds_main_stemcellcwin_stemcellcwinlist.setColumn(row, "wintm",utlf_getCurrentTime());
  410. }
  411. function btn_grddel_onclick(obj:Button, e:ClickEventInfo)
  412. {
  413. ds_main_stemcellcwin_stemcellcwinlist.updatecontrol = false;
  414. ds_main_stemcellcwin_stemcellcwinlist.setRowType(ds_main_stemcellcwin_stemcellcwinlist.rowposition, "d");
  415. ds_main_stemcellcwin_stemcellcwinlist.updatecontrol = true;
  416. }
  417. function btn_excsave_onclick(obj:Button, e:ClickEventInfo)
  418. {
  419. grdf_exportExcel(grd_stemcellwinlist, "입고관리", "입고관리", false, "", "", false);
  420. }
  421. function btn_save_onclick(obj:Button, e:ClickEventInfo)
  422. {
  423. fExecSave();
  424. }
  425. function fExecSave()
  426. {
  427. for(var i = 0; i < ds_main_stemcellcwin_stemcellcwinlist.rowcount; i++)
  428. {
  429. if(utlf_isNull(ds_main_stemcellcwin_stemcellcwinlist.getColumn(i, "pid")))
  430. {
  431. sysf_messageBox("등록번호가 선택되어 있지 않아 저장", "E001");
  432. return;
  433. }
  434. else if (utlf_isNull(ds_main_stemcellcwin_stemcellcwinlist.getColumn(i, "winpsnid")))
  435. {
  436. sysf_messageBox("입고자가 선택되어 있지 않아 저장", "E001");
  437. return;
  438. }
  439. else if (utlf_isNull(ds_main_stemcellcwin_stemcellcwinlist.getColumn(i, "deliveflag")))
  440. {
  441. sysf_messageBox("입고장소가 선택되어 있지 않아 저장", "E001");
  442. return;
  443. }
  444. else if (utlf_isNull(ds_main_stemcellcwin_stemcellcwinlist.getColumn(i, "windt")))
  445. {
  446. sysf_messageBox("입고일시가 선택되어 있지 않아 저장", "E001");
  447. return;
  448. }
  449. ds_main_stemcellcwin_stemcellcwinlist.setColumn(i, "scs", ds_main_stemcellcwin_stemcellcwinlist.getColumn(i, "comprod"));
  450. }
  451. var oParam = {};
  452. oParam.id = "TXABC00501";
  453. oParam.service = "hsctstemcellapp.StemCellDelive";
  454. oParam.method = "reqExeStemCellWinList";
  455. oParam.inds = "stemcellcwinlist=ds_main_stemcellcwin_stemcellcwinlist:U";
  456. oParam.outds = "ds_=item";
  457. oParam.typeStr = "m";
  458. oParam.async = false;
  459. //oParam.callback = "cf_TXABC00501";
  460. tranf_submit(oParam);
  461. fGetStemCellList();
  462. }
  463. function grp_sea_ipt_winpsnid_onkeyup(obj:Edit, e:KeyEventInfo)
  464. {
  465. if(e.keycode == 13)
  466. {
  467. }
  468. }
  469. ]]></Script>
  470. </Form>
  471. </FDL>