SPPID25000_사후심사제출자료목록대상조회.xfdl 30 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPPID25000" position="absolute 0 0 1094 779" titletext="사후심사제출자료목록대상조회" onload="SPPID25000_onload">
  5. <Layouts>
  6. <Layout>
  7. <Button id="btn_print" taborder="8" text="출력" class="btn6" position="absolute 822 102 874 122" anchor="top right" onclick="btn_print_onclick" visible="false"/>
  8. <Static id="cap_judgtrgtman" text="대상자 목록" class="tit_2" position="absolute 0 104 108 124" anchor="default" positiontype="position"/>
  9. <Grid id="grd_deptlist" taborder="2" useinputpanel="false" position="absolute 0 124 1092 753" style="align:center middle;" anchor="all" autofittype="none" align="align:center middle;" binddataset="DS_GRID_grd_deptlist" positiontype="position" cellsizingtype="both" cellmovingtype="col" oncelldblclick="grd_deptlist_oncelldblclick">
  10. <Formats>
  11. <Format id="default">
  12. <Columns>
  13. <Column size="40"/>
  14. <Column size="80"/>
  15. <Column size="130"/>
  16. <Column size="60"/>
  17. <Column size="54"/>
  18. <Column size="65"/>
  19. <Column size="54"/>
  20. <Column size="100"/>
  21. <Column size="60"/>
  22. <Column size="150"/>
  23. <Column size="139"/>
  24. </Columns>
  25. <Rows>
  26. <Row size="26" band="head"/>
  27. <Row size="24"/>
  28. </Rows>
  29. <Band id="head">
  30. <Cell/>
  31. <Cell col="1" text="보험유형"/>
  32. <Cell col="2" text="분야"/>
  33. <Cell col="3" text="접수번호"/>
  34. <Cell col="4" text="명일련"/>
  35. <Cell col="5" text="등록번호"/>
  36. <Cell col="6" text="환자명"/>
  37. <Cell col="7" text="진료과"/>
  38. <Cell col="8" text="심사자"/>
  39. <Cell col="9" text="제출자료내역(코드)"/>
  40. <Cell col="10" text="전자제출"/>
  41. </Band>
  42. <Band id="body">
  43. <Cell celltype="head" expr="currow + 1"/>
  44. <Cell col="1" text="bind:insukind"/>
  45. <Cell col="2" text="bind:sumtypecd"/>
  46. <Cell col="3" text="bind:acptno"/>
  47. <Cell col="4" text="bind:docuseqno"/>
  48. <Cell col="5" text="bind:pid"/>
  49. <Cell col="6" text="bind:patnm"/>
  50. <Cell col="7" text="bind:orddeptcd"/>
  51. <Cell col="8" text="bind:judgrid"/>
  52. <Cell col="9" text="bind:spclspec"/>
  53. <Cell col="10" text="bind:efcode" expandshow="hide"/>
  54. </Band>
  55. </Format>
  56. </Formats>
  57. </Grid>
  58. <Button id="btn_excelsave" taborder="4" text="엑셀저장" class="btn7" position="absolute 1016 102 1092 122" anchor="top right" positiontype="position" onclick="btn_excelsave_onclick"/>
  59. <Button id="btn_attData" taborder="5" text="제출자료목록코드조회" class="btn2" position="absolute 875 102 1015 122" anchor="top right" positiontype="position" onclick="btn_attData_onclick"/>
  60. <Button id="btn_clear" taborder="6" text="초기화" class="btn4" position="absolute 971 755 1039 775" anchor="right bottom" positiontype="position" onclick="btn_clear_onclick"/>
  61. <Div id="group5" taborder="10" text="Div00" position="absolute 0 27 1092 94" class="div_SA" onkeydown="group5_onkeydown">
  62. <Layouts>
  63. <Layout>
  64. <Static id="caption9" text="청구번호" class="search_name" position="absolute 920 35 994 55" anchor="default"/>
  65. <Button id="btn_search" taborder="0" text="조회" onclick="group5_btn_search_onclick" class="btn1" position="absolute 1028 10 1084 30" anchor="top right"/>
  66. <Edit id="ipt_acptno" taborder="3" imemode="hangul" maxlength="15" class="input_search" position="absolute 991 35 1088 55" anchor="default"/>
  67. <Combo id="cmb_judgrid" taborder="4" innerdataset="@ds_init_judgrid" codecolumn="judgrid" datacolumn="judgrnm" class="combo_search" position="absolute 730 10 826 30" anchor="default"/>
  68. <Edit id="ipt_docuseqno2" taborder="5" imemode="hangul" maxlength="5" class="input_search" position="absolute 852 35 891 55" tooltiptext="끝번호" anchor="default"/>
  69. <Static id="caption25" text="~" position="absolute 841 35 852 55" style="align:center middle;" anchor="default"/>
  70. <Edit id="ipt_docuseqno1" taborder="6" imemode="hangul" maxlength="15" onkeydown="group5_ipt_docuseqno1_onkeydown" ontextchanged="group5_ipt_docuseqno1_ontextchanged" class="input_search" position="absolute 802 35 841 55" tooltiptext="시작번호" anchor="default"/>
  71. <Static id="caption7" text="명번호" class="search_name" position="absolute 741 35 802 55" anchor="default"/>
  72. <Static id="caption3" text="심사자" class="search_name" position="absolute 669 10 730 30" anchor="default"/>
  73. <Combo id="cmb_ordfildcd" taborder="7" innerdataset="@DS_INIT_cmb_ordfildcd" codecolumn="cdid" datacolumn="cdnm" class="combo_search" position="absolute 545 10 645 30" anchor="default"/>
  74. <Combo id="cmb_orddeptcd" taborder="8" innerdataset="@ds_init_orddeptcd" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 617 35 717 55" anchor="default"/>
  75. <Static id="caption46" text="진료과" class="search_name" position="absolute 543 35 604 55" anchor="default"/>
  76. <Static id="caption5" text="진료분야" class="search_name" position="absolute 471 10 545 30" anchor="default"/>
  77. <Edit id="opt_insukind" taborder="9" readonly="true" class="output_search" position="absolute 422 10 447 30" anchor="default"/>
  78. <Combo id="cmb_insukind" taborder="10" innerdataset="@DS_INIT_cmb_insukind" codecolumn="cdid" datacolumn="cdnm" onitemchanged="group5_cmb_insukind_onitemchanged" class="combo_search" position="absolute 330 10 419 30" anchor="default"/>
  79. <Combo id="combo1" taborder="11" innerdataset="@ds_init_ioflag" codecolumn="value" datacolumn="label" onitemchanged="group5_combo1_onitemchanged" class="combo_search" position="absolute 384 35 446 55" anchor="default"/>
  80. <Static id="caption1" text="보험유형" class="search_name" position="absolute 256 10 330 30" anchor="default"/>
  81. <Static id="caption10" text="내원유형" class="search_name" position="absolute 310 35 384 55" anchor="default"/>
  82. <Combo id="combo14" taborder="12" innerdataset="@DS_INIT_combo14" codecolumn="cdid" datacolumn="cdnm" class="combo_search" position="absolute 108 35 296 55" style="align:left middle;" anchor="default"/>
  83. <Combo id="cmb_clamdg" taborder="13" innerdataset="@DS_INIT_cmb_clamdg" codecolumn="clamdgcd" datacolumn="clamdgnm" class="combo_search" position="absolute 186 10 248 30" anchor="default"/>
  84. <cp_monthCal id="cp_monthCal00" titletext="monthCalendar" taborder="14" text="cp_monthCal00" scrollbars="none" position="absolute 108 10 183 30" onclick="group5_cp_monthCal00_onclick" anchor="default"/>
  85. <Static id="caption2" text="청구년월" class="search_name" position="absolute 8 10 82 30" anchor="default"/>
  86. <Static id="caption49" text="제출자료내역" class="search_name" position="absolute 8 35 108 55" anchor="default"/>
  87. <Static id="caption00" text="환자조회" class="search_name" position="absolute 848 12 922 32" anchor="default"/>
  88. <Edit id="ipt_patunitsrch" taborder="15" imemode="alpha" maxlength="15" class="input_search" position="absolute 920 12 1017 32" tooltiptext="환자성명으로 검색시 2자 이상 입력하세요." anchor="default"/>
  89. <Button id="btn_no" taborder="16" onclick="btn_no_onclick" position="absolute 999 12 1017 31" style="background:@gradation URL('theme://images\icon_btn.png');" anchor="default"/>
  90. <CheckBox id="chk_tfyn" taborder="17" text="외상유무" position="absolute 461 34 561 54" falsevalue="N" truevalue="Y" anchor="default"/>
  91. </Layout>
  92. </Layouts>
  93. </Div>
  94. <Static id="caption00" text="사후심사제출자료목록대상조회" class="tit_1" position="absolute 0 0 257 26"/>
  95. <Button id="Button00" taborder="11" text="닫기" class="btn4" position="absolute 1040 755 1092 775" anchor="right bottom" onclick="Button00_onclick"/>
  96. <Button id="btn_hiraef" taborder="12" text="제출자료전송" class="btn2" position="absolute 662 102 756 122" anchor="top right" onclick="btn_hiraef_onclick"/>
  97. </Layout>
  98. </Layouts>
  99. <Objects>
  100. <FileDialog id="fld_input" filter="Worksheet Files (*.xls;*.xlsx)|*.xls;*.xlsx" filterindex="0" defaultextension="false"/>
  101. <Dataset id="DS_GRID_grd_deptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  102. <ColumnInfo>
  103. <Column id="insukind" type="STRING"/>
  104. <Column id="sumtypecd" type="STRING"/>
  105. <Column id="docuseqno" type="STRING"/>
  106. <Column id="pid" type="STRING"/>
  107. <Column id="patnm" type="STRING"/>
  108. <Column id="orddeptcd" type="STRING"/>
  109. <Column id="judgrid" type="STRING"/>
  110. <Column id="spclspec" type="STRING"/>
  111. <Column id="clamym" type="STRING" size="256"/>
  112. <Column id="clamdg" type="STRING" size="256"/>
  113. <Column id="pidsn" type="STRING" size="256"/>
  114. <Column id="efcode" type="STRING" size="256"/>
  115. <Column id="ioflag" type="STRING" size="256"/>
  116. </ColumnInfo>
  117. </Dataset>
  118. <Dataset id="DS_INIT_cmb_insukind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  119. <ColumnInfo>
  120. <Column id="cdnm" type="STRING" size="256"/>
  121. <Column id="cdid" type="STRING" size="256"/>
  122. </ColumnInfo>
  123. </Dataset>
  124. <Dataset id="DS_INIT_cmb_ordfildcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  125. <ColumnInfo>
  126. <Column id="cdnm" type="STRING" size="256"/>
  127. <Column id="cdid" type="STRING" size="256"/>
  128. </ColumnInfo>
  129. </Dataset>
  130. <Dataset id="DS_INIT_combo14" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  131. <ColumnInfo>
  132. <Column id="cdnm" type="STRING" size="256"/>
  133. <Column id="cdid" type="STRING" size="256"/>
  134. </ColumnInfo>
  135. </Dataset>
  136. <Dataset id="DS_INIT_cmb_clamdg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  137. <ColumnInfo>
  138. <Column id="clamdgnm" type="STRING" size="256"/>
  139. <Column id="clamdgcd" type="STRING" size="256"/>
  140. </ColumnInfo>
  141. </Dataset>
  142. <Dataset id="ds_init_judgrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  143. <ColumnInfo>
  144. <Column id="judgrnm" type="STRING" size="256"/>
  145. <Column id="judgrid" type="STRING" size="256"/>
  146. </ColumnInfo>
  147. </Dataset>
  148. <Dataset id="ds_init_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  149. <ColumnInfo>
  150. <Column id="nm" type="STRING" size="256"/>
  151. <Column id="cd" type="STRING" size="256"/>
  152. </ColumnInfo>
  153. </Dataset>
  154. <Dataset id="ds_init_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  155. <ColumnInfo>
  156. <Column id="label" type="STRING" size="256"/>
  157. <Column id="value" type="STRING" size="256"/>
  158. </ColumnInfo>
  159. <Rows>
  160. <Row>
  161. <Col id="label">외래</Col>
  162. <Col id="value">O</Col>
  163. </Row>
  164. <Row>
  165. <Col id="label">입원</Col>
  166. <Col id="value">I</Col>
  167. </Row>
  168. </Rows>
  169. </Dataset>
  170. <ExportObject id="ExtObj" exporttype="0" exporteventtype="itemrecord"/>
  171. <Dataset id="ds_init_hospitalnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  172. <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  173. <Dataset id="ds_send_param" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  174. <ColumnInfo>
  175. <Column id="srchcond" type="STRING" size="256"/>
  176. <Column id="hngnm" type="STRING" size="256"/>
  177. <Column id="pid" type="STRING" size="256"/>
  178. </ColumnInfo>
  179. <Rows>
  180. <Row/>
  181. </Rows>
  182. </Dataset>
  183. <Dataset id="ds_cond_sppid32000" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  184. <ColumnInfo>
  185. <Column id="clamym" type="STRING" size="256"/>
  186. <Column id="clamdg" type="STRING" size="256"/>
  187. <Column id="pid" type="STRING" size="256"/>
  188. <Column id="pidsn" type="STRING" size="256"/>
  189. <Column id="patnm" type="STRING" size="256"/>
  190. <Column id="acptno" type="STRING" size="256"/>
  191. <Column id="docuseqno" type="STRING" size="256"/>
  192. <Column id="orddeptcd" type="STRING" size="256"/>
  193. <Column id="ioflag" type="STRING" size="256"/>
  194. </ColumnInfo>
  195. </Dataset>
  196. </Objects>
  197. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  198. * System Name :
  199. * Job Name :
  200. * Creator :
  201. * Make Date : 2015-05-01
  202. * Description :
  203. *---------------------------------------------------------------------------------------
  204. * Modify Date Modifier Modify Description
  205. *---------------------------------------------------------------------------------------
  206. * 2015-05-01 Live Converter TF->XP
  207. *
  208. *---------------------------------------------------------------------------------------
  209. ****************************************************************************************/
  210. include "com_commonxp::comm_main.xjs";
  211. function lf_initDataSet(){
  212. // cmb_clamdg의 INIT Dataset
  213. this.cmb_clamdg.innerdataset = "DS_INIT_cmb_clamdg";
  214. this.cmb_clamdg.codecolumn = "clamdgcd";
  215. this.cmb_clamdg.datacolumn = "clamdgnm";
  216. // cmb_insukind의 INIT Dataset
  217. this.cmb_insukind.innerdataset = "DS_INIT_cmb_insukind";
  218. this.cmb_insukind.codecolumn = "cdid";
  219. this.cmb_insukind.datacolumn = "cdnm";
  220. // cmb_ordfildcd의 INIT Dataset
  221. this.cmb_ordfildcd.innerdataset = "DS_INIT_cmb_ordfildcd";
  222. this.cmb_ordfildcd.codecolumn = "cdid";
  223. this.cmb_ordfildcd.datacolumn = "cdnm";
  224. // cmb_orddeptcd의 INIT Dataset
  225. this.cmb_orddeptcd.innerdataset = "DS_INIT_cmb_orddeptcd";
  226. this.cmb_orddeptcd.codecolumn = "cd";
  227. this.cmb_orddeptcd.datacolumn = "nm";
  228. // cmb_judgrid의 INIT Dataset
  229. this.cmb_judgrid.innerdataset = "DS_INIT_cmb_judgrid";
  230. this.cmb_judgrid.codecolumn = "cd";
  231. this.cmb_judgrid.datacolumn = "nm";
  232. // combo14의 INIT Dataset
  233. this.combo14.innerdataset = "DS_INIT_combo14";
  234. this.combo14.codecolumn = "cdid";
  235. this.combo14.datacolumn = "cdnm";
  236. }
  237. function fInitialize(){
  238. DS_GRID_grd_deptlist.clearData();
  239. DS_GRID_grd_deptlist.addRow();
  240. // combo 전체 세팅
  241. // 보험유형
  242. group5.cmb_insukind.index = 0;
  243. // 진료분야
  244. group5.cmb_ordfildcd.index = 0;
  245. // 심사자
  246. group5.cmb_judgrid.index = 0;
  247. // 제출자료내역
  248. group5.combo14.index = 0;
  249. // 내원유형
  250. group5.combo1.index = 0;
  251. // 진료과
  252. group5.cmb_orddeptcd.index = 0;
  253. // 청구월 세팅
  254. var objDate = new Date();
  255. var lastMonth = objDate.addMonth(-1);
  256. lastMonth = objDate.toFormatString("%Y%m");
  257. group5.cmb_clamdg.value = "";
  258. group5.opt_insukind.value = "";
  259. group5.ipt_acptno.value = "";
  260. group5.ipt_docuseqno1.value = "";
  261. group5.ipt_docuseqno2.value = "";
  262. }
  263. function pidfGetClamdg() {
  264. var Month = group5.cp_monthCal00.cal_Month.value;
  265. var lastMonth = Month.toFormatString("%Y%m");
  266. var sInDsName = dsf_createDsRow("ds_cond"
  267. , [{col: "ioflag" , val: group5.combo1.value} //입원외래
  268. , {col: "clamym" , val: lastMonth} //청구년월
  269. , {col: "insukind", val: group5.cmb_insukind.value}]); //보험유형
  270. tranf_submit({ id : "TRPID20407"
  271. , service : "aftjudgapp.InAftJudgTrgtMan"
  272. , method : "reqGetClamdg"
  273. , inds : "req=ds_cond"
  274. , outds : "DS_INIT_cmb_clamdg=clamdg"
  275. , async : false});
  276. group5.cmb_clamdg.index = 0;
  277. }
  278. function SubMitListPrint(){
  279. DS_GRID_grd_deptlist.addColumn("hospitalnm" ,"string");
  280. DS_GRID_grd_deptlist.addColumn("insukindnm" ,"string");
  281. DS_GRID_grd_deptlist.addColumn("ordfildcd" ,"string");
  282. DS_GRID_grd_deptlist.addColumn("year" ,"string");
  283. DS_GRID_grd_deptlist.addColumn("month" ,"string");
  284. DS_GRID_grd_deptlist.addColumn("ioflag" ,"string");
  285. var ordfildcd = group5.cmb_ordfildcd.value;
  286. var ordfildcdRow = DS_INIT_cmb_ordfildcd.findRow("cdid", ordfildcd);
  287. var insukind = group5.cmb_insukind.value;
  288. var insukindRow = DS_INIT_cmb_insukind.findRow("cdid", insukind);
  289. var ioflag = group5.combo1.value;
  290. var ioflagRow = ds_init_ioflag.findRow("value", ioflag);
  291. var clamym = group5.cp_monthCal00.cal_Month.value;
  292. var year = clamym.toFormatString("%Y");
  293. var month = clamym.toFormatString("%m");
  294. for( var i = 0; i < DS_GRID_grd_deptlist.rowcount ; i++ ){
  295. DS_GRID_grd_deptlist.setColumn(i, "insukindnm" , DS_INIT_cmb_insukind.getColumn(insukindRow, "cdnm"));
  296. DS_GRID_grd_deptlist.setColumn(i, "ordfildcd" , DS_INIT_cmb_ordfildcd.getColumn(ordfildcdRow, "cdnm"));
  297. DS_GRID_grd_deptlist.setColumn(i, "ioflag" , ds_init_ioflag.getColumn(ioflagRow, "label"));
  298. DS_GRID_grd_deptlist.setColumn(i, "hospitalnm" , "순천향대학교병원");
  299. DS_GRID_grd_deptlist.setColumn(i, "year" , year);
  300. DS_GRID_grd_deptlist.setColumn(i, "month" , month);
  301. }
  302. var objDOM = rptf_createDOM(); // DOM 객체 설정
  303. rptf_setNodeListToDOM(objDOM, "root/temp/submitlist", DS_GRID_grd_deptlist); // 데이터셋 1
  304. var objParam = new Object();
  305. objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
  306. var option = "open=1;save=1;directprint=0;print=1;zoom=0;callno=0321234567;faxno=0323298384";
  307. rptf_exeReportPreview30(["RPPID25000"],[objParam], option);
  308. }
  309. // 특정내역 중 MT015, MT016 내역을 조회하여 "소명자료" Btn (첨부물 자료관리) Popup 화면에 표시한다.
  310. function fGetAttachedDataList()
  311. {
  312. var sppiz00200 = new Object();
  313. sppiz00200.sOpenflag = "S";
  314. frmf_open("SPPIZ00200", "SPPIZ00200", sppiz00200, "", "", "", "", "", "", "", "", "", "M");
  315. }
  316. function SPPID25000_onload(obj:Form, e:LoadEventInfo)
  317. {
  318. frmf_initForm(obj);
  319. grdf_initGrid(grd_deptlist);
  320. var clamym = opener.frmf_getParameter("clamym");
  321. var clamdg = opener.frmf_getParameter("clamdg");
  322. var insukindcd = opener.frmf_getParameter("insukindcd");
  323. var orddeptcd = opener.frmf_getParameter("orddeptcd");
  324. var ordfildcd = opener.frmf_getParameter("ordfildcd");
  325. var judgrid = opener.frmf_getParameter("judgrid");
  326. var ioflag = opener.frmf_getParameter("ioflag");
  327. // 월달력 이벤트 호출
  328. group5.cp_monthCal00.setCallEvent("fn_Cal");
  329. // 공통코드 조회
  330. appf_getCodeListSubmit([{cdGrpId: "P0008", dsNm: "DS_INIT_cmb_insukind" , sortField: "cdnm", sortMehotd: "desc"}
  331. ,{cdGrpId: "P0291", dsNm: "DS_INIT_cmb_ordfildcd" , sortField: "cdnm", sortMehotd: "desc"}
  332. ,{cdGrpId: "C0048", dsNm: "ds_init_hospitalnm" , sortField: "cdnm", sortMehotd: "desc"}
  333. ,{cdGrpId: "P0320", dsNm: "DS_INIT_combo14" , sortField: "cdnm", sortMehotd: "desc"}], true, false, "");
  334. var nRow = DS_INIT_cmb_ordfildcd.findRow("cdid", "");
  335. DS_INIT_cmb_ordfildcd.deleteRow(nRow);
  336. var iRow = DS_INIT_cmb_ordfildcd.insertRow(0);
  337. DS_INIT_cmb_ordfildcd.setColumn(iRow, "cdid", "");
  338. DS_INIT_cmb_ordfildcd.setColumn(iRow, "cdnm", "전체");
  339. group5.cmb_ordfildcd.index = 0;
  340. nRow = DS_INIT_cmb_ordfildcd.addRow();
  341. DS_INIT_cmb_ordfildcd.setColumn(nRow, "cdid", "1_1");
  342. DS_INIT_cmb_ordfildcd.setColumn(nRow, "cdnm", "심사1부");
  343. nRow = DS_INIT_cmb_ordfildcd.addRow();
  344. DS_INIT_cmb_ordfildcd.setColumn(nRow, "cdid", "1_2");
  345. DS_INIT_cmb_ordfildcd.setColumn(nRow, "cdnm", "심사2부")
  346. // 청구월 세팅
  347. var objDate = new Date();
  348. var lastMonth = objDate.addMonth(-1);
  349. lastMonth = objDate.toFormatString("%Y%m");
  350. var Month = group5.cp_monthCal00.cal_Month.value;
  351. var sclamym = Month.toFormatString("%Y%m");
  352. var sInDsName = dsf_createDsRow("ds_cond"
  353. , [{col: "ioflag" , val: group5.combo1.value}
  354. , {col: "clamym" , val: sclamym}
  355. , {col: "judgid" , val: group5.cmb_judgrid.value}
  356. , {col: "ordflag" , val: ""}]);
  357. tranf_submit({ id: "TRPID20201"
  358. , service: "aftjudgapp.InAftJudgTrgtMan"
  359. , method : "reqGetInitComCd"
  360. , inds : "req=ds_cond"
  361. , outds : "ds_init_judgrid=judgrid ds_init_orddeptcd=orddeptcd"
  362. , async : false});
  363. // 제출자료내역 99[기타] 추가
  364. frmf_addComboItem("group5.combo14", "99[free text]", "99", "below");
  365. // combo 전체 세팅
  366. // 보험유형
  367. frmf_addComboItem("group5.cmb_insukind", "급여전체", "2");
  368. frmf_addComboItem("group5.cmb_insukind", "건보+급여", "1");
  369. frmf_addComboItem("group5.cmb_insukind", "전체", "");
  370. group5.cmb_insukind.index = 0;
  371. // 심사자
  372. group5.cmb_judgrid.index = 0;
  373. // 제출자료내역
  374. frmf_addComboItem("group5.combo14", "전체", "");
  375. group5.combo14.index = 0;
  376. // 진료과
  377. group5.cmb_orddeptcd.index = 0;
  378. if(!utlf_isNull(clamym)){
  379. group5.cp_monthCal00.cal_Month.value = clamym;
  380. }else{
  381. group5.cp_monthCal00.cal_Month.value = lastMonth;
  382. }
  383. if(ioflag == "I"){
  384. group5.combo1.value = "I";
  385. }else{
  386. group5.combo1.index = 0;
  387. }
  388. pidfGetClamdg();
  389. if(!utlf_isNull(clamdg)){
  390. group5.cmb_clamdg.value = clamdg;
  391. }
  392. if(!utlf_isNull(insukindcd)){
  393. group5.cmb_insukind.value = insukindcd;
  394. group5.opt_insukind.value = insukindcd;
  395. }
  396. if(!utlf_isNull(orddeptcd)){
  397. group5.cmb_orddeptcd.value = orddeptcd;
  398. }
  399. if(!utlf_isNull(ordfildcd)){
  400. group5.cmb_ordfildcd.value = ordfildcd;
  401. }
  402. if(!utlf_isNull(judgrid)){
  403. group5.cmb_judgrid.value = judgrid;
  404. }
  405. }
  406. function fn_Cal(){
  407. pidfGetClamdg();
  408. }
  409. // X버튼
  410. function Button00_onclick(obj:Button, e:ClickEventInfo)
  411. {
  412. this.close();
  413. }
  414. // 제출자료목록코드조회
  415. function btn_attData_onclick(obj:Button, e:ClickEventInfo)
  416. {
  417. fGetAttachedDataList();
  418. }
  419. function group5_ipt_docuseqno1_ontextchanged(obj:Edit, e:TextChangedEventInfo)
  420. {
  421. var docuseqno1 = group5.ipt_docuseqno1.value;
  422. if (docuseqno1)
  423. {
  424. group5.ipt_docuseqno2.value = docuseqno1;
  425. group5.ipt_docuseqno2.updateToDataset();
  426. }
  427. }
  428. function group5_ipt_docuseqno1_onkeydown(obj:Edit, e:KeyEventInfo)
  429. {
  430. if(e.keycode == 13)
  431. {
  432. var e = new ClickEventInfo; //이벤트 선언
  433. var varRet = group5.ipt_docuseqno1.ontextchanged.fireEvent(group5.ipt_docuseqno1, e); //이벤트 매핑
  434. }
  435. }
  436. function button61_onclick(obj:Button, e:ClickEventInfo)
  437. {
  438. var ipt_pid = group5.ipt_patunitsrch.value;
  439. if (ipt_pid)
  440. {
  441. frmf_setParameter("srchcond", "1");// 검색조건 : 등록번호로 설정
  442. frmf_setParameter("pid", ipt_pid);
  443. }
  444. frmf_modal("SPPMC02500", "SPPMC02500");
  445. var objPopup = frmf_getChildWindow("SPPMC02500");
  446. if(utlf_isNull(objPopup))
  447. {
  448. objPopup.frmf_getParameter("pid");
  449. }else{
  450. alert("하위 화면이 변경되어 데이터를 가져올 수 없습니다.");
  451. }
  452. }
  453. function group5_combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  454. {
  455. pidfGetClamdg();
  456. }
  457. function btn_print_onclick(obj:Button, e:ClickEventInfo)
  458. {
  459. var clamym = group5.cp_monthCal00.cal_Month.value;
  460. var insukindcd = group5.cmb_insukind.value;
  461. var ordfildcd = group5.cmb_ordfildcd.value;
  462. if(clamym == null || clamym == "" || clamym == "-"){
  463. sysf_messageBox("청구년월이 선택되지 않았습니다. 출력하시려면 청구년월을 선택한 후 재조회 해주세요.", "E999", "");
  464. return;
  465. }
  466. if(insukindcd == null || insukindcd == "" || insukindcd == "-"){
  467. sysf_messageBox("보험유형이 선택되지 않았습니다. 출력하시려면 보험유형을 선택한 후 재조회 해주세요.", "E999", "");
  468. return;
  469. }
  470. if(ordfildcd == null || ordfildcd == "" || ordfildcd == "-"){
  471. sysf_messageBox("진료분야가 선택되지 않았습니다. 출력하시려면 진료분야을 선택한 후 재조회 해주세요.", "E999", "");
  472. return;
  473. }
  474. if (DS_GRID_grd_deptlist.getRowCount() > 0) {
  475. SubMitListPrint();
  476. } else {
  477. sysf_messageBox("출력할 대상자가", "I004"); /// 대상자가 없습니다.
  478. }
  479. }
  480. function btn_clear_onclick(obj:Button, e:ClickEventInfo)
  481. {
  482. fInitialize();
  483. }
  484. function group5_btn_search_onclick(obj:Button, e:ClickEventInfo)
  485. {
  486. if (group5.cp_monthCal00.cal_Month.value == null || group5.cmb_clamdg.value == null)
  487. {
  488. sysf_messageBox("청구년월, 청구차수는", "I003"); //I003=필수입력입니다.
  489. return;
  490. }
  491. var Month = group5.cp_monthCal00.cal_Month.value;
  492. var sclamym = Month.toFormatString("%Y%m");
  493. var sInDsName = dsf_createDsRow("ds_cond"
  494. , [{col: "clamym", val: sclamym}
  495. , {col: "clamdg", val: group5.cmb_clamdg.value}
  496. , {col: "insukindcd", val: group5.cmb_insukind.value}
  497. , {col: "ordfildcd", val: group5.cmb_ordfildcd.value}
  498. , {col: "judgrid", val: group5.cmb_judgrid.value}
  499. , {col: "patunitsrch1", val: group5.ipt_patunitsrch.value}
  500. , {col: "spclspec", val: group5.combo14.value}
  501. , {col: "ioflag", val: group5.combo1.value}
  502. , {col: "orddeptcd", val: group5.cmb_orddeptcd.value}
  503. , {col: "docuseqno1", val: group5.ipt_docuseqno1.value}
  504. , {col: "docuseqno2", val: group5.ipt_docuseqno2.value}
  505. , {col: "clamno", val: group5.ipt_acptno.value}
  506. , {col: "tfyn", val: group5.chk_tfyn.value}
  507. ]);
  508. tranf_submit({
  509. id: "TRPID25001"
  510. , service: "aftjudgapp.InAftJudgTrgtMan"
  511. , method: "reqGetSubmitDatalist"
  512. , inds : "req=ds_cond"
  513. , outds: "DS_GRID_grd_deptlist=submitlist"
  514. , async: false
  515. });
  516. }
  517. function group5_cmb_insukind_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  518. {
  519. group5.opt_insukind.value = group5.cmb_insukind.value;
  520. }
  521. function btn_excelsave_onclick(obj:Button, e:ClickEventInfo)
  522. {
  523. // var ExtObj = new ExtCommon();
  524. // var aaa = ExtObj.getSystemDir("Desktop");
  525. var userHomeDir = system.convertRealPath("%MYDOCUMENT%");
  526. var preFilePath = userHomeDir;
  527. var desktopPath = userHomeDir.replace("Documents", "Desktop");
  528. if ( DS_GRID_grd_deptlist.rowcount > 0 ) {
  529. //grdf_exportExcel(grd_deptlist, "사후심사제출자료목록대상", "사후심사제출자료목록대상",true,desktopPath);
  530. grdf_exportExcel(grd_deptlist, "사후심사제출자료목록대상", "sheet1",true,"",desktopPath, false); //파일 다이얼로그로 저장위치 저장
  531. //sysf_messageBox(desktopPath+"사후심사제출자료목록대상.xls 엑셀저장", "I002");
  532. } else {
  533. //엑셀저장할 자료가 없습니다.
  534. sysf_messageBox("엑셀저장할 자료가", "I004");
  535. }
  536. }
  537. function group5_onkeydown(obj:Div, e:KeyEventInfo)
  538. {
  539. if (e.keycode == 13) {
  540. group5.btn_search.click();
  541. }
  542. }
  543. function btn_no_onclick(obj:Button, e:ClickEventInfo)
  544. {
  545. ds_patinfolist.clearData();
  546. ds_send_param.setColumn(0, "srchcond", "1");
  547. ds_send_param.setColumn(0, "pid", group5.ipt_patunitsrch.value);
  548. var objArgs = new Object();
  549. objArgs.arg_ds_send = ds_send_param;
  550. frmf_modal("SPPMC02500", "SPPMC02500", objArgs, "", "", "", "", "", "", "", "", "", "M");
  551. if (ds_patinfolist.rowcount > 0) {
  552. group5.ipt_patunitsrch.value = ds_patinfolist.getColumn(0,"pid")
  553. }
  554. }
  555. function grd_deptlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  556. {
  557. var clamym = DS_GRID_grd_deptlist.getColumn(e.row, "clamym");
  558. var clamdg = DS_GRID_grd_deptlist.getColumn(e.row, "clamdg");
  559. var pid = DS_GRID_grd_deptlist.getColumn(e.row, "pid");
  560. var pidsn = DS_GRID_grd_deptlist.getColumn(e.row, "pidsn");
  561. var patnm = DS_GRID_grd_deptlist.getColumn(e.row, "patnm");
  562. var acptno = DS_GRID_grd_deptlist.getColumn(e.row, "acptno");
  563. var docuseqno = DS_GRID_grd_deptlist.getColumn(e.row, "docuseqno");
  564. var orddeptcd = DS_GRID_grd_deptlist.getColumn(e.row, "orddeptcd");
  565. var ioflag = DS_GRID_grd_deptlist.getColumn(e.row, "ioflag");
  566. ds_cond_sppid32000.clearData();
  567. ds_cond_sppid32000.addRow();
  568. ds_cond_sppid32000.setColumn(0, "clamym", clamym);
  569. ds_cond_sppid32000.setColumn(0, "clamdg", clamdg);
  570. ds_cond_sppid32000.setColumn(0, "pid", pid);
  571. ds_cond_sppid32000.setColumn(0, "pidsn", pidsn);
  572. ds_cond_sppid32000.setColumn(0, "patnm", patnm);
  573. ds_cond_sppid32000.setColumn(0, "acptno", acptno);
  574. ds_cond_sppid32000.setColumn(0, "docuseqno", docuseqno);
  575. ds_cond_sppid32000.setColumn(0, "orddeptcd", orddeptcd);
  576. ds_cond_sppid32000.setColumn(0, "ioflag", ioflag);
  577. frmf_modal("SPPID32000","SPPID32000", {objDs:ds_cond_sppid32000}, "", "", "", "", "", "", "", "", "", "M");
  578. }
  579. function btn_hiraef_onclick(obj:Button, e:ClickEventInfo)
  580. {
  581. var sppid32100 = new Object();
  582. sppid32100.sOpenflag = "S";
  583. frmf_open("SPPID32100", "SPPID32100", {objDs:ds_cond}, "", "", "", "", "", "", "", "", "", "M");
  584. }
  585. ]]></Script>
  586. </Form>
  587. </FDL>