SMPPI01200_허가초과 비급여약제관리.xfdl 37 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMPPI00800" position="absolute 0 0 960 908" titletext="사전신청항암제관리" oninit="SMPPI00800_oninit" onload="SMPPI00800_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 23 942 615" id="grp_biz" scrollbars="autoboth" anchor="all">
  8. <Layouts>
  9. <Layout>
  10. <Grid position="absolute 0 78 940 592" id="grd_bfaclist" class="datagrid3" binddataset="ds_grd_bfaclist" autofittype="col" anchor="all" cellsizingtype="col" onexpanddown="grp_biz_grd_bfaclist_onexpanddown" autoenter="select" selecttype="multirow" oncloseup="grp_biz_grd_bfaclist_oncloseup" ondropdown="grp_biz_grd_bfaclist_ondropdown" oncellclick="grp_biz_grd_bfaclist_oncellclick">
  11. <Formats>
  12. <Format id="default">
  13. <Columns>
  14. <Column size="25"/>
  15. <Column size="132"/>
  16. <Column size="97"/>
  17. <Column size="108"/>
  18. <Column size="75"/>
  19. <Column size="55"/>
  20. <Column size="77"/>
  21. <Column size="75"/>
  22. <Column size="180"/>
  23. <Column size="0"/>
  24. <Column size="0"/>
  25. <Column size="0"/>
  26. <Column size="0"/>
  27. <Column size="0"/>
  28. </Columns>
  29. <Rows>
  30. <Row size="38" band="head"/>
  31. <Row size="24"/>
  32. </Rows>
  33. <Band id="head">
  34. <Cell/>
  35. <Cell col="1" text="명칭"/>
  36. <Cell col="2" text="IPB 승인일자"/>
  37. <Cell col="3" text="신청진료과"/>
  38. <Cell col="4" text="신청일자"/>
  39. <Cell col="5" text="승인구분"/>
  40. <Cell col="6" text="심사자"/>
  41. <Cell col="7" text="종료일자"/>
  42. <Cell col="8" text="비고"/>
  43. <Cell col="9" text="등록자"/>
  44. <Cell col="10" text="등록일자"/>
  45. <Cell col="11" text="수정자"/>
  46. <Cell col="12" text="수정일자"/>
  47. <Cell col="13" text="instcd"/>
  48. </Band>
  49. <Band id="body">
  50. <Cell celltype="head"/>
  51. <Cell col="1" displaytype="text" edittype="text" style="align:left middle;" text="bind:aprvnm" editimemode="none" editautoselect="true" enable="false"/>
  52. <Cell col="2" displaytype="date" edittype="date" style="align:left middle;" text="bind:aprvdd"/>
  53. <Cell col="3" displaytype="combo" edittype="expr:ds_grd_bfaclist.getRowType(currow) == 1 ? &quot;none&quot; : &quot;combo&quot;" style="align:left middle;" text="bind:orddeptcd" combodataset="ds_cond_deptinfolist" combocodecol="cd" combodatacol="nm" combodisplayrowcount="100" enable="false"/>
  54. <Cell col="4" displaytype="date" edittype="expr:ds_grd_bfaclist.getRowType(currow) == 1 ? &quot;none&quot; : &quot;date&quot;" style="align:center middle;" text="bind:fromdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext" enable="false"/>
  55. <Cell col="5" displaytype="combo" edittype="combo" style="align:center;" text="bind:aprvcd" combodataset="ds_cmb_aprvcd" combocodecol="cd" combodatacol="nm"/>
  56. <Cell col="6" displaytype="combo" edittype="combo" text="bind:judgrid" combodataset="ds_cond_judgrid" combocodecol="judgrid" combodatacol="judgrnm" combodisplayrowcount="100"/>
  57. <Cell col="7" displaytype="date" edittype="date" style="align:center middle;" text="bind:todd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
  58. <Cell col="8" displaytype="text" edittype="text" style="align:left middle;" text="bind:rem"/>
  59. <Cell col="9" displaytype="text" edittype="text" style="align:center middle;" text="bind:fstrgstrid"/>
  60. <Cell col="10" displaytype="date" edittype="date" style="align:center middle;" text="bind:fstrgstdt" mask="yyyy-MM-dd hh:mm" calendardisplaynulltype="nulltext"/>
  61. <Cell col="11" style="align:center middle;" text="bind:lastupdtrid"/>
  62. <Cell col="12" displaytype="date" edittype="date" text="bind:lastupdtdt" mask="yyyy-MM-dd hh:mm" calendardisplaynulltype="nulltext"/>
  63. <Cell col="13" text="bind:instcd"/>
  64. </Band>
  65. </Format>
  66. </Formats>
  67. </Grid>
  68. <Static text="허가초과 비급여약제 및 사전신청항암제 관리" position="absolute 0 56 304 79" id="cap_judgtrgtman" class="tit_2" anchor="default"/>
  69. <Shape position="absolute 0 69 940 83" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  70. <Div position="absolute 0 -1 940 39" align="align:center top;" id="group1" class="div_SA" anchor="left top right">
  71. <Layouts>
  72. <Layout>
  73. <Button id="button00" taborder="39" class="icon_search" position="absolute 699 20 715 36" visible="false" anchor="left top"/>
  74. <Button position="absolute 875 10 931 32" id="btn_select" class="btn1" taborder="32" text="조회" anchor="top right" onclick="grp_biz_group1_btn_select_onclick"/>
  75. <Shape position="absolute 857 5 863 38" linetype="vertical" id="line3" class="line_4" anchor="top right"/>
  76. <Static text="수가코드 :" position="absolute 352 12 447 29" id="caption30" class="search_name" anchor="left top"/>
  77. <Edit position="absolute 439 10 514 29" id="ipt_calcscorcd" anchor="left top" onkeydown="grp_biz_group1_input1_onkeydown" inputmode="upper" imemode="alpha"/>
  78. <Button id="button17" taborder="35" onclick="group2_button17_onclick" class="icon_search" position="absolute 516 12 532 28" anchor="left top"/>
  79. <Static id="caption00" text="명칭 :" class="search_name" position="absolute 8 12 58 29" anchor="left top"/>
  80. <Edit id="ipt_aprvnm" taborder="36" position="absolute 56 10 131 29" onkeydown="grp_biz_group1_ipt_aprvnm_onkeydown" useime="global" imemode="hangul" anchor="left top"/>
  81. <Static id="caption01" text="IPB 승인일자 :" class="search_name" position="absolute 141 12 246 29" onclick="grp_biz_group1_caption01_onclick" anchor="left top"/>
  82. <Calendar id="ipt_aprvdd" taborder="37" position="absolute 244 10 344 30" anchor="left top"/>
  83. <Static id="caption02" text="상병코드 :" class="search_name" position="absolute 540 12 635 29" anchor="left top"/>
  84. <Edit id="ipt_diagcd" taborder="38" imemode="alpha" inputmode="upper" onkeydown="grp_biz_group1_input1_onkeydown" position="absolute 627 10 702 29" anchor="left top"/>
  85. <Static id="caption03" text="심사자 :" class="search_name" position="absolute 713 11 771 28" onclick="grp_biz_group1_caption03_onclick" anchor="left top"/>
  86. <Combo id="cmd_judgrid" taborder="40" position="absolute 776 10 847 30" index="-1" innerdataset="@ds_cond_judgrid" codecolumn="judgrid" datacolumn="judgrnm" anchor="left top"/>
  87. </Layout>
  88. </Layouts>
  89. </Div>
  90. <Button position="absolute 700 53 777 72" id="btn_excelsave" class="btn7" text="엑셀저장" anchor="top right" onclick="grp_biz_btn_excelsave_onclick"/>
  91. <Button position="absolute 886 53 940 72" id="button1" class="btn3" text="저장" anchor="top right" onclick="grp_biz_button1_onclick"/>
  92. <Button position="absolute 778 53 831 72" id="button2" class="btn2" text="행삭제" anchor="top right" onclick="grp_biz_button2_onclick"/>
  93. <Button position="absolute 832 53 885 72" id="button3" class="btn2" text="행추가" anchor="top right" onclick="grp_biz_button3_onclick"/>
  94. </Layout>
  95. </Layouts>
  96. </Div>
  97. <Button position="absolute 884 883 940 905" id="btn_cancel" class="btn4" text="종료" onclick="btn_cancel_onclick" anchor="right bottom"/>
  98. <Static id="cap_title" text="허가초과 비급여약제 및 사전신청항암제 관리" class="tit_1" position="absolute 0 0 308 23" onclick="cap_title_onclick"/>
  99. <Grid id="grd_bfsclist" taborder="1" useinputpanel="false" position="absolute 456 646 940 882" binddataset="ds_grd_bfsclist" onexpanddown="grd_bfsclist_onexpanddown" autoenter="select" selecttype="multirow" onenterdown="grd_bfsclist_onenterdown">
  100. <Formats>
  101. <Format id="default">
  102. <Columns>
  103. <Column size="25"/>
  104. <Column size="98"/>
  105. <Column size="170"/>
  106. <Column size="147"/>
  107. <Column size="87"/>
  108. <Column size="87"/>
  109. <Column size="0"/>
  110. </Columns>
  111. <Rows>
  112. <Row size="24" band="head"/>
  113. <Row size="24"/>
  114. </Rows>
  115. <Band id="head">
  116. <Cell/>
  117. <Cell col="1" text="수가코드"/>
  118. <Cell col="2" text="한글명"/>
  119. <Cell col="3" text="성분명"/>
  120. <Cell col="4" text="시작일자"/>
  121. <Cell col="5" text="종료일자"/>
  122. <Cell col="6" text="승인번호"/>
  123. </Band>
  124. <Band id="body">
  125. <Cell celltype="head"/>
  126. <Cell col="1" displaytype="text" edittype="expr:ds_grd_bfsclist.getRowType(currow) == 1 ? &quot;readonly&quot; : &quot;text&quot;" editfilter="upper,number,char" text="bind:calcscorcd" editimemode="alpha" expandshow="show"/>
  127. <Cell col="2" edittype="expr:ds_grd_bfsclist.getRowType(currow) == 1 ? &quot;readonly&quot; : &quot;text&quot;" style="align:left middle;" text="bind:hngnm" editimemode="hangul"/>
  128. <Cell col="3" style="align:left middle;" text="bind:comnm"/>
  129. <Cell col="4" displaytype="date" edittype="expr:expr:expr:ds_grd_bfdilist.getRowType(currow) == 1 ? &quot;readonly&quot; : &quot;date&quot;" text="bind:fromdd"/>
  130. <Cell col="5" displaytype="date" edittype="date" text="bind:todd"/>
  131. <Cell col="6"/>
  132. </Band>
  133. </Format>
  134. </Formats>
  135. </Grid>
  136. <Grid id="grd_bfdilist" taborder="2" useinputpanel="false" position="absolute 0 646 435 880" binddataset="ds_grd_bfdilist" autoenter="select" onexpanddown="grd_bfdilist_onexpanddown" onenterdown="grd_bfdilist_onenterdown" selecttype="multirow">
  137. <Formats>
  138. <Format id="default">
  139. <Columns>
  140. <Column size="25"/>
  141. <Column size="60"/>
  142. <Column size="160"/>
  143. <Column size="87"/>
  144. <Column size="87"/>
  145. <Column size="0"/>
  146. </Columns>
  147. <Rows>
  148. <Row size="24" band="head"/>
  149. <Row size="24"/>
  150. </Rows>
  151. <Band id="head">
  152. <Cell/>
  153. <Cell col="1" text="상병코드"/>
  154. <Cell col="2" text="상병명"/>
  155. <Cell col="3" text="시작일자"/>
  156. <Cell col="4" text="종료일자"/>
  157. <Cell col="5" text="승인번호"/>
  158. </Band>
  159. <Band id="body">
  160. <Cell celltype="head"/>
  161. <Cell col="1" displaytype="text" edittype="expr:expr:ds_grd_bfdilist.getRowType(currow) == 1 ? &quot;readonly&quot; : &quot;text&quot;" editfilter="upper,number,char" text="bind:diagcd" editimemode="alpha" expandshow="show"/>
  162. <Cell col="2" displaytype="text" text="bind:diagnm"/>
  163. <Cell col="3" displaytype="date" edittype="expr:expr:ds_grd_bfdilist.getRowType(currow) == 1 ? &quot;readonly&quot; : &quot;date&quot;" text="bind:fromdd"/>
  164. <Cell col="4" displaytype="date" edittype="date" text="bind:todd"/>
  165. <Cell col="5" text="bind:seq"/>
  166. </Band>
  167. </Format>
  168. </Formats>
  169. </Grid>
  170. <Static id="cap_judgtrgtman" text="상병 리스트" class="tit_2" position="absolute 0 625 234 648"/>
  171. <Static id="cap_judgtrgtman00" text="수가코드 리스트" class="tit_2" position="absolute 456 625 690 648"/>
  172. <Shape id="line00" class="line_1" position="absolute 0 637 435 651" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
  173. <Shape id="line01" class="line_1" position="absolute 456 637 940 651" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
  174. <Button id="btn_bfdidel" taborder="3" text="행삭제" class="btn2" position="absolute 328 622 381 641" anchor="top right" onclick="btn_bfdidel_onclick"/>
  175. <Button id="btn_bfdiadd" taborder="4" text="행추가" class="btn2" position="absolute 382 622 435 641" anchor="top right" onclick="btn_bfdiadd_onclick"/>
  176. <Button id="btn_dfscdel" taborder="5" text="행삭제" class="btn2" position="absolute 832 622 885 641" anchor="top right" onclick="btn_dfscdel_onclick"/>
  177. <Button id="btn_bfscadd" taborder="6" text="행추가" class="btn2" position="absolute 886 622 939 641" anchor="top right" onclick="btn_bfscadd_onclick"/>
  178. <Button id="btn_bfdisave" taborder="7" text="저장" class="btn3" position="absolute 274 622 327 641" anchor="top right" onclick="btn_bfdisave_onclick"/>
  179. <Button id="btn_bfscsave" taborder="8" text="저장" class="btn3" position="absolute 778 622 831 641" anchor="top right" onclick="btn_bfscsave_onclick"/>
  180. </Layout>
  181. </Layouts>
  182. <Objects>
  183. <Dataset id="ds_grd_bfaclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  184. <ColumnInfo>
  185. <Column id="rulecd" type="STRING"/>
  186. <Column id="typecd" type="STRING"/>
  187. <Column id="pid" type="STRING"/>
  188. <Column id="patnm" type="STRING"/>
  189. <Column id="fromdd" type="STRING"/>
  190. <Column id="todd" type="STRING"/>
  191. <Column id="cmnt" type="STRING"/>
  192. <Column id="fstrgstrid" type="STRING"/>
  193. <Column id="fstrgstdt" type="STRING"/>
  194. <Column id="lastupdtrid" type="STRING"/>
  195. <Column id="lastupdtdt" type="STRING"/>
  196. </ColumnInfo>
  197. </Dataset>
  198. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  199. <ColumnInfo>
  200. <Column id="typecd" type="STRING" size="256"/>
  201. <Column id="hngnm" type="STRING" size="256"/>
  202. </ColumnInfo>
  203. <Rows>
  204. <Row/>
  205. <Row/>
  206. <Row/>
  207. </Rows>
  208. </Dataset>
  209. <Dataset id="ds_cond_orddrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  210. <Dataset id="ds_cond_deptinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  211. <FilteredDataset id="ds_init_orddrid" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_cond_orddrid"/>
  212. <Dataset id="ds_cmb_aprvcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  213. <ColumnInfo>
  214. <Column id="cd" type="STRING" size="256"/>
  215. <Column id="nm" type="STRING" size="256"/>
  216. </ColumnInfo>
  217. <Rows>
  218. <Row>
  219. <Col id="cd">0</Col>
  220. <Col id="nm">불승인</Col>
  221. </Row>
  222. <Row>
  223. <Col id="cd">1</Col>
  224. <Col id="nm">승인</Col>
  225. </Row>
  226. <Row>
  227. <Col id="cd">2</Col>
  228. <Col id="nm">부분승인</Col>
  229. </Row>
  230. </Rows>
  231. </Dataset>
  232. <FilteredDataset id="ds_grd_orddrid" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_cond_orddrid"/>
  233. <Dataset id="ds_cond_judgrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  234. <Dataset id="ds_grd_bfdilist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  235. <Dataset id="ds_grd_bfsclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  236. <Dataset id="ds_send_item2_grdsrchnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  237. <ColumnInfo>
  238. <Column id="iptsearch" type="STRING" size="256"/>
  239. <Column id="searchkind" type="STRING" size="256"/>
  240. </ColumnInfo>
  241. <Rows>
  242. <Row/>
  243. </Rows>
  244. </Dataset>
  245. <Dataset id="ds_temp_calcdiagnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  246. <Dataset id="ds_hidden_sppiz00400_rslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  247. <Dataset id="ds_init3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  248. </Objects>
  249. <Bind/>
  250. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  251. * System Name :
  252. * Job Name :
  253. * Creator :
  254. * Make Date : 2016-05-24
  255. * Description :
  256. *---------------------------------------------------------------------------------------
  257. * Modify Date Modifier Modify Description
  258. *---------------------------------------------------------------------------------------
  259. * 2016-05-24 Live Converter TF->XP
  260. *
  261. *---------------------------------------------------------------------------------------
  262. ****************************************************************************************/
  263. include "com_commonxp::comm_main.xjs";
  264. include "pam_pamcomnxp::PAM001.xjs";
  265. function SMPPI00800_oninit(obj:Form, e:InitEventInfo)
  266. {
  267. frmf_initForm(obj);
  268. }
  269. function SMPPI00800_onload(obj:Form, e:LoadEventInfo)
  270. {
  271. grdf_initGrid(grp_biz.grd_bfaclist);
  272. grdf_initGrid(grd_bfdilist);
  273. grdf_initGrid(grd_bfsclist);
  274. grdf_setRowTypeIcon(grp_biz.grd_bfaclist, 0);
  275. grdf_setRowTypeIcon(grd_bfdilist, 0);
  276. grdf_setRowTypeIcon(grd_bfsclist, 0);
  277. fInitialize();
  278. }
  279. function fInitialize(){
  280. // 진료과, 주치의
  281. var sInDsName = dsf_createDsRow("ds_cond",[{col: "ioflag", val: ""}]);
  282. var oParam = {};
  283. oParam.id = "TRPID20201";
  284. oParam.service = "aftjudgapp.InAftJudgTrgtMan";
  285. oParam.method = "reqGetInitComCd";
  286. oParam.inds = "req=ds_cond";
  287. oParam.outds = "ds_cond_judgrid=judgrid ds_=suppkind ds_=orddrid ds_cond_orddrid=orddrid2 ds_=clamdept ds_=orddeptcd ds_cond_deptinfolist=orddeptcd2 ds_=item3 ds_=clamdg ds_=aftjudgerr ds_=uuee";
  288. oParam.async = false;
  289. tranf_submit(oParam);
  290. fGetDocuList();
  291. }
  292. function fGetDocuList(){
  293. dsf_createDsRow("ds_send1", [{col:"instcd", type:"STRING", size:256, val: sysf_getUserInfo("dutplceinstcd")}
  294. , {col:"diagcd", type:"STRING", size:256, val: grp_biz.group1.ipt_diagcd.value}
  295. , {col:"calcscorcd", type:"STRING", size:256, val: grp_biz.group1.ipt_calcscorcd.value}
  296. , {col:"aprvdd", type:"STRING", size:256, val: grp_biz.group1.ipt_aprvdd.value}
  297. , {col:"aprvnm", type:"STRING", size:256, val: grp_biz.group1.ipt_aprvnm.value}
  298. , {col:"judgrid", type:"STRING", size:256, val: grp_biz.group1.cmd_judgrid.value}
  299. ]);
  300. var oParam = {};
  301. oParam.id = "TRPPI01001";
  302. oParam.service = "bfjudgcareapp.BfJudgCareMngt";
  303. oParam.method = "reqGetAppAnticncrList";
  304. oParam.inds = "req=ds_send1";
  305. oParam.outds = "ds_grd_bfaclist=rslt";
  306. oParam.async = false;
  307. oParam.callback = "cf_TRPPI01001";
  308. tranf_submit(oParam);
  309. }
  310. function cf_TRPPI01001(sSvcId, nErrorCode, sErrorMsg) {
  311. if(nErrorCode < 0) return;
  312. ds_grd_bfaclist.rowposition = -1;
  313. ds_grd_bfdilist.clearData();
  314. ds_grd_bfsclist.clearData();
  315. }
  316. function grp_biz_group1_btn_select_onclick(obj:Button, e:ClickEventInfo)
  317. {
  318. fGetDocuList()
  319. }
  320. function grp_biz_group1_input1_onkeydown(obj:Edit, e:KeyEventInfo)
  321. {
  322. if(e.keycode == 13)
  323. {
  324. fGetDocuList();
  325. }
  326. }
  327. function grp_biz_group1_ipt_cd_name_onkeydown(obj:Edit, e:KeyEventInfo)
  328. {
  329. if(e.keycode == 13)
  330. {
  331. fGetDocuList();
  332. }
  333. }
  334. function grp_biz_group1_input2_onkeydown(obj:Edit, e:KeyEventInfo)
  335. {
  336. if(e.keycode == 13)
  337. {
  338. fGetDocuList();
  339. }
  340. }
  341. function grp_biz_btn_excelsave_onclick(obj:Button, e:ClickEventInfo)
  342. {
  343. if (ds_grd_bfaclist.rowcount > 0) {
  344. grdf_exportExcel(grp_biz.grd_bfaclist, "exportExcel", "see");
  345. } else {
  346. sysf_messageBox("엑셀저장할 내역이", "I004"); ///엑셀저장할 내역이 없습니다.
  347. }
  348. }
  349. function grp_biz_button2_onclick(obj:Button, e:ClickEventInfo)
  350. {
  351. fSpclGridDeleteRow();
  352. }
  353. function fSpclGridDeleteRow(){
  354. var SelectedRows = grdf_getSelectedRows(grp_biz.grd_bfaclist);
  355. grdf_setStatus(grp_biz.grd_bfaclist, "D", SelectedRows);
  356. ds_grd_bfaclist.updatecontrol = false;
  357. for(var i=0; i < SelectedRows.length; i++) {
  358. ds_grd_bfaclist.setColumn(SelectedRows[i], "todd", utlf_getCurrentDate());
  359. }
  360. ds_grd_bfaclist.updatecontrol = true;
  361. }
  362. function grp_biz_button3_onclick(obj:Button, e:ClickEventInfo)
  363. {
  364. fSpclGridInsertRow();
  365. }
  366. function fSpclGridInsertRow()
  367. {
  368. var addRw = ds_grd_bfaclist.addRow();
  369. ds_grd_bfaclist.setColumn(addRw,"fromdd", utlf_getCurrentDate());
  370. ds_grd_bfaclist.setColumn(addRw,"aprvdd", utlf_getCurrentDate());
  371. ds_grd_bfaclist.setColumn(addRw,"aprvcd", 1);
  372. ds_grd_bfaclist.setColumn(addRw,"todd", "99991231");
  373. ds_grd_bfaclist.setColumn(addRw,"instcd", sysf_getUserInfo("dutplceinstcd"));
  374. return addRw;
  375. }
  376. function grp_biz_button1_onclick(obj:Button, e:ClickEventInfo)
  377. {
  378. var updtdata = grdf_getGridUpdateData(grp_biz.grd_bfaclist);
  379. if ( updtdata.rowcount == 0)
  380. {
  381. sysf_messageBox("변경된 데이터가","I004");
  382. return;
  383. }
  384. for (var i = ds_grd_bfaclist.rowcount-1; i >= 0; i--)
  385. {
  386. var calcscorcd = ds_grd_bfaclist.getColumn(i,"aprvnm");
  387. if (ds_grd_bfaclist.getRowType(i) == 8 && utlf_isNull(calcscorcd)) {
  388. ds_grd_bfaclist.deleteRow(i);
  389. }
  390. }
  391. for (var i = ds_grd_bfaclist.rowcount-1; i >= 0; i--)
  392. {
  393. if (ds_grd_bfaclist.getRowType(i) == 2 || ds_grd_bfaclist.getRowType(i) == 4 )
  394. {
  395. var aprvnm = grp_biz.grd_bfaclist.getBindCellIndex("body","aprvnm");
  396. var aprvdd = grp_biz.grd_bfaclist.getBindCellIndex("body","aprvdd");
  397. var aprvcd = grp_biz.grd_bfaclist.getBindCellIndex("body","aprvcd");
  398. var orddeptcd = grp_biz.grd_bfaclist.getBindCellIndex("body","orddeptcd");
  399. var judgrid = grp_biz.grd_bfaclist.getBindCellIndex("body","judgrid");
  400. var fromdd = grp_biz.grd_bfaclist.getBindCellIndex("body","fromdd");
  401. var todd = grp_biz.grd_bfaclist.getBindCellIndex("body","todd");
  402. if(!frmf_chkMdtGrid(grp_biz.grd_bfaclist,[aprvnm,aprvdd,aprvcd,orddeptcd,judgrid,fromdd,todd],["명칭","승인일자","승인구분","진료과","심사자","신청일자","종료일자"]))
  403. {
  404. return;
  405. }
  406. }
  407. }
  408. if (sysf_messageBox("저장", "S001") == 6)
  409. {
  410. var oParam = {};
  411. oParam.id = "TXPPI01001";
  412. oParam.service = "bfjudgcareapp.BfJudgCareMngt";
  413. oParam.method = "reqExeAppAnticncrList";
  414. oParam.inds = "req=ds_grd_bfaclist:U";
  415. oParam.outds = "ds_grd_bfaclist=rslt";
  416. oParam.async = false;
  417. oParam.callback = "cf_TXPPI01001";
  418. tranf_submit(oParam);
  419. }
  420. }
  421. function cf_TXPPI01001(sSvcId, nErrorCode, sErrorMsg) {
  422. if(nErrorCode < 0) return;
  423. fGetDocuList();
  424. }
  425. function btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  426. {
  427. this.close();
  428. }
  429. function grp_biz_group1_cmb_deptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  430. {
  431. if (utlf_isNull(obj.value)) {
  432. ds_init_orddrid.filterstr = "";
  433. } else {
  434. ds_init_orddrid.filterstr = "dp=='" + obj.value+ "'";
  435. }
  436. }
  437. function group2_button17_onclick(obj:Button, e:ClickEventInfo)
  438. {
  439. grp_biz.group1.ipt_calcscorcd.updateToDataset();
  440. dsf_createDsRow("ds_receivedata" , [{col: "srchdrugcd", val: grp_biz.group1.ipt_calcscorcd.value}
  441. ,{col: "con4_search2", val: grp_biz.group1.ipt_calcscorcd.value}
  442. ,{col: "con3_search1", val: "hngnm"}]);
  443. var objArg = new Object();
  444. objArg.arg_ds_temp = ds_receivedata;
  445. frmf_setParameter("openflag", "hngnm");
  446. var objRtn = frmf_modal("SMPIC00200", "SMPIC00200", objArg, "", "", "", "", "", "", "", "", "", "M");
  447. ds_temp_picmmech.copyData(objRtn);
  448. if (ds_temp_picmmech.rowcount > 0)
  449. {
  450. var vprcpcd = ds_temp_picmmech.getColumn(0,"picmmech_calcscorcd");
  451. grp_biz.group1.ipt_calcscorcd.value = vprcpcd;
  452. ds_temp_picmmech.clearData();
  453. }
  454. }
  455. function grp_biz_grd_bfaclist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
  456. {
  457. if (ds_grd_bfaclist.getRowType(e.row) != 1 ) {
  458. dsf_createDsRow("ds_receivedata" , [{col: "srchdrugcd", val: ds_grd_bfaclist.getColumn(ds_grd_bfaclist.rowposition,"calcscorcd")}
  459. ,{col: "con4_search2", val: ds_grd_bfaclist.getColumn(ds_grd_bfaclist.rowposition,"calcscorcd")}
  460. ,{col: "con3_search1", val: "hngnm"}]);
  461. var objArg = new Object();
  462. objArg.arg_ds_temp = ds_receivedata;
  463. frmf_setParameter("openflag", "hngnm");
  464. var objRtn = frmf_modal("SMPIC00200", "SMPIC00200", objArg, "", "", "", "", "", "", "", "", "", "M");
  465. ds_temp_picmmech.copyData(objRtn);
  466. if (ds_temp_picmmech.rowcount > 0)
  467. {
  468. var currrow = ds_grd_bfaclist.rowposition;
  469. for (var i=0; i < ds_temp_picmmech.rowcount; i++ ) {
  470. var vprcpcd = ds_temp_picmmech.getColumn(i,"picmmech_calcscorcd");
  471. var vprcpnm = ds_temp_picmmech.getColumn(i,"picmmech_engnm");
  472. var vedicd = ds_temp_picmmech.getColumn(i,"picmmech_insuedicd");
  473. var vcomnm = ds_temp_picmmech.getColumn(i,"comnm");
  474. ds_grd_bfaclist.setColumn(currrow,"calcscorcd", vprcpcd);
  475. ds_grd_bfaclist.setColumn(currrow,"hngnm", vprcpnm);
  476. ds_grd_bfaclist.setColumn(currrow,"edicd", vedicd);
  477. //ds_grd_bfaclist.setColumn(currrow,"comnm", vcomnm);
  478. currrow = fSpclGridInsertRow();
  479. }
  480. ds_grd_bfaclist.deleteRow(currrow);
  481. ds_temp_picmmech.clearData();
  482. }
  483. }
  484. }
  485. function grp_biz_grd_bfaclist_oncloseup(obj:Grid, e:GridEditEventInfo)
  486. {
  487. }
  488. function grp_biz_grd_bfaclist_ondropdown(obj:Grid, e:GridEditEventInfo)
  489. {
  490. if ( obj.getBindCellIndex("body","enddd") == e.col ){
  491. ds_grd_bfaclist.setColumn(e.row,"enddd", utlf_getCurrentDate());
  492. }
  493. }
  494. function grp_biz_grd_bfaclist_oncellclick(obj:Grid, e:GridClickEventInfo)
  495. {
  496. var sInDsName = dsf_createDsRow("ds_send_dtl" , [{col: "instcd", val: sysf_getUserInfo("dutplceinstcd")}
  497. ,{col: "seq", val: ds_grd_bfaclist.getColumn(e.row,"seq")}
  498. ,{col: "con3_search1", val: "hngnm"}]);
  499. var oParam = {};
  500. oParam.id = "TRPPI01001";
  501. oParam.service = "bfjudgcareapp.BfJudgCareMngt";
  502. oParam.method = "reqGetAppAnticncrDtlList";
  503. oParam.inds = "req=ds_send_dtl";
  504. oParam.outds = "ds_grd_bfdilist=diag ds_grd_bfsclist=dept";
  505. oParam.async = false;
  506. tranf_submit(oParam);
  507. }
  508. function btn_bfdidel_onclick(obj:Button, e:ClickEventInfo)
  509. {
  510. var SelectedRows = grdf_getSelectedRows(grd_bfdilist);
  511. grdf_setStatus(grd_bfdilist , "D", SelectedRows);
  512. ds_grd_bfdilist.updatecontrol = false;
  513. for(var i=0; i < SelectedRows.length; i++) {
  514. ds_grd_bfdilist.setColumn(SelectedRows[i], "todd", utlf_getCurrentDate());
  515. }
  516. ds_grd_bfdilist.updatecontrol = true;
  517. }
  518. function btn_bfdiadd_onclick(obj:Button, e:ClickEventInfo)
  519. {
  520. var seq = ds_grd_bfaclist.getColumn(ds_grd_bfaclist.rowposition,"seq");
  521. var aprvdd = ds_grd_bfaclist.getColumn(ds_grd_bfaclist.rowposition,"aprvdd");
  522. if (utlf_isNull(seq)) {
  523. sysf_messageBox("선택 한 대상이", "I004");
  524. return;
  525. }
  526. var addRw = ds_grd_bfdilist.addRow();
  527. var instcd = sysf_getUserInfo("dutplceinstcd");
  528. ds_grd_bfdilist.setColumn(addRw,"instcd", instcd);
  529. ds_grd_bfdilist.setColumn(addRw,"seq", seq);
  530. ds_grd_bfdilist.setColumn(addRw,"fromdd", aprvdd);
  531. ds_grd_bfdilist.setColumn(addRw,"todd", "99991231");
  532. return addRw;
  533. }
  534. function btn_dfscdel_onclick(obj:Button, e:ClickEventInfo)
  535. {
  536. var SelectedRows = grdf_getSelectedRows(grd_bfsclist);
  537. grdf_setStatus(grd_bfsclist , "D", SelectedRows);
  538. ds_grd_bfsclist.updatecontrol = false;
  539. for(var i=0; i < SelectedRows.length; i++) {
  540. ds_grd_bfsclist.setColumn(SelectedRows[i], "todd", utlf_getCurrentDate());
  541. }
  542. ds_grd_bfsclist.updatecontrol = true;
  543. }
  544. function btn_bfscadd_onclick(obj:Button, e:ClickEventInfo)
  545. {
  546. var seq = ds_grd_bfaclist.getColumn(ds_grd_bfaclist.rowposition,"seq");
  547. var aprvdd = ds_grd_bfaclist.getColumn(ds_grd_bfaclist.rowposition,"aprvdd");
  548. if (utlf_isNull(seq)) {
  549. sysf_messageBox("선택 한 대상이", "I004");
  550. return;
  551. }
  552. var addRw = ds_grd_bfsclist.addRow();
  553. ds_grd_bfsclist.setColumn(addRw,"seq", seq);
  554. ds_grd_bfsclist.setColumn(addRw,"fromdd", aprvdd);
  555. ds_grd_bfsclist.setColumn(addRw,"todd", "99991231");
  556. ds_grd_bfsclist.setColumn(addRw,"instcd", sysf_getUserInfo("dutplceinstcd"));
  557. return addRw;
  558. }
  559. function btn_bfscsave_onclick(obj:Button, e:ClickEventInfo)
  560. {
  561. var updtdata = grdf_getGridUpdateData(grd_bfsclist);
  562. if ( updtdata.rowcount == 0)
  563. {
  564. sysf_messageBox("변경된 데이터가","I004");
  565. return;
  566. }
  567. for (var i = ds_grd_bfsclist.rowcount-1; i >= 0; i--)
  568. {
  569. var calcscorcd = ds_grd_bfsclist.getColumn(i,"calcscorcd");
  570. if (ds_grd_bfsclist.getRowType(i) != 8 && utlf_isNull(calcscorcd)) {
  571. ds_grd_bfsclist.deleteRow(i);
  572. }
  573. }
  574. var oParam = {};
  575. oParam.id = "TXPPI01001";
  576. oParam.service = "bfjudgcareapp.BfJudgCareMngt";
  577. oParam.method = "reqExeAppAnticncrDeptList";
  578. oParam.inds = "req=ds_grd_bfsclist:U";
  579. oParam.outds = "ds_grd_bfsclist=dept";
  580. oParam.async = false;
  581. tranf_submit(oParam);
  582. }
  583. function btn_bfdisave_onclick(obj:Button, e:ClickEventInfo)
  584. {
  585. var updtdata = grdf_getGridUpdateData(grd_bfdilist);
  586. if ( updtdata.rowcount == 0)
  587. {
  588. sysf_messageBox("변경된 데이터가","I004");
  589. return;
  590. }
  591. for (var i = ds_grd_bfdilist.rowcount-1; i >= 0; i--)
  592. {
  593. var diagcd = ds_grd_bfdilist.getColumn(i,"diagcd");
  594. if (ds_grd_bfdilist.getRowType(i) != 8 && utlf_isNull(diagcd)) {
  595. ds_grd_bfdilist.deleteRow(i);
  596. }
  597. }
  598. var oParam = {};
  599. oParam.id = "TXPPI01001";
  600. oParam.service = "bfjudgcareapp.BfJudgCareMngt";
  601. oParam.method = "reqExeAppAnticncrDiagList";
  602. oParam.inds = "req=ds_grd_bfdilist:U";
  603. oParam.outds = "ds_grd_bfdilist=diag";
  604. oParam.async = false;
  605. tranf_submit(oParam);
  606. }
  607. function fsrchDiag(obj, e)
  608. {
  609. obj.updateToDataset();
  610. ds_temp_calcdiagnm.clearData();
  611. ds_hidden_sppiz00400_rslt.clearData();
  612. var ds_obj = eval(obj.binddataset);
  613. ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", ds_grd_bfdilist.getColumn(ds_grd_bfdilist.rowposition, "diagcd"));
  614. ds_send_item2_grdsrchnm.setColumn(0, "searchkind", "2");
  615. var oParam = {};
  616. oParam.id = "TRPID00202";
  617. oParam.service = "insubasecdmngtapp.AsrtJudgCd";
  618. oParam.method = "reqGetNm";
  619. oParam.inds = "req=ds_send_item2_grdsrchnm";
  620. oParam.outds = "ds_temp_calcdiagnm=calcdiagnm";
  621. oParam.async = false;
  622. //oParam.callback = "cf_TRPID00202";
  623. tranf_submit(oParam);
  624. var hngnm = ds_temp_calcdiagnm.getColumn(0, "hngnm");
  625. if (utlf_isNull(hngnm))
  626. {
  627. var objArg = new Object();
  628. objArg.sDiagcd = obj.getCellText(e.row, e.col);
  629. objArg.sSelectedrdodiagkind = 1;
  630. objArg.sSingleFlag = "M";
  631. var objDs = frmf_modal("SPPIZ00400", "SPPIZ00400", objArg, "", "", "", "", "", "", "", "", "", "M");
  632. ds_hidden_sppiz00400_rslt.copyData(objDs);
  633. var diagcd = ds_hidden_sppiz00400_rslt.getColumn(0, "diagcd");
  634. if (utlf_isNull(diagcd))
  635. {
  636. ds_obj.setColumn(e.row, "diagcd", "-");
  637. ds_obj.setColumn(e.row, "diagnm", "-");
  638. }
  639. else
  640. {
  641. ds_obj.setColumn(e.row, "diagcd", ds_hidden_sppiz00400_rslt.getColumn(0, "diagcd"));
  642. ds_obj.setColumn(e.row, "diagnm", ds_hidden_sppiz00400_rslt.getColumn(0, "diaghngnm"));
  643. }
  644. } else {
  645. ds_obj.setColumn(e.row, "diagnm", hngnm);
  646. }
  647. }
  648. function grd_bfdilist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
  649. {
  650. fsrchDiag(obj, e);
  651. }
  652. function grd_bfdilist_onenterdown(obj:Grid, e:GridEditEventInfo)
  653. {
  654. fsrchDiag(obj, e);
  655. }
  656. function grd_bfsclist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
  657. {
  658. obj.updateToDataset();
  659. ds_temp_calcdiagnm.clearData();
  660. ds_init3.clearData();
  661. var ds_obj = eval(obj.binddataset);
  662. var seq = ds_grd_bfaclist.getColumn(ds_grd_bfaclist.rowposition,"seq");
  663. var aprvdd = ds_grd_bfaclist.getColumn(ds_grd_bfaclist.rowposition,"aprvdd");
  664. ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", ds_obj.getColumn(e.row, "calcscorcd"));
  665. ds_send_item2_grdsrchnm.setColumn(0, "searchkind", "1");
  666. var oParam = {};
  667. oParam.id = "TRPID00202";
  668. oParam.service = "insubasecdmngtapp.AsrtJudgCd";
  669. oParam.method = "reqGetNm";
  670. oParam.inds = "req=ds_send_item2_grdsrchnm";
  671. oParam.outds = "ds_temp_calcdiagnm=calcdiagnm";
  672. oParam.async = false;
  673. //oParam.callback = "cf_TRPID00202";
  674. tranf_submit(oParam);
  675. var hngnm = ds_temp_calcdiagnm.getColumn(0, "hngnm");
  676. if (utlf_isNull(hngnm))
  677. {
  678. frmf_setParameter("openflag", "hngnm");
  679. frmf_setParameter("iParam_mother_view", "SMPPI00100_사전심사제어코드관리");
  680. var objArg = new Object();
  681. objArg.arg_ds_temp = "";
  682. frmf_modal("SMPIC00202", "SMPIC00202", objArg, "", "", "", "", "", "", "", "", "", "M");
  683. for(var i = 0; i < ds_init3.rowcount; i++)
  684. {
  685. var row = ds_obj.addRow();
  686. ds_obj.setColumn(row-1, "seq", seq);
  687. ds_obj.setColumn(row-1, "fromdd", aprvdd);
  688. ds_obj.setColumn(row-1, "todd", "99991231");
  689. ds_obj.setColumn(row-1, "calcscorcd", ds_init3.getColumn(i, "picmmech_calcscorcd"));
  690. ds_obj.setColumn(row-1, "hngnm", ds_init3.getColumn(i, "picmmech_hngnm"));
  691. }
  692. ds_obj.deleteRow(ds_obj.rowcount-1);
  693. }
  694. else
  695. {
  696. ds_obj.setColumn(row, "hngnm", ds_temp_calcdiagnm.getColumn(0, "hngnm"));
  697. }
  698. }
  699. function grp_biz_group1_ipt_aprvnm_onkeydown(obj:Edit, e:KeyEventInfo)
  700. {
  701. if(e.keycode == 13)
  702. {
  703. fGetDocuList();
  704. }
  705. }
  706. function grp_biz_group1_caption01_onclick(obj:Static, e:ClickEventInfo)
  707. {
  708. }
  709. function grp_biz_group1_caption03_onclick(obj:Static, e:ClickEventInfo)
  710. {
  711. }
  712. function cap_title_onclick(obj:Static, e:ClickEventInfo)
  713. {
  714. }
  715. function grd_bfsclist_onenterdown(obj:Grid, e:GridEditEventInfo)
  716. {
  717. var param = "calcscorcd";
  718. if ( obj.getBindCellIndex("body","calcscorcd") == e.col ){
  719. param = "calcscorcd";
  720. } else if ( obj.getBindCellIndex("body","hngnm") == e.col ){
  721. param = "hngnm";
  722. }
  723. frmf_setParameter("openflag", param);
  724. dsf_createDsRow("ds_receivedata" , [{col: "srchdrugcd", val: e.value}
  725. ,{col: "con4_search2", val: e.value}
  726. ,{col: "con3_search1", val: param}]);
  727. var objArg = new Object();
  728. objArg.arg_ds_temp = ds_receivedata;
  729. var objRtn = frmf_modal("SMPIC00200", "SMPIC00200", objArg, "", "", "", "", "", "", "", "", "", "M");
  730. ds_temp_picmmech.copyData(objRtn);
  731. if (ds_temp_picmmech.rowcount > 0)
  732. {
  733. var currrow = ds_grd_bfsclist.rowposition;
  734. for (var i=0; i < ds_temp_picmmech.rowcount; i++ ) {
  735. var vprcpcd = ds_temp_picmmech.getColumn(i,"picmmech_calcscorcd");
  736. var vprcpnm = ds_temp_picmmech.getColumn(i,"picmmech_engnm");
  737. var vedicd = ds_temp_picmmech.getColumn(i,"picmmech_insuedicd");
  738. //var vcomnm = ds_temp_picmmech.getColumn(i,"comnm");
  739. ds_grd_bfsclist.setColumn(currrow,"calcscorcd", vprcpcd);
  740. ds_grd_bfsclist.setColumn(currrow,"hngnm", vprcpnm);
  741. //ds_grd_bfsclist.setColumn(currrow,"comnm", vcomnm);
  742. //ds_grd_bfaclist.setColumn(currrow,"comnm", vcomnm);
  743. currrow = ds_grd_bfsclist.addRow();
  744. }
  745. ds_grd_bfsclist.deleteRow(currrow);
  746. //ds_temp_picmmech.clearData();
  747. }
  748. }
  749. ]]></Script>
  750. </Form>
  751. </FDL>