SMAHA04700_조직처방수납여부관리.xfdl 34 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMAHA04700" position="absolute 0 0 1200 790" titletext="건진조직처방현황" oninit="SMAHA04700_oninit" onload="SMAHA04700_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 0 1195 23" id="grp_tle">
  8. <Layouts>
  9. <Layout>
  10. <Static text="건진조직처방현황" position="absolute 0 0 139 24" id="caption6" class="tit_1" anchor="default"/>
  11. </Layout>
  12. </Layouts>
  13. </Div>
  14. <Div position="absolute 0 13 1195 757" id="grp_biz" scrollbars="autoboth">
  15. <Layouts>
  16. <Layout>
  17. <Div position="absolute 0 10 1194 68" align="align:center top;" id="grp_sea" class="div_SA">
  18. <Layouts>
  19. <Layout>
  20. <Button position="absolute 1123 7 1179 29" id="btn_search" class="btn1" text="조회" onclick="grp_biz_grp_sea_btn_search_onclick"/>
  21. <Shape position="absolute 1104 7 1110 29" linetype="vertical" id="line13" class="line_4"/>
  22. <Combo position="absolute 295 7 405 26" id="cmb_srchhealexamdetlflag" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn">
  23. <Dataset id="innerdataset">
  24. <ColumnInfo>
  25. <Column id="codecolumn"/>
  26. <Column id="datacolumn"/>
  27. </ColumnInfo>
  28. <Rows>
  29. <Row>
  30. <Col id="codecolumn">O</Col>
  31. <Col id="datacolumn">접수일자</Col>
  32. </Row>
  33. <Row>
  34. <Col id="codecolumn">P</Col>
  35. <Col id="datacolumn">처방일자</Col>
  36. </Row>
  37. </Rows>
  38. </Dataset>
  39. </Combo>
  40. <Edit position="absolute 890 7 965 26" id="ipt_srchpid" class="input_search" autoselect="true" onkeyup="grp_biz_grp_sea_ipt_srchpid_onkeyup"/>
  41. <Button position="absolute 970 7 986 23" id="btn_srchpat" class="icon_search" text="" onclick="grp_biz_grp_sea_btn_srchpat_onclick"/>
  42. <Static text="조회구분 :" position="absolute 215 7 291 24" id="caption2" class="search_name"/>
  43. <Edit readonly="true" position="absolute 990 7 1080 26" id="opt_srchpnm" autoselect="true" class="output"/>
  44. <Static text="시행일자 :" position="absolute 471 7 547 24" id="caption47" class="search_name"/>
  45. <Static text="환자검색 :" position="absolute 811 7 887 24" id="caption49" class="search_name"/>
  46. <Calendar position="absolute 552 7 652 26" id="ipt_fromdd" class="input_s_essential" autoselect="true" onkeyup="grp_biz_grp_sea_ipt_fromdd_onkeyup"/>
  47. <Calendar position="absolute 673 7 773 26" id="input1" class="input_s_essential" autoselect="true" onkeyup="grp_biz_grp_sea_input1_onkeyup"/>
  48. <Static text="~" position="absolute 655 7 670 24" align="align:center middle;" id="caption1"/>
  49. <Static text="수납상태 :" position="absolute 215 30 291 47" id="caption3" class="search_name"/>
  50. <Radio position="absolute 295 30 455 50" id="radio1" columncount="3" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="grp_biz_grp_sea_radio1_onitemchanged">
  51. <Dataset id="innerdataset">
  52. <ColumnInfo>
  53. <Column id="codecolumn"/>
  54. <Column id="datacolumn"/>
  55. </ColumnInfo>
  56. <Rows>
  57. <Row>
  58. <Col id="codecolumn">
  59. </Col>
  60. <Col id="datacolumn">전체</Col>
  61. </Row>
  62. <Row>
  63. <Col id="codecolumn">Y</Col>
  64. <Col id="datacolumn">수납</Col>
  65. </Row>
  66. <Row>
  67. <Col id="codecolumn">N</Col>
  68. <Col id="datacolumn">미수납</Col>
  69. </Row>
  70. </Rows>
  71. </Dataset>
  72. </Radio>
  73. <Combo position="absolute 90 7 180 26" id="cmb_healexamflag" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn">
  74. <Dataset id="innerdataset">
  75. <ColumnInfo>
  76. <Column id="codecolumn"/>
  77. <Column id="datacolumn"/>
  78. </ColumnInfo>
  79. <Rows>
  80. <Row>
  81. <Col id="codecolumn">
  82. </Col>
  83. <Col id="datacolumn">--전체--</Col>
  84. </Row>
  85. <Row>
  86. <Col id="codecolumn">C</Col>
  87. <Col id="datacolumn">종합건진</Col>
  88. </Row>
  89. <Row>
  90. <Col id="codecolumn">G</Col>
  91. <Col id="datacolumn">일반건진</Col>
  92. </Row>
  93. </Rows>
  94. </Dataset>
  95. </Combo>
  96. <Static text="건진구분 :" position="absolute 10 7 86 26" id="caption4" class="search_name"/>
  97. <Combo position="absolute 90 30 180 49" id="cmb_execprcpstatcd" class="combo_search" innerdataset="@ds_init_baseinfo_initexecprcpstatcd_M0011" datacolumn="cdnm" codecolumn="cdid"/>
  98. <Static text="처방상태 :" position="absolute 10 30 86 47" id="caption5" class="search_name"/>
  99. <Static text="처방코드 :" position="absolute 471 30 547 47" id="caption7" class="search_name"/>
  100. <Edit position="absolute 552 30 667 49" id="ipt_srchexamcurecd" class="input_search" autoselect="true" onkeyup="grp_biz_grp_sea_ipt_srchexamcurecd_onkeyup" tooltiptext="검사코드12자리입력가능" tooltiptype="hover" oneditclick="grp_biz_grp_sea_ipt_srchexamcurecd_oneditclick"/>
  101. <Button position="absolute 672 30 688 46" id="button1" class="icon_search" text="" onclick="grp_biz_grp_sea_button1_onclick"/>
  102. <Edit readonly="true" position="absolute 693 30 933 49" id="output1" autoselect="true" class="output"/>
  103. </Layout>
  104. </Layouts>
  105. </Div>
  106. <Grid position="absolute 0 75 1194 730" id="grd_tissprcp" binddataset="ds_main_tissprcplist_item" autoenter="select">
  107. <Formats>
  108. <Format id="default">
  109. <Columns>
  110. <Column size="20" band="left"/>
  111. <Column size="43"/>
  112. <Column size="70"/>
  113. <Column size="70"/>
  114. <Column size="60"/>
  115. <Column size="70"/>
  116. <Column size="65"/>
  117. <Column size="60"/>
  118. <Column size="90"/>
  119. <Column size="190"/>
  120. <Column size="100"/>
  121. <Column size="65"/>
  122. <Column size="120"/>
  123. <Column size="60"/>
  124. <Column size="85"/>
  125. <Column size="0"/>
  126. <Column size="0"/>
  127. <Column size="0"/>
  128. </Columns>
  129. <Rows>
  130. <Row size="24" band="head"/>
  131. <Row size="24"/>
  132. </Rows>
  133. <Band id="head">
  134. <Cell/>
  135. <Cell col="1" text="구분"/>
  136. <Cell col="2" text="처방일자"/>
  137. <Cell col="3" text="접수일자"/>
  138. <Cell col="4" text="접수번호"/>
  139. <Cell col="5" text="등록번호"/>
  140. <Cell col="6" text="환자명"/>
  141. <Cell col="7" text="처방상태"/>
  142. <Cell col="8" text="처방코드"/>
  143. <Cell col="9" text="처방명"/>
  144. <Cell col="10" text="처방부서"/>
  145. <Cell col="11" text="접수자"/>
  146. <Cell col="12" text="처방일시"/>
  147. <Cell col="13" text="수납여부"/>
  148. <Cell col="14" text="수납일자"/>
  149. <Cell col="15" text="caption1"/>
  150. <Cell col="16" text="caption2"/>
  151. <Cell col="17" text="caption3"/>
  152. </Band>
  153. <Band id="body">
  154. <Cell celltype="head" expr="expr:currow + 1"/>
  155. <Cell col="1" displaytype="combo" style="align:center;" text="bind:healexamflag" combodataset="ds_healexamflag" combocodecol="value" combodatacol="label" enable="false"/>
  156. <Cell col="2" displaytype="date" text="bind:prcpdd" calendardisplaynulltype="none"/>
  157. <Cell col="3" displaytype="date" text="bind:orddd" calendardisplaynulltype="none"/>
  158. <Cell col="4" text="bind:cretno"/>
  159. <Cell col="5" text="bind:pid"/>
  160. <Cell col="6" text="bind:hngnm"/>
  161. <Cell col="7" displaytype="combo" style="align:center;" text="bind:execprcpstatcd" combodataset="ds_init_baseinfo_initexecprcpstatcd_M0011" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  162. <Cell col="8" style="align:left;" text="bind:prcpcd"/>
  163. <Cell col="9" style="align:left;" text="bind:prcpnm"/>
  164. <Cell col="10" style="align:left;" text="bind:rgstdeptcd"/>
  165. <Cell col="11" text="bind:rgstrid"/>
  166. <Cell col="12" text="bind:rgstdt" mask="expr:utlf_isNull(rgstdt) ? '' : '####-##-## ##:##:##'"/>
  167. <Cell col="13" displaytype="combo" edittype="combo" style="align:center;" text="bind:rcptyn" combodataset="ds_rcptyn" combocodecol="value" combodatacol="label"/>
  168. <Cell col="14" displaytype="date" edittype="date" text="bind:rcptdd" editautoselect="true" calendardisplaynulltype="none"/>
  169. <Cell col="15" text="bind:prcpno"/>
  170. <Cell col="16" text="bind:prcphistno"/>
  171. <Cell col="17" text="bind:execprcpno"/>
  172. </Band>
  173. </Format>
  174. </Formats>
  175. </Grid>
  176. <Shape position="absolute 0 70 1194 76" linetype="horizontal" id="line3" class="line_10"/>
  177. </Layout>
  178. </Layouts>
  179. </Div>
  180. <Div position="absolute 0 757 1195 784" id="grp_btn">
  181. <Layouts>
  182. <Layout>
  183. <Button position="absolute 0 5 72 27" id="btn_print" class="btn6" text="엑셀출력" onclick="grp_btn_btn_print_onclick"/>
  184. <Button position="absolute 1138 5 1194 27" id="btn_save" class="btn4" text="저장" onclick="grp_btn_btn_save_onclick"/>
  185. </Layout>
  186. </Layouts>
  187. </Div>
  188. </Layout>
  189. </Layouts>
  190. <Objects>
  191. <Dataset id="ds_init_baseinfo_initexecprcpstatcd_M0011" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  192. <ColumnInfo>
  193. <Column id="cdnm" type="STRING"/>
  194. <Column id="cdid" type="STRING"/>
  195. </ColumnInfo>
  196. </Dataset>
  197. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  198. <ColumnInfo>
  199. <Column id="srchhealexamflag" type="STRING" size="256" sumtext="건진구분"/>
  200. <Column id="srchflag" type="STRING" size="256" sumtext="조회구분"/>
  201. <Column id="srchfromdd" type="STRING" size="256" sumtext="조회시작일"/>
  202. <Column id="srchtodd" type="STRING" size="256" sumtext="조회종료일"/>
  203. <Column id="srchpid" type="STRING" size="256" sumtext="등록번호"/>
  204. <Column id="srchprcpstatcd" type="STRING" size="256" sumtext="처방상태"/>
  205. <Column id="srchexamcurecd" type="STRING" size="256" sumtext="검사코드"/>
  206. <Column id="srchrcptflag" type="STRING" size="256" sumtext="수납구분"/>
  207. <Column id="healexamdetlflag" type="STRING" size="256" sumtext="건진구분"/>
  208. <Column id="srchexamcurenm" type="STRING" size="256"/>
  209. </ColumnInfo>
  210. <Rows>
  211. <Row/>
  212. </Rows>
  213. </Dataset>
  214. <Dataset id="ds_main_tissprcplist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_tissprcplist_item_oncolumnchanged">
  215. <ColumnInfo>
  216. <Column id="healexamflag" type="STRING" size="256" sumtext=""/>
  217. <Column id="prcpdd" type="STRING" size="256" sumtext=""/>
  218. <Column id="orddd" type="STRING" size="256" sumtext=""/>
  219. <Column id="cretno" type="STRING" size="256" sumtext=""/>
  220. <Column id="pid" type="STRING" size="256" sumtext=""/>
  221. <Column id="hngnm" type="STRING" size="256" sumtext=""/>
  222. <Column id="execprcpstatcd" type="STRING" size="256" sumtext=""/>
  223. <Column id="prcpcd" type="STRING" size="256" sumtext=""/>
  224. <Column id="prcpnm" type="STRING" size="256" sumtext=""/>
  225. <Column id="rgstdeptcd" type="STRING" size="256" sumtext=""/>
  226. <Column id="rgstrid" type="STRING" size="256" sumtext=""/>
  227. <Column id="rgstdt" type="STRING" size="256" sumtext=""/>
  228. <Column id="rcptyn" type="STRING" size="256" sumtext=""/>
  229. <Column id="rcptdd" type="STRING" size="256" sumtext=""/>
  230. <Column id="prcpno" type="STRING" size="256" sumtext=""/>
  231. <Column id="prcphistno" type="STRING" size="256" sumtext=""/>
  232. <Column id="execprcpno" type="STRING" size="256" sumtext=""/>
  233. </ColumnInfo>
  234. </Dataset>
  235. <Dataset id="ds_send_save_tissprcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  236. <ColumnInfo>
  237. <Column id="m" type="STRING" size="256" sumtext="상태"/>
  238. <Column id="prcpdd" type="STRING" size="256" sumtext=""/>
  239. <Column id="orddd" type="STRING" size="256" sumtext=""/>
  240. <Column id="cretno" type="STRING" size="256" sumtext=""/>
  241. <Column id="pid" type="STRING" size="256" sumtext=""/>
  242. <Column id="hngnm" type="STRING" size="256" sumtext=""/>
  243. <Column id="execprcpstatcd" type="STRING" size="256" sumtext=""/>
  244. <Column id="prcpcd" type="STRING" size="256" sumtext=""/>
  245. <Column id="prcpnm" type="STRING" size="256" sumtext=""/>
  246. <Column id="rgstdeptcd" type="STRING" size="256" sumtext=""/>
  247. <Column id="rgstrid" type="STRING" size="256" sumtext=""/>
  248. <Column id="rgstdt" type="STRING" size="256" sumtext=""/>
  249. <Column id="rcptyn" type="STRING" size="256" sumtext=""/>
  250. <Column id="rcptdd" type="STRING" size="256" sumtext=""/>
  251. <Column id="prcpno" type="STRING" size="256" sumtext=""/>
  252. <Column id="prcphistno" type="STRING" size="256" sumtext=""/>
  253. <Column id="execprcpno" type="STRING" size="256" sumtext=""/>
  254. </ColumnInfo>
  255. </Dataset>
  256. <Dataset id="ds_hidden_item3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  257. <ColumnInfo>
  258. <Column id="count" type="STRING" size="256" sumtext="실행건수"/>
  259. </ColumnInfo>
  260. </Dataset>
  261. <Dataset id="ds_temp_templst_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  262. <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  263. <ColumnInfo>
  264. <Column id="okflag" type="STRING" size="256"/>
  265. </ColumnInfo>
  266. <Rows>
  267. <Row/>
  268. </Rows>
  269. </Dataset>
  270. <Dataset id="ds_healexamflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  271. <ColumnInfo>
  272. <Column id="label" type="STRING" size="256"/>
  273. <Column id="value" type="STRING" size="256"/>
  274. </ColumnInfo>
  275. <Rows>
  276. <Row>
  277. <Col id="label">종건</Col>
  278. <Col id="value">C</Col>
  279. </Row>
  280. <Row>
  281. <Col id="label">일건</Col>
  282. <Col id="value">G</Col>
  283. </Row>
  284. </Rows>
  285. </Dataset>
  286. <Dataset id="ds_rcptyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  287. <ColumnInfo>
  288. <Column id="label" type="STRING" size="256"/>
  289. <Column id="value" type="STRING" size="256"/>
  290. </ColumnInfo>
  291. <Rows>
  292. <Row>
  293. <Col id="label">수납</Col>
  294. <Col id="value">Y</Col>
  295. </Row>
  296. <Row>
  297. <Col id="label">미수납</Col>
  298. <Col id="value">N</Col>
  299. </Row>
  300. </Rows>
  301. </Dataset>
  302. </Objects>
  303. <Bind>
  304. <BindItem id="item0" compid="grp_biz.grp_sea.cmb_healexamflag" propid="value" datasetid="ds_send" columnid="srchhealexamflag"/>
  305. <BindItem id="item1" compid="grp_biz.grp_sea.cmb_srchhealexamdetlflag" propid="value" datasetid="ds_send" columnid="srchflag"/>
  306. <BindItem id="item2" compid="grp_biz.grp_sea.ipt_fromdd" propid="value" datasetid="ds_send" columnid="srchfromdd"/>
  307. <BindItem id="item3" compid="grp_biz.grp_sea.input1" propid="value" datasetid="ds_send" columnid="srchtodd"/>
  308. <BindItem id="item4" compid="grp_biz.grp_sea.ipt_srchpid" propid="value" datasetid="ds_send" columnid="srchpid"/>
  309. <BindItem id="item5" compid="grp_biz.grp_sea.opt_srchpnm" propid="value" datasetid="ds_send" columnid="srchpnm2"/>
  310. <BindItem id="item6" compid="grp_biz.grp_sea.output1" propid="value" datasetid="ds_send" columnid="srchexamcurenm"/>
  311. <BindItem id="item7" compid="grp_biz.grp_sea.ipt_srchexamcurecd" propid="value" datasetid="ds_send" columnid="srchexamcurecd"/>
  312. <BindItem id="item8" compid="grp_biz.grp_sea.radio1" propid="value" datasetid="ds_send" columnid="srchrcptflag"/>
  313. <BindItem id="item9" compid="grp_biz.grp_sea.cmb_execprcpstatcd" propid="value" datasetid="ds_send" columnid="srchprcpstatcd"/>
  314. </Bind>
  315. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  316. * System Name : 경대 의료정보시스템
  317. * Job Name : ast_healthexamrsrvacptxp -> SMAHA04700
  318. * Creator : yjh
  319. * Make Date : 2018-01-31
  320. * Description :
  321. *---------------------------------------------------------------------------------------
  322. * Modify Date Modifier Modify Description
  323. *---------------------------------------------------------------------------------------
  324. * 2018-01-31 yjh TF->XP
  325. *
  326. *---------------------------------------------------------------------------------------
  327. ****************************************************************************************/
  328. //=======================================================================================
  329. // Lib Include
  330. //---------------------------------------------------------------------------------------
  331. include "com_commonxp::comm_main.xjs";
  332. include "ast_healthexamrsrvacptxp::AHA.xjs";
  333. //=======================================================================================
  334. // Global Form Variable
  335. //---------------------------------------------------------------------------------------
  336. var arErrorCode = new HashArray();
  337. //=======================================================================================
  338. // Function
  339. //---------------------------------------------------------------------------------------
  340. function fGetBaseInfo(){
  341. // 건진기관구분
  342. var arrParam = [{dsNm: "ds_init_baseinfo_healexamflaglst_A0068", cdGrpId: "A0068"}
  343. ,{dsNm: "ds_init_baseinfo_chealexamdetlflaglst_A0069", cdGrpId: "A0069"}
  344. ,{dsNm: "ds_init_baseinfo_ghealexamdetlflaglst_A0070", cdGrpId: "A0070"}
  345. ,{dsNm: "ds_init_baseinfo_initexecprcpstatcd_M0011", cdGrpId: "M0011"}]
  346. appf_getCodeList(arrParam);
  347. // submit("TRZBC00101");
  348. //
  349. // model.makeNode("/root/init/baseinfo/healexamdetlflaglst/item[0]");
  350. // model.makeNode("/root/init/baseinfo/healexamdetlflaglst/item/cdnm");
  351. // model.makeNode("/root/init/baseinfo/healexamdetlflaglst/item/cdid");
  352. // model.setValue("/root/init/baseinfo/healexamdetlflaglst/item/cdnm", "전체");
  353. // copyNodesetType("/root/init/baseinfo/healexamdetlflaglst/item","/root/init/baseinfo/chealexamdetlflaglst/A0069", "after");
  354. // copyNodesetType("/root/init/baseinfo/healexamdetlflaglst/item","/root/init/baseinfo/ghealexamdetlflaglst/A0070", "after");
  355. fGetPrcpCode();
  356. }
  357. function fGetPrcpCode() {
  358. //처방코드 목록 찾기
  359. var multiYN = "N";
  360. var desNode = "ds_temp_templst_item";
  361. if( ahzfOpenEtcCdSel( "SMAHB00100"
  362. , "F" /*대분류코드*/
  363. , "F18" /*중분류코드*/
  364. , multiYN /*multiyn*/
  365. , desNode /*목적노드셋*/
  366. , "Y" /*중분류코드 setting여부(Y/N)*/ ) ){
  367. ds_send.setColumn(0, "srchexamcurecd",ds_temp_templst_item.getColumn(0, "etcdetlcd"));
  368. ds_send.setColumn(0, "srchexamcurenm",ds_temp_templst_item.getColumn(0, "etcdetlnm"));
  369. }
  370. }
  371. function fGetStdVal(){
  372. if (utlf_isNull(ds_send.getColumn(0, "srchflag")) ) {
  373. sysf_messageBox("조회구분을 선택하셔야 합니다.", "E");
  374. return;
  375. }
  376. if (utlf_isNull(ds_send.getColumn(0, "srchpid")) && utlf_isNull(ds_send.getColumn(0, "srchfromdd")) || utlf_isNull(ds_send.getColumn(0, "srchtodd"))) {
  377. sysf_messageBox("시행일자 혹은 환자를 선택하셔야 합니다.", "E");
  378. return;
  379. }
  380. if (utlf_isNull(ds_send.getColumn(0, "srchexamcurecd")) ) {
  381. sysf_messageBox("처방코드를 입력 하셔야 합니다.", "E");
  382. return;
  383. }
  384. ds_main_tissprcplist_item.clearData();
  385. var oParam = {};
  386. oParam.id = "TRAHA04701";
  387. oParam.service = "healthexamrsrvacptapp.RsrvAcpt";
  388. oParam.method = "reqGetTissPrcpList";
  389. oParam.inds = "req=ds_send";
  390. oParam.outds = "ds_main_tissprcplist_item=item";
  391. oParam.async = false;
  392. //oParam.callback = "cf_TRAHA04701";
  393. tranf_submit(oParam);
  394. }
  395. function fSaveVal() {
  396. if( sysf_messageBox("건진조직처방 수납상태를 ","Q002") == 6){
  397. var oDsTemp = grdf_getGridUpdateData(grp_biz.grd_tissprcp);
  398. grdf_setStatusColumn(oDsTemp, "m");
  399. ds_send_save_tissprcplist.copyData(oDsTemp);
  400. var oParam = {};
  401. oParam.id = "TXAHA04701";
  402. oParam.service = "healthexamrsrvacptapp.RsrvAcpt";
  403. oParam.method = "reqExeTissPrcpList";
  404. oParam.inds = "tissprcplist=ds_send_save_tissprcplist";
  405. oParam.outds = "ds_hidden_item3=item3";
  406. oParam.async = false;
  407. oParam.callback = "cf_TXAHA04701";
  408. tranf_submit(oParam);
  409. if (arErrorCode.pop("TXAHA04701") > -1){
  410. var oParam = {};
  411. oParam.id = "TRAHA04701";
  412. oParam.service = "healthexamrsrvacptapp.RsrvAcpt";
  413. oParam.method = "reqGetTissPrcpList";
  414. oParam.inds = "req=ds_send";
  415. oParam.outds = "ds_main_tissprcplist_item=item";
  416. oParam.async = false;
  417. //oParam.callback = "cf_TRAHA04701";
  418. tranf_submit(oParam);
  419. sysf_messageBox("저장 ", "I002");
  420. }
  421. }
  422. }
  423. function cf_TXAHA04701(sSvcId, nErrorCode, sErrorMsg) {
  424. arErrorCode.push(sSvcId, nErrorCode);
  425. }
  426. //=======================================================================================
  427. // Event
  428. //---------------------------------------------------------------------------------------
  429. /****************************************************************************************
  430. * Components : Form
  431. * Components ID : SMAHA04700
  432. * Event : oninit
  433. * Argument : 01.obj : Object Event has occurred
  434. * : 02.e : Event Object
  435. * Description : 화면 처음 초기화시
  436. ****************************************************************************************/
  437. function SMAHA04700_oninit(obj:Form, e:InitEventInfo)
  438. {
  439. frmf_initForm(obj); //폼 초기화
  440. }
  441. /****************************************************************************************
  442. * Components : Form
  443. * Components ID : SMAHA04700
  444. * Event : onload
  445. * Argument : 01.obj : Object Event has occurred
  446. * : 02.e : Event Object
  447. * Description : 화면 로딩 완료시
  448. ****************************************************************************************/
  449. function SMAHA04700_onload(obj:Form, e:LoadEventInfo)
  450. {
  451. ds_send.setColumn(0, "srchflag", "O");
  452. ds_send.setColumn(0, "healexamdetlflag", "O");
  453. grdf_setGridSort(grp_biz.grd_tissprcp);
  454. grp_biz.grp_sea.cmb_healexamflag.index = 0;
  455. grp_biz.grp_sea.radio1.index = 0;
  456. fGetBaseInfo();
  457. ds_main_tissprcplist_item.clearData();
  458. ds_send.setColumn(0, "healexamdetlflag", frmf_getMenuParam());
  459. ds_send.setColumn(0, "srchfromdd", utlf_getCurrentDate());
  460. ds_send.setColumn(0, "srchtodd", utlf_getCurrentDate());
  461. frmf_addComboItem("grp_biz.grp_sea.cmb_execprcpstatcd","--전체--","","above");
  462. grp_biz.grp_sea.cmb_execprcpstatcd.value = "";
  463. }
  464. /****************************************************************************************
  465. * Components : Button
  466. * Components ID : btn_search
  467. * Event : onclick
  468. * Argument : 01.obj : Object Event has occurred
  469. * : 02.e : Event Object
  470. * Description : 조회버튼 클릭시
  471. ****************************************************************************************/
  472. function grp_biz_grp_sea_btn_search_onclick(obj:Button, e:ClickEventInfo)
  473. {
  474. fGetStdVal(); //VHG1G2
  475. }
  476. /****************************************************************************************
  477. * Components : Edit
  478. * Components ID : ipt_srchpid
  479. * Event : onkeyup
  480. * Argument : 01.obj : Object Event has occurred
  481. * : 02.e : Event Object
  482. * Description : 에디터 키 입력시
  483. ****************************************************************************************/
  484. function grp_biz_grp_sea_ipt_srchpid_onkeyup(obj:Edit, e:KeyEventInfo)
  485. {
  486. if( e.keycode == 13 ){
  487. obj.updateToDataset();
  488. grp_biz.grp_sea.btn_srchpat.click();
  489. }
  490. }
  491. /****************************************************************************************
  492. * Components : Button
  493. * Components ID : btn_srchpat
  494. * Event : onclick
  495. * Argument : 01.obj : Object Event has occurred
  496. * : 02.e : Event Object
  497. * Description : 돋보기버튼 클릭시
  498. ****************************************************************************************/
  499. function grp_biz_grp_sea_btn_srchpat_onclick(obj:Button, e:ClickEventInfo)
  500. {
  501. fSearchPatInfo("SMAHA00100", "pid", grp_biz.grp_sea.ipt_srchpid.value , "N", "ds_send" ,"srchpid", "srchpnm2" );
  502. }
  503. /****************************************************************************************
  504. * Components : Calendar
  505. * Components ID : ipt_fromdd
  506. * Event : onkeyup
  507. * Argument : 01.obj : Object Event has occurred
  508. * : 02.e : Event Object
  509. * Description : 달력 키 입력시
  510. ****************************************************************************************/
  511. function grp_biz_grp_sea_ipt_fromdd_onkeyup(obj:Calendar, e:KeyEventInfo)
  512. {
  513. //fMoveFocus("grp_biz.grp_sea.ipt_todd", e);
  514. }
  515. /****************************************************************************************
  516. * Components : Calendar
  517. * Components ID : input1
  518. * Event : onkeyup
  519. * Argument : 01.obj : Object Event has occurred
  520. * : 02.e : Event Object
  521. * Description : 달력 키 입력시
  522. ****************************************************************************************/
  523. function grp_biz_grp_sea_input1_onkeyup(obj:Calendar, e:KeyEventInfo)
  524. {
  525. //fMoveFocus("grp_biz.grp_sea.ipt_todd", e);
  526. }
  527. /****************************************************************************************
  528. * Components : Radio
  529. * Components ID : radio1
  530. * Event : onitemchanged
  531. * Argument : 01.obj : Object Event has occurred
  532. * : 02.e : Event Object
  533. * Description : 라디오 값 변경시
  534. ****************************************************************************************/
  535. function grp_biz_grp_sea_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  536. {
  537. fGetStdVal();
  538. }
  539. /****************************************************************************************
  540. * Components : Edit
  541. * Components ID : ipt_srchexamcurecd
  542. * Event : onkeyup
  543. * Argument : 01.obj : Object Event has occurred
  544. * : 02.e : Event Object
  545. * Description : 에디터 키 입력시
  546. ****************************************************************************************/
  547. function grp_biz_grp_sea_ipt_srchexamcurecd_onkeyup(obj:Edit, e:KeyEventInfo)
  548. {
  549. if( e.keycode == 13 ){
  550. obj.updateToDataset();
  551. grp_biz.grp_sea.btn_search.click();
  552. }
  553. }
  554. /****************************************************************************************
  555. * Components : Edit
  556. * Components ID : ipt_srchexamcurecd
  557. * Event : oneditclick
  558. * Argument : 01.obj : Object Event has occurred
  559. * : 02.e : Event Object
  560. * Description : 에디터 클릭시
  561. ****************************************************************************************/
  562. function grp_biz_grp_sea_ipt_srchexamcurecd_oneditclick(obj:Edit, e:EditClickEventInfo)
  563. {
  564. fGetPrcpCode();
  565. }
  566. /****************************************************************************************
  567. * Components : Button
  568. * Components ID : button1
  569. * Event : onclick
  570. * Argument : 01.obj : Object Event has occurred
  571. * : 02.e : Event Object
  572. * Description : 돋보기버튼 클릭시
  573. ****************************************************************************************/
  574. function grp_biz_grp_sea_button1_onclick(obj:Button, e:ClickEventInfo)
  575. {
  576. /**
  577. * 수가내역 가져오기=======================================================================================================================================
  578. * SPAEB00201_PARAM1 : 검색구분(cd/nm)
  579. * SPAEB00201_PARAM2 : 검색조건(코드/명칭)
  580. * SPAEB00201_PARAM3 : multiyn
  581. * SPAEB00201_PARAM4 : multi선택 시 setting할 목적노드
  582. * SPAEB00201_PARAM5 : code값을 setting할 목적노드
  583. * SPAEB00201_PARAM6 : name값을 setting할 목적노드
  584. * SPAEB00201_PARAM7 : 수가를 setting할 목적노드
  585. */
  586. frmf_clearParameter("SPAEB00201_PARAM1");
  587. frmf_clearParameter("SPAEB00201_PARAM2");
  588. frmf_clearParameter("SPAEB00201_PARAM3");
  589. frmf_clearParameter("SPAEB00201_PARAM4");
  590. frmf_clearParameter("SPAEB00201_PARAM5");
  591. frmf_clearParameter("SPAEB00201_PARAM6");
  592. //clearParameter("SPAEB00201_PARAM7");
  593. frmf_setParameter ("SPAEB00201_PARAM1" , "cd");
  594. frmf_setParameter ("SPAEB00201_PARAM2" , ds_send.getColumn(0, "srchexamcurecd"));
  595. frmf_setParameter ("SPAEB00201_PARAM3" , "N");
  596. frmf_setParameter ("SPAEB00201_PARAM4" , "ds_send");
  597. frmf_setParameter ("SPAEB00201_PARAM5" , "srchexamcurecd" );
  598. frmf_setParameter ("SPAEB00201_PARAM6" , "srchexamcurenm");
  599. //setParameter ("SPAEB00201_PARAM7" , vAmtDestXPath);
  600. frmf_modal("SPAEB00201","SPAEB00201",null,"","","","","","","","","","M");
  601. }
  602. /****************************************************************************************
  603. * Components : Dataset
  604. * Components ID : ds_main_tissprcplist_item
  605. * Event : oncolumnchanged
  606. * Argument : 01.obj : Object Event has occurred
  607. * : 02.e : Event Object
  608. * Description : 데이터셋 값 변경시
  609. ****************************************************************************************/
  610. function ds_main_tissprcplist_item_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  611. {
  612. var row = e.row;
  613. //var col = grp_biz.grd_tissprcp.currentcol;
  614. if (e.columnid == "rcptyn") {
  615. var rcptyn = ds_main_tissprcplist_item.getColumn(e.row, "rcptyn");
  616. if (rcptyn == "N") {
  617. ds_main_tissprcplist_item.setColumn(e.row, "rcptdd", "00000000");
  618. } else {
  619. ds_main_tissprcplist_item.setColumn(e.row, "rcptdd", utlf_getCurrentDate());
  620. }
  621. }
  622. }
  623. /****************************************************************************************
  624. * Components : Button
  625. * Components ID : btn_print
  626. * Event : onclick
  627. * Argument : 01.obj : Object Event has occurred
  628. * : 02.e : Event Object
  629. * Description : 엑셀출력버튼 클릭시
  630. ****************************************************************************************/
  631. function grp_btn_btn_print_onclick(obj:Button, e:ClickEventInfo)
  632. {
  633. //if( grp_biz.grd_tissprcp.rowcount > 0 ){
  634. grdf_exportExcel(grp_biz.grd_tissprcp, "save", "sheet", false, "", "user", false);
  635. // } else {
  636. // sysf_messageBox("조회된 데이터가 ", "I004");
  637. // return;
  638. // }
  639. }
  640. /****************************************************************************************
  641. * Components : Button
  642. * Components ID : btn_save
  643. * Event : onclick
  644. * Argument : 01.obj : Object Event has occurred
  645. * : 02.e : Event Object
  646. * Description : 저장버튼 클릭시
  647. ****************************************************************************************/
  648. function grp_btn_btn_save_onclick(obj:Button, e:ClickEventInfo)
  649. {
  650. fSaveVal();
  651. }
  652. ]]></Script>
  653. </Form>
  654. </FDL>