SMABS10100_이식형태별조혈모세포처리건수.xfdl 28 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMABS10100" position="absolute 0 0 1201 729" titletext="이식형태별 조혈모세포처리 현황" oninit="SMABS10100_oninit" onload="SMABS10100_onload">
  5. <Layouts>
  6. <Layout>
  7. <Grid id="grd_daycelltret" taborder="3" binddataset="ds_main_celltret_daycelltretlist" useinputpanel="false" position="absolute 1 121 1195 721" autoenter="select" cellsizingtype="col" anchor="all">
  8. <Formats>
  9. <Format id="default">
  10. <Columns>
  11. <Column size="23"/>
  12. <Column size="65"/>
  13. <Column size="64"/>
  14. <Column size="60"/>
  15. <Column size="60"/>
  16. <Column size="60"/>
  17. <Column size="60"/>
  18. <Column size="60"/>
  19. <Column size="60"/>
  20. <Column size="60"/>
  21. <Column size="60"/>
  22. <Column size="60"/>
  23. <Column size="60"/>
  24. <Column size="60"/>
  25. <Column size="60"/>
  26. <Column size="60"/>
  27. <Column size="60"/>
  28. <Column size="60"/>
  29. <Column size="60"/>
  30. <Column size="60"/>
  31. <Column size="60"/>
  32. <Column size="60"/>
  33. <Column size="60"/>
  34. <Column size="60"/>
  35. <Column size="60"/>
  36. <Column size="60"/>
  37. <Column size="60"/>
  38. <Column size="60"/>
  39. <Column size="60"/>
  40. <Column size="60"/>
  41. <Column size="60"/>
  42. <Column size="60"/>
  43. <Column size="60"/>
  44. <Column size="60"/>
  45. <Column size="63"/>
  46. <Column size="100"/>
  47. <Column size="100"/>
  48. </Columns>
  49. <Rows>
  50. <Row size="24" band="head"/>
  51. <Row size="24"/>
  52. </Rows>
  53. <Band id="head">
  54. <Cell/>
  55. <Cell col="1" colspan="2" text="이식형태" taborder="undefined"/>
  56. <Cell col="3" text="1일"/>
  57. <Cell col="4" text="2일"/>
  58. <Cell col="5" text="3일"/>
  59. <Cell col="6" text="4일"/>
  60. <Cell col="7" text="5일"/>
  61. <Cell col="8" text="6일"/>
  62. <Cell col="9" text="7일"/>
  63. <Cell col="10" text="8일"/>
  64. <Cell col="11" text="9일"/>
  65. <Cell col="12" text="10일"/>
  66. <Cell col="13" text="11일"/>
  67. <Cell col="14" text="12일"/>
  68. <Cell col="15" text="13일"/>
  69. <Cell col="16" text="14일"/>
  70. <Cell col="17" text="15일"/>
  71. <Cell col="18" text="16일"/>
  72. <Cell col="19" text="17일"/>
  73. <Cell col="20" text="18일"/>
  74. <Cell col="21" text="19일"/>
  75. <Cell col="22" text="20일"/>
  76. <Cell col="23" text="21일"/>
  77. <Cell col="24" text="22일"/>
  78. <Cell col="25" text="23일"/>
  79. <Cell col="26" text="24일"/>
  80. <Cell col="27" text="25일"/>
  81. <Cell col="28" text="26일"/>
  82. <Cell col="29" text="27일"/>
  83. <Cell col="30" text="28일"/>
  84. <Cell col="31" text="29일"/>
  85. <Cell col="32" text="30일"/>
  86. <Cell col="33" text="31일"/>
  87. <Cell col="34" text="Total"/>
  88. <Cell col="35" text="전월도"/>
  89. <Cell col="36" text="증감율"/>
  90. </Band>
  91. <Band id="body">
  92. <Cell celltype="head" expr="currow+1"/>
  93. <Cell col="1" celltype="head" edittype="none" text="bind:codenm" suppress="1" suppressalign="middle,over"/>
  94. <Cell col="2" celltype="head" edittype="none" text="bind:codenm2" suppress="2" suppressalign="middle,over"/>
  95. <Cell col="3" edittype="none" text="bind:daycnt01"/>
  96. <Cell col="4" text="bind:daycnt02"/>
  97. <Cell col="5" text="bind:daycnt03"/>
  98. <Cell col="6" text="bind:daycnt04"/>
  99. <Cell col="7" text="bind:daycnt05"/>
  100. <Cell col="8" text="bind:daycnt06"/>
  101. <Cell col="9" text="bind:daycnt07"/>
  102. <Cell col="10" text="bind:daycnt08"/>
  103. <Cell col="11" text="bind:daycnt09"/>
  104. <Cell col="12" text="bind:daycnt10"/>
  105. <Cell col="13" text="bind:daycnt11"/>
  106. <Cell col="14" text="bind:daycnt12"/>
  107. <Cell col="15" text="bind:daycnt13"/>
  108. <Cell col="16" text="bind:daycnt14"/>
  109. <Cell col="17" text="bind:daycnt15"/>
  110. <Cell col="18" text="bind:daycnt16"/>
  111. <Cell col="19" text="bind:daycnt17"/>
  112. <Cell col="20" text="bind:daycnt18"/>
  113. <Cell col="21" text="bind:daycnt19"/>
  114. <Cell col="22" text="bind:daycnt20"/>
  115. <Cell col="23" text="bind:daycnt21"/>
  116. <Cell col="24" text="bind:daycnt22"/>
  117. <Cell col="25" text="bind:daycnt23"/>
  118. <Cell col="26" text="bind:daycnt24"/>
  119. <Cell col="27" text="bind:daycnt25"/>
  120. <Cell col="28" text="bind:daycnt26"/>
  121. <Cell col="29" text="bind:daycnt27"/>
  122. <Cell col="30" text="bind:daycnt28"/>
  123. <Cell col="31" text="bind:daycnt29"/>
  124. <Cell col="32" text="bind:daycnt30"/>
  125. <Cell col="33" text="bind:daycnt31"/>
  126. <Cell col="34" text="bind:daycnttotal"/>
  127. <Cell col="35" text="bind:beforeyearcnt"/>
  128. <Cell col="36" text="bind:cntaddper"/>
  129. </Band>
  130. </Format>
  131. </Formats>
  132. </Grid>
  133. <Static id="caption6" text="이식형태별 조혈모세포처리 현황" class="tit_1" position="absolute 0 0 250 25"/>
  134. <Button id="btn_prt" taborder="1" text="출력" class="btn6" visible="false" position="absolute 0 26 56 48"/>
  135. <Grid id="grd_monthcelltret" taborder="2" binddataset="ds_main_celltret_celltretlist" useinputpanel="false" position="absolute 0 121 1195 721" anchor="all" autoenter="select" autofittype="col" cellsizingtype="col">
  136. <Formats>
  137. <Format id="default">
  138. <Columns>
  139. <Column size="20"/>
  140. <Column size="65"/>
  141. <Column size="64"/>
  142. <Column size="60"/>
  143. <Column size="60"/>
  144. <Column size="60"/>
  145. <Column size="60"/>
  146. <Column size="60"/>
  147. <Column size="60"/>
  148. <Column size="60"/>
  149. <Column size="60"/>
  150. <Column size="60"/>
  151. <Column size="60"/>
  152. <Column size="60"/>
  153. <Column size="60"/>
  154. <Column size="63"/>
  155. <Column size="100"/>
  156. <Column size="100"/>
  157. </Columns>
  158. <Rows>
  159. <Row size="24" band="head"/>
  160. <Row size="24"/>
  161. </Rows>
  162. <Band id="head">
  163. <Cell/>
  164. <Cell col="1" colspan="2" text="이식형태" taborder="undefined"/>
  165. <Cell col="3" text="1월"/>
  166. <Cell col="4" text="2월"/>
  167. <Cell col="5" text="3월"/>
  168. <Cell col="6" text="4월"/>
  169. <Cell col="7" text="5월"/>
  170. <Cell col="8" text="6월"/>
  171. <Cell col="9" text="7월"/>
  172. <Cell col="10" text="8월"/>
  173. <Cell col="11" text="9월"/>
  174. <Cell col="12" text="10월"/>
  175. <Cell col="13" text="11월"/>
  176. <Cell col="14" text="12월"/>
  177. <Cell col="15" text="Total"/>
  178. <Cell col="16" text="전년도"/>
  179. <Cell col="17" text="증감율"/>
  180. </Band>
  181. <Band id="body">
  182. <Cell celltype="head" expr="currow+1"/>
  183. <Cell col="1" celltype="head" edittype="none" text="bind:codenm" suppress="1" suppressalign="middle,over"/>
  184. <Cell col="2" celltype="head" edittype="none" text="bind:codenm2" suppress="2" suppressalign="middle,over"/>
  185. <Cell col="3" edittype="none" text="bind:monthcnt01"/>
  186. <Cell col="4" text="bind:monthcnt02"/>
  187. <Cell col="5" text="bind:monthcnt03"/>
  188. <Cell col="6" text="bind:monthcnt04"/>
  189. <Cell col="7" text="bind:monthcnt05"/>
  190. <Cell col="8" text="bind:monthcnt06"/>
  191. <Cell col="9" text="bind:monthcnt07"/>
  192. <Cell col="10" text="bind:monthcnt08"/>
  193. <Cell col="11" text="bind:monthcnt09"/>
  194. <Cell col="12" text="bind:monthcnt10"/>
  195. <Cell col="13" text="bind:monthcnt11"/>
  196. <Cell col="14" text="bind:monthcnt12"/>
  197. <Cell col="15" text="bind:monthcnttotal"/>
  198. <Cell col="16" text="bind:beforeyearcnt"/>
  199. <Cell col="17" text="bind:cntaddper"/>
  200. </Band>
  201. </Format>
  202. </Formats>
  203. </Grid>
  204. <Static id="caption1" text="이식형태별 조혈모세포처리 현황" class="tit_2" position="absolute -1 100 217 121"/>
  205. <Shape id="line1" class="line_10" position="absolute 0 116 1195 122" anchor="left top right"/>
  206. <Button id="button2" taborder="4" text="엑셀저장" class="btn7" position="absolute 1115 97 1195 116" anchor="top right" onclick="button2_onclick"/>
  207. <Div id="grp_sea" anchor="left top right" taborder="5" class="div_SA2" position="absolute 0 50 1194 90">
  208. <Layouts>
  209. <Layout>
  210. <Button id="button3" taborder="8" text="조회" class="btn1" position="absolute 1123 9 1179 31" anchor="top right" onclick="grp_sea_button3_onclick"/>
  211. <Shape id="line2" linetype="vertical" class="line_4" position="absolute 1104 9 1110 31" anchor="top right"/>
  212. <Static id="caption8" text="처방의 :" class="search_name" position="absolute 468 11 541 28" anchor="default"/>
  213. <Combo id="combo2" taborder="9" innerdataset="@ds_init_cmbinfo_atdoctid_A0536" codecolumn="cdid" datacolumn="cdnm" class="combo_search" position="absolute 544 10 674 29" anchor="default"/>
  214. <Calendar id="ipt_execfromdd2" taborder="10" autoselect="true" autoskip="true" class="input_s_essential" visible="false" position="absolute 807 11 907 30" anchor="default"/>
  215. <Calendar id="ipt_execfromdd" taborder="11" autoselect="true" autoskip="true" class="input_s_essential" position="absolute 130 10 230 29" anchor="default" onchanged="grp_sea_ipt_execfromdd_onchanged"/>
  216. <Static id="caption2" text="~" class="search_no_b" visible="false" position="absolute 910 13 922 30" anchor="default"/>
  217. <Static id="caption4" text="기간(적용일) :" class="search_name" position="absolute 15 12 127 29" anchor="default"/>
  218. <Calendar id="ipt_exectodd" taborder="12" autoselect="true" autoskip="true" class="input_s_essential" position="absolute 248 10 348 29" anchor="default" onchanged="grp_sea_ipt_exectodd_onchanged"/>
  219. <Static id="caption7" text="~" class="search_no_b" position="absolute 233 12 245 29" anchor="default"/>
  220. <Static id="caption9" text="비교(적용일) :" class="search_name" visible="false" position="absolute 692 12 804 29" anchor="default"/>
  221. <Calendar id="ipt_exectodd2" taborder="13" autoselect="true" autoskip="true" class="input_s_essential" visible="false" position="absolute 925 11 1025 30" anchor="default"/>
  222. <Radio id="rdo_monthday" taborder="14" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 358 10 448 30" anchor="default" onitemchanged="grp_sea_rdo_monthday_onitemchanged">
  223. <Dataset id="innerdataset">
  224. <ColumnInfo>
  225. <Column id="codecolumn"/>
  226. <Column id="datacolumn"/>
  227. </ColumnInfo>
  228. <Rows>
  229. <Row>
  230. <Col id="codecolumn">M</Col>
  231. <Col id="datacolumn">월별</Col>
  232. </Row>
  233. <Row>
  234. <Col id="codecolumn">D</Col>
  235. <Col id="datacolumn">일별</Col>
  236. </Row>
  237. </Rows>
  238. </Dataset>
  239. </Radio>
  240. </Layout>
  241. </Layouts>
  242. </Div>
  243. </Layout>
  244. </Layouts>
  245. <Objects>
  246. <Dataset id="ds_send_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  247. <ColumnInfo>
  248. <Column id="execfromdd" type="STRING" size="256"/>
  249. <Column id="exectodd" type="STRING" size="256"/>
  250. <Column id="execfromdd2" type="STRING" size="256"/>
  251. <Column id="exectodd2" type="STRING" size="256"/>
  252. <Column id="atdoctid" type="STRING" size="256"/>
  253. <Column id="searchflag" type="STRING" size="256"/>
  254. <Column id="monthdayflag" type="STRING" size="256"/>
  255. </ColumnInfo>
  256. <Rows>
  257. <Row>
  258. <Col id="execfromdd"/>
  259. <Col id="exectodd"/>
  260. <Col id="execfromdd2"/>
  261. <Col id="exectodd2"/>
  262. <Col id="atdoctid"/>
  263. <Col id="searchflag">T</Col>
  264. <Col id="monthdayflag"/>
  265. </Row>
  266. </Rows>
  267. </Dataset>
  268. <Dataset id="ds_main_celltret_daycelltretlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  269. <ColumnInfo>
  270. <Column id="codenm" type="STRING" size="256" sumtext="이식종류"/>
  271. <Column id="codenm2" type="STRING" size="256" sumtext="scsnm"/>
  272. <Column id="daycnt01" type="INT" size="256" sumtext="일건수"/>
  273. <Column id="daycnt02" type="INT" size="256" sumtext="일건수"/>
  274. <Column id="daycnt03" type="INT" size="256" sumtext="일건수"/>
  275. <Column id="daycnt04" type="INT" size="256" sumtext="일건수"/>
  276. <Column id="daycnt05" type="INT" size="256" sumtext="일건수"/>
  277. <Column id="daycnt06" type="INT" size="256" sumtext="일건수"/>
  278. <Column id="daycnt07" type="INT" size="256" sumtext="일건수"/>
  279. <Column id="daycnt08" type="INT" size="256" sumtext="일건수"/>
  280. <Column id="daycnt09" type="INT" size="256" sumtext="일건수"/>
  281. <Column id="daycnt10" type="INT" size="256" sumtext="일건수"/>
  282. <Column id="daycnt11" type="INT" size="256" sumtext="일건수"/>
  283. <Column id="daycnt12" type="INT" size="256" sumtext="일건수"/>
  284. <Column id="daycnt13" type="INT" size="256" sumtext="일건수"/>
  285. <Column id="daycnt14" type="INT" size="256" sumtext="일건수"/>
  286. <Column id="daycnt15" type="INT" size="256" sumtext="일건수"/>
  287. <Column id="daycnt16" type="INT" size="256" sumtext="일건수"/>
  288. <Column id="daycnt17" type="INT" size="256" sumtext="일건수"/>
  289. <Column id="daycnt18" type="INT" size="256" sumtext="일건수"/>
  290. <Column id="daycnt19" type="INT" size="256" sumtext="일건수"/>
  291. <Column id="daycnt20" type="INT" size="256" sumtext="일건수"/>
  292. <Column id="daycnt21" type="INT" size="256" sumtext="일건수"/>
  293. <Column id="daycnt22" type="INT" size="256" sumtext="일건수"/>
  294. <Column id="daycnt23" type="INT" size="256" sumtext="일건수"/>
  295. <Column id="daycnt24" type="INT" size="256" sumtext="일건수"/>
  296. <Column id="daycnt25" type="INT" size="256" sumtext="일건수"/>
  297. <Column id="daycnt26" type="INT" size="256" sumtext="일건수"/>
  298. <Column id="daycnt27" type="INT" size="256" sumtext="일건수"/>
  299. <Column id="daycnt28" type="INT" size="256" sumtext="일건수"/>
  300. <Column id="daycnt29" type="INT" size="256" sumtext="일건수"/>
  301. <Column id="daycnt30" type="INT" size="256" sumtext="일건수"/>
  302. <Column id="daycnt31" type="INT" size="256" sumtext="일건수"/>
  303. <Column id="daycnttotal" type="INT" size="256" sumtext="전체건수"/>
  304. <Column id="beforeyearcnt" type="INT" size="256" sumtext="전년도건수"/>
  305. <Column id="cntaddper" type="BIGDECIMAL" size="256" sumtext="증감율"/>
  306. </ColumnInfo>
  307. </Dataset>
  308. <Dataset id="ds_main_celltret_celltretlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  309. <ColumnInfo>
  310. <Column id="codenm" type="STRING" size="256" sumtext="이식종류"/>
  311. <Column id="codenm2" type="STRING" size="256" sumtext="scsnm"/>
  312. <Column id="monthcnt01" type="INT" size="256" sumtext="1월건수"/>
  313. <Column id="monthcnt02" type="INT" size="256" sumtext="2월건수"/>
  314. <Column id="monthcnt03" type="INT" size="256" sumtext="3월건수"/>
  315. <Column id="monthcnt04" type="INT" size="256" sumtext="4월건수"/>
  316. <Column id="monthcnt05" type="INT" size="256" sumtext="5월건수"/>
  317. <Column id="monthcnt06" type="INT" size="256" sumtext="6월건수"/>
  318. <Column id="monthcnt07" type="INT" size="256" sumtext="7월건수"/>
  319. <Column id="monthcnt08" type="INT" size="256" sumtext="8월건수"/>
  320. <Column id="monthcnt09" type="INT" size="256" sumtext="9월건수"/>
  321. <Column id="monthcnt10" type="INT" size="256" sumtext="10월건수"/>
  322. <Column id="monthcnt11" type="INT" size="256" sumtext="11월건수"/>
  323. <Column id="monthcnt12" type="INT" size="256" sumtext="12월건수"/>
  324. <Column id="monthcnttotal" type="INT" size="256" sumtext="전체건수"/>
  325. <Column id="beforeyearcnt" type="INT" size="256" sumtext="전년도건수"/>
  326. <Column id="cntaddper" type="BIGDECIMAL" size="256" sumtext="증감율"/>
  327. </ColumnInfo>
  328. </Dataset>
  329. <Dataset id="ds_init_cmbinfo_atdoctid_A0536" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  330. <ColumnInfo>
  331. <Column id="cdnm" type="STRING" size="256"/>
  332. <Column id="cdid" type="STRING" size="256"/>
  333. </ColumnInfo>
  334. </Dataset>
  335. </Objects>
  336. <Bind>
  337. <BindItem id="item0" compid="grp_sea.ipt_execfromdd" propid="value" datasetid="ds_send_req" columnid="execfromdd"/>
  338. <BindItem id="item1" compid="grp_sea.ipt_exectodd" propid="value" datasetid="ds_send_req" columnid="exectodd"/>
  339. <BindItem id="item2" compid="grp_sea.rdo_monthday" propid="value" datasetid="ds_send_req" columnid="monthdayflag"/>
  340. <BindItem id="item3" compid="grp_sea.combo2" propid="value" datasetid="ds_send_req" columnid="atdoctid"/>
  341. <BindItem id="item4" compid="grp_sea.ipt_execfromdd2" propid="value" datasetid="ds_send_req" columnid="execfromdd2"/>
  342. <BindItem id="item5" compid="grp_sea.ipt_exectodd2" propid="value" datasetid="ds_send_req" columnid="exectodd2"/>
  343. </Bind>
  344. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  345. * System Name :
  346. * Job Name :
  347. * Creator :
  348. * Make Date : 2015-11-13
  349. * Description :
  350. *---------------------------------------------------------------------------------------
  351. * Modify Date Modifier Modify Description
  352. *---------------------------------------------------------------------------------------
  353. * 2015-11-13 Live Converter TF->XP
  354. *
  355. *---------------------------------------------------------------------------------------
  356. ****************************************************************************************/
  357. include "com_commonxp::comm_main.xjs";
  358. include "ast_examcurexp::AEZ0001.xjs";
  359. include "ast_hsctxp::bmtcommon.xjs";
  360. function SMABS10100_oninit(obj:Form, e:InitEventInfo)
  361. {
  362. frmf_initForm(obj);
  363. }
  364. function SMABS10100_onload(obj:Form, e:LoadEventInfo)
  365. {
  366. grdf_initGrid(grd_daycelltret);
  367. grdf_initGrid(grd_monthcelltret);
  368. var arrParam = [{dsNm: "ds_init_cmbinfo_atdoctid_A0536", cdGrpId: "A0536"}]
  369. appf_getCodeList(arrParam);
  370. var scurrentdd = utlf_getCurrentDate();
  371. grp_sea.rdo_monthday.index = 0;
  372. ds_send_req.setColumn(0, "monthdayflag", "D");
  373. fSetDefaultDD();
  374. }
  375. function fSetDefaultDD()
  376. {
  377. var scurrentdd = utlf_getCurrentDate();
  378. if(ds_send_req.getColumn(0, "monthdayflag") == "D")
  379. {
  380. ds_send_req.setColumn(0, "execfromdd", scurrentdd);
  381. ds_send_req.setColumn(0, "exectodd", scurrentdd);
  382. ds_send_req.setColumn(0, "execfromdd2", scurrentdd.toDate().getAddDate(-1, "M").getDateFormat("YYYYMMDD"));
  383. ds_send_req.setColumn(0, "exectodd2", scurrentdd.toDate().getAddDate(-1, "M").getDateFormat("YYYYMMDD"));
  384. }
  385. else
  386. {
  387. ds_send_req.setColumn(0, "execfromdd", scurrentdd.toDate().getAddDate(-30,"D").getDateFormat("YYYYMMDD"));
  388. ds_send_req.setColumn(0, "exectodd", scurrentdd.toDate().getAddDate(30,"D").getDateFormat("YYYYMMDD"));
  389. ds_send_req.setColumn(0, "execfromdd2", scurrentdd.toDate().getAddDate(-30,"D").getDateFormat("YYYYMMDD"));
  390. ds_send_req.setColumn(0, "exectodd2", scurrentdd.toDate().getAddDate(30,"D").getDateFormat("YYYYMMDD"));
  391. }
  392. }
  393. function grp_sea_ipt_execfromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
  394. {
  395. var fromdd = String(obj.value);
  396. var oCurYear = fromdd.toDate().getDateFormat("YYYY");
  397. var oCurMonth = fromdd.toDate().getDateFormat("MM");
  398. var flag = "";
  399. var oMaxDay = new Date(new Date(oCurYear, oCurMonth, 1)-86400000).getDate();
  400. var oMaxDay2 = new Date(new Date(oCurYear, oCurMonth -1, 1)-86400000).getDate();
  401. if(grp_sea.rdo_monthday.value == "D")
  402. {
  403. flag = "M";
  404. }
  405. else
  406. {
  407. flag = "Y";
  408. ds_send_req.setColumn(0, "execfromdd", fromdd.substr(0,6));
  409. }
  410. if(flag == "M" && oMaxDay == fromdd.toDate().getDateFormat("DD"))
  411. {
  412. ds_send_req.setColumn(0, "execfromdd2", (oCurYear + oCurMonth + "01").toDate().getAddDate(-1, flag).getDateFormat("YYYYMM") + oMaxDay2);
  413. }
  414. else
  415. {
  416. ds_send_req.setColumn(0, "execfromdd2", (String(fromdd).substr(0,6)+1).toDate().getAddDate(-1, flag).getDateFormat("YYYYMMDD"));
  417. }
  418. }
  419. function grp_sea_ipt_exectodd_onchanged(obj:Calendar, e:ChangeEventInfo)
  420. {
  421. var todd = String(obj.value);
  422. var oCurYear = todd.toDate().getDateFormat("YYYY");
  423. var oCurMonth = todd.toDate().getDateFormat("MM");
  424. var flag = "";
  425. var oMaxDay = new Date(new Date(oCurYear, oCurMonth, 1)-86400000).getDate();
  426. var oMaxDay2 = new Date(new Date(oCurYear, oCurMonth -1, 1)-86400000).getDate();
  427. if(grp_sea.rdo_monthday.value == "D")
  428. {
  429. flag = "M";
  430. }
  431. else
  432. {
  433. flag = "Y";
  434. ds_send_req.setColumn(0, "exectodd", todd.substr(0,6));
  435. }
  436. if(flag == "M" && oMaxDay == todd.toDate().getDateFormat("DD"))
  437. {
  438. ds_send_req.setColumn(0, "exectodd2", (oCurYear + oCurMonth + "01").toDate().getAddDate(-1, flag).getDateFormat("YYYYMM") + oMaxDay2);
  439. }
  440. else
  441. {
  442. ds_send_req.setColumn(0, "exectodd2", (String(todd).substr(0,6) + 1).toDate().getAddDate(-1, flag).getDateFormat("YYYYMMDD"));
  443. }
  444. }
  445. function grp_sea_rdo_monthday_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  446. {
  447. fSetDefaultDD();
  448. var fromdd = ds_send_req.getColumn(0, "execfromdd");
  449. var todd = ds_send_req.getColumn(0, "exectodd");
  450. if(obj.value == "D")
  451. {
  452. grd_monthcelltret.visible = false;
  453. grd_daycelltret.visible = true;
  454. grp_sea.ipt_execfromdd.dateformat = "yyyy-MM-dd";
  455. grp_sea.ipt_execfromdd.editformat = "yyyy-MM-dd";
  456. grp_sea.ipt_exectodd.dateformat = "yyyy-MM-dd";
  457. grp_sea.ipt_exectodd.editformat = "yyyy-MM-dd";
  458. grp_sea.ipt_execfromdd2.dateformat = "yyyy-MM-dd";
  459. grp_sea.ipt_execfromdd2.editformat = "yyyy-MM-dd";
  460. grp_sea.ipt_exectodd2.dateformat = "yyyy-MM-dd";
  461. grp_sea.ipt_exectodd2.editformat = "yyyy-MM-dd";
  462. }
  463. else
  464. {
  465. grd_monthcelltret.visible = true;
  466. grd_daycelltret.visible = false;
  467. grp_sea.ipt_execfromdd.dateformat = "yyyy-MM";
  468. grp_sea.ipt_execfromdd.editformat = "yyyy-MM";
  469. grp_sea.ipt_exectodd.dateformat = "yyyy-MM";
  470. grp_sea.ipt_exectodd.editformat = "yyyy-MM";
  471. grp_sea.ipt_execfromdd2.dateformat = "yyyy-MM";
  472. grp_sea.ipt_execfromdd2.editformat = "yyyy-MM";
  473. grp_sea.ipt_exectodd2.dateformat = "yyyy-MM";
  474. grp_sea.ipt_exectodd2.editformat = "yyyy-MM";
  475. ds_send_req.setColumn(0, "execfromdd2", (fromdd + 1).toDate().getAddDate(-1, "Y").getDateFormat("YYYYMMDD"));
  476. ds_send_req.setColumn(0, "exectodd2", (todd + 1).toDate().getAddDate(-1, "Y").getDateFormat("YYYYMMDD"));
  477. }
  478. }
  479. function grp_sea_button3_onclick(obj:Button, e:ClickEventInfo)
  480. {
  481. fGetCellTrpeInfo();
  482. }
  483. function fGetCellTrpeInfo()
  484. {
  485. if(ds_send_req.getColumn(0, "monthdayflag") == "D")
  486. {
  487. var oParam = {};
  488. oParam.id = "TRABS10102";
  489. oParam.service = "hsctstemcellapp.StemCellTreat";
  490. oParam.method = "reqGetCellTretStats";
  491. oParam.inds = "req=ds_send_req";
  492. oParam.outds = "ds_main_celltret_daycelltretlist=celltretlist ds_=message";
  493. oParam.async = false;
  494. //oParam.callback = "cf_TRABS10102";
  495. tranf_submit(oParam);
  496. }
  497. else
  498. {
  499. var oParam = {};
  500. oParam.id = "TRABS10101";
  501. oParam.service = "hsctstemcellapp.StemCellTreat";
  502. oParam.method = "reqGetCellTretStats";
  503. oParam.inds = "req=ds_send_req";
  504. oParam.outds = "ds_main_celltret_celltretlist=celltretlist ds_=message";
  505. oParam.async = false;
  506. //oParam.callback = "cf_TRABS10101";
  507. tranf_submit(oParam);
  508. }
  509. if(ds_send_req.getColumn(0, "monthdayflag") == "M")
  510. {
  511. var nodelist = ds_main_celltret_celltretlist
  512. for (var i = 0; i < nodelist.rowcount; i ++)
  513. {
  514. var iMonthCntTotal = ds_main_celltret_celltretlist.getColumn(i, "monthcnttotal");
  515. var iBeforeYearCnt = ds_main_celltret_celltretlist.getColumn(i, "beforeyearcnt");
  516. if (utlf_isNull(iMonthCntTotal) || utlf_isNull(iBeforeYearCnt) || iBeforeYearCnt == 0 )
  517. {
  518. ds_main_celltret_celltretlist.setColumn(i, "cntaddper", "");
  519. }
  520. else
  521. {
  522. var dCntAddPer = ((parseFloat(iMonthCntTotal) - parseFloat(iBeforeYearCnt)) / parseFloat(iBeforeYearCnt)) * 100;
  523. ds_main_celltret_celltretlist.setColumn(i, "cntaddper", (Math.round(dCntAddPer * 100) / 100));
  524. }
  525. }
  526. }
  527. else
  528. {
  529. var nodelist2 = ds_main_celltret_daycelltretlist
  530. for (var i = 0; i < nodelist2.rowcount; i ++)
  531. {
  532. var iDayCntTotal = ds_main_celltret_daycelltretlist.getColumn(i, "daycnttotal");
  533. var iBeforeYearCnt = ds_main_celltret_daycelltretlist.getColumn(i, "beforeyearcnt");
  534. if (utlf_isNull(iDayCntTotal) || utlf_isNull(iBeforeYearCnt) || iBeforeYearCnt == 0 )
  535. {
  536. ds_main_celltret_daycelltretlist.setColumn(i, "cntaddper", "");
  537. }
  538. else
  539. {
  540. var dCntAddPer = ((parseFloat(iDayCntTotal) - parseFloat(iBeforeYearCnt)) / parseFloat(iBeforeYearCnt)) * 100;
  541. ds_main_celltret_daycelltretlist.setColumn(i, "cntaddper", (Math.round(dCntAddPer * 100) / 100));
  542. }
  543. }
  544. }
  545. }
  546. function button2_onclick(obj:Button, e:ClickEventInfo)
  547. {
  548. if(ds_send_req.getColumn(0, "monthdayflag") == "M")
  549. {
  550. grdf_exportExcel(grd_monthcelltret, "처방별조혈모세포처리현황(월별)", "Sheet1", "true", "", "");
  551. }
  552. else
  553. {
  554. grdf_exportExcel(grd_daycelltret, "처방별조혈모세포처리현황(일별)", "Sheet1", "true", "", "");
  555. }
  556. }
  557. ]]></Script>
  558. </Form>
  559. </FDL>