SMMNO02800_외래 선처치 미수금 발생내역.xfdl 23 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMMNO02800" position="absolute 0 0 1256 805" titletext="외래 선처치 미수금 발생내역" oninit="model1_oninit" onload="SMMNO02800_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption6" class="tit_1" position="absolute 0 3 207 28" anchor="default" positiontype="position" text="외래 선처치 미수금 발생내역"/>
  8. <Div id="grp_sea" taborder="1" style="align:center top;" class="div_SA" position="absolute 0 28 1256 95" anchor="left top right" positiontype="position">
  9. <Layouts>
  10. <Layout>
  11. <Static id="cap_ward" text="진료과" class="search_name" position="absolute 301 10 375 30" anchor="default" positiontype="position"/>
  12. <Static id="caption8" text="조회일자" class="search_name" position="absolute 8 10 82 30" anchor="default" positiontype="position"/>
  13. <Calendar id="ipt_srchfromdd" taborder="7" class="input_s_essential" position="absolute 81 10 171 30" dateformat="yyyy-MM-dd" value="null" anchor="default" positiontype="position" autoselect="true"/>
  14. <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1020 11 1020 46" anchor="default" positiontype="position"/>
  15. <Combo id="cmb_orddept" taborder="8" class="combo_search" position="absolute 374 10 494 30" innerdataset="@ds_init_orddeptcd" codecolumn="deptcd" datacolumn="depthngnm" onitemchanged="grp_sea_cmb_orddept_onitemchanged" anchor="default" positiontype="position"/>
  16. <Combo id="cmb_orddrid" taborder="9" class="combo_search" position="absolute 617 10 737 30" innerdataset="@ds_init_orddr" codecolumn="userid" datacolumn="usernm" anchor="default" positiontype="position"/>
  17. <Static id="caption3" text="진료의" class="search_name" position="absolute 518 10 618 30" anchor="default" positiontype="position"/>
  18. <Calendar id="ipt_srchtodd" taborder="10" class="input_s_essential" position="absolute 187 10 277 30" dateformat="yyyy-MM-dd" value="null" anchor="default" positiontype="position" autoselect="true" autoskip="true"/>
  19. <Static id="caption1" text="~" position="absolute 171 10 187 30" style="align:center middle;" anchor="default" positiontype="position"/>
  20. <Static id="caption2" text="조회조건" class="search_name" position="absolute 761 10 835 30" anchor="default" positiontype="position"/>
  21. <CheckBox id="chk_precureprcpflag" taborder="11" text="선처치 미등록 포함" truevalue="Y" class="checkbox_search" position="absolute 834 10 958 30" falsevalue="N" anchor="default" positiontype="position"/>
  22. <Static id="caption4" text="처방코드" class="search_name" position="absolute 8 35 82 55" anchor="default" positiontype="position"/>
  23. <Edit id="ipt_pid" taborder="12" class="input_search" position="absolute 81 35 171 55" imemode="hangul" onkeydown="grp_sea_ipt_pid_onkeydown" anchor="default" positiontype="position"/>
  24. <Combo id="cmb_prcpclscd" taborder="13" class="combo_search" position="absolute 374 35 494 55" innerdataset="ds_initZ_M0005" codecolumn="cdid" datacolumn="cdnm" index="-1" anchor="default" positiontype="position"/>
  25. <Static id="caption5" text="처방분류별 조회" class="search_name" position="absolute 262 35 375 55" anchor="default" positiontype="position"/>
  26. <Combo id="cmb_prcpinptflag" taborder="14" class="combo_search" position="absolute 617 35 737 55" innerdataset="ds_initZ_M0034" codecolumn="cdid" datacolumn="cdnm" anchor="default" positiontype="position"/>
  27. <Static id="caption7" text="처방입력구분" class="search_name" position="absolute 518 35 618 55" anchor="default" positiontype="position"/>
  28. <Button id="btn_srchprecureprcpuncopatlist" taborder="15" text="조회" onlbuttonup="btn_srchprecureprcpuncopatlist_onlbuttonup" class="btn1" position="absolute 1196 18 1252 38" anchor="top right" onclick="btn_srchprecureprcpuncopatlist_onclick" positiontype="position"/>
  29. <Edit id="input1" taborder="16" class="input_search" position="absolute 834 35 914 55" imemode="none" onkeydown="grp_sea_input1_onkeydown" anchor="default" positiontype="position"/>
  30. <Button id="btn_pid" taborder="17" onlbuttonup="btn_pid_onlbuttonup" class="icon_search" position="absolute 917 35 937 55" text="" onclick="btn_pid_onclick" anchor="default" positiontype="position"/>
  31. <Static id="caption9" text="등록번호" class="search_name" position="absolute 761 35 835 55" anchor="default" positiontype="position"/>
  32. <Edit id="opt_hngnm" taborder="18" readonly="true" position="absolute 940 35 1025 55" anchor="default" positiontype="position"/>
  33. </Layout>
  34. </Layouts>
  35. </Div>
  36. <Grid id="grd_prcpendlist" class="datagrid2" taborder="2" useinputpanel="false" position="absolute 0 122 1256 805" autofittype="col" anchor="all" binddataset="ds_grid_grd_prcpendlist" positiontype="position">
  37. <Formats>
  38. <Format id="default">
  39. <Columns>
  40. <Column size="30"/>
  41. <Column size="70"/>
  42. <Column size="80"/>
  43. <Column size="70"/>
  44. <Column size="92"/>
  45. <Column size="241"/>
  46. <Column size="72"/>
  47. <Column size="81"/>
  48. <Column size="59"/>
  49. <Column size="80"/>
  50. <Column size="55"/>
  51. <Column size="79"/>
  52. <Column size="54"/>
  53. <Column size="87"/>
  54. <Column size="100"/>
  55. </Columns>
  56. <Rows>
  57. <Row size="35" band="head"/>
  58. <Row size="24"/>
  59. </Rows>
  60. <Band id="head">
  61. <Cell text="No."/>
  62. <Cell col="1" text="등록번호"/>
  63. <Cell col="2" text="환자명"/>
  64. <Cell col="3" text="처방일자"/>
  65. <Cell col="4" text="처방코드"/>
  66. <Cell col="5" text="처방명"/>
  67. <Cell col="6" text="처방분류"/>
  68. <Cell col="7" text="진료과"/>
  69. <Cell col="8" text="진료의"/>
  70. <Cell col="9" text="처방과"/>
  71. <Cell col="10" text="처방자"/>
  72. <Cell col="11" text="처방입력구분"/>
  73. <Cell col="12" text="선처치&#10;등록여부"/>
  74. <Cell col="13" text="미수액&#10;(본인부담금)"/>
  75. <Cell col="14" text="진료예약일시"/>
  76. </Band>
  77. <Band id="body">
  78. <Cell celltype="none" expr="expr:currow+1"/>
  79. <Cell col="1" displaytype="text" text="bind:pid" suppress="1" suppressalign="middle"/>
  80. <Cell col="2" style="align:left middle;" text="bind:hngnm" suppress="2" suppressalign="middle"/>
  81. <Cell col="3" style="align:center middle;" text="bind:prcpdd" mask="expr:prcpcd==null?'':'####-##-##'"/>
  82. <Cell col="4" displaytype="text" style="align:left middle;" text="bind:prcpcd"/>
  83. <Cell col="5" style="align:left middle;" text="bind:prcpnm"/>
  84. <Cell col="6" style="align:left middle;" text="bind:prcpclsnm"/>
  85. <Cell col="7" style="align:left middle;" text="bind:orddeptnm"/>
  86. <Cell col="8" style="align:left middle;" text="bind:orddrnm"/>
  87. <Cell col="9" style="align:left middle;" text="bind:rgstdeptnm"/>
  88. <Cell col="10" style="align:left middle;" text="bind:rgstrnm"/>
  89. <Cell col="11" style="align:left middle;" text="bind:prcpinptflag"/>
  90. <Cell col="12" style="align:left middle;" text="bind:precureprcpflag"/>
  91. <Cell col="13" displaytype="number" style="align:right middle;" text="bind:ownbamt"/>
  92. <Cell col="14" style="align:center middle;" text="bind:orddt" mask="expr:orddt==null?'':'####-##-## ##:##'"/>
  93. <Cell col="15"/>
  94. </Band>
  95. </Format>
  96. </Formats>
  97. </Grid>
  98. <Button id="button1" taborder="3" text="엑셀" onlbuttonup="button1_onlbuttonup" class="btn2" position="absolute 1212 99 1256 119" anchor="top right" positiontype="position" onclick="button1_onclick"/>
  99. </Layout>
  100. </Layouts>
  101. <Objects>
  102. <Dataset id="ds_grid_grd_prcpendlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  103. <ColumnInfo>
  104. <Column id="pid" type="STRING"/>
  105. <Column id="hngnm" type="STRING"/>
  106. <Column id="prcpdd" type="STRING"/>
  107. <Column id="prcpcd" type="STRING"/>
  108. <Column id="prcpnm" type="STRING"/>
  109. <Column id="prcpclsnm" type="STRING"/>
  110. <Column id="orddeptnm" type="STRING"/>
  111. <Column id="orddrnm" type="STRING"/>
  112. <Column id="rgstdeptnm" type="STRING"/>
  113. <Column id="rgstrnm" type="STRING"/>
  114. <Column id="prcpinptflag" type="STRING"/>
  115. <Column id="precureprcpflag" type="STRING"/>
  116. <Column id="ownbamt" type="STRING"/>
  117. <Column id="orddt" type="STRING"/>
  118. </ColumnInfo>
  119. </Dataset>
  120. <Dataset id="ds_init_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  121. <ColumnInfo>
  122. <Column id="instcd" type="STRING" size="256"/>
  123. <Column id="deptcd" type="STRING" size="256"/>
  124. <Column id="depthngnm" type="STRING" size="256"/>
  125. <Column id="ordclsdeptflag" type="STRING" size="256"/>
  126. <Column id="orddeptkind" type="STRING" size="256"/>
  127. <Column id="supdeptcd" type="STRING" size="256"/>
  128. </ColumnInfo>
  129. </Dataset>
  130. <Dataset id="ds_init_orddr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  131. <ColumnInfo>
  132. <Column id="userid" type="STRING" size="256"/>
  133. <Column id="usernm" type="STRING" size="256"/>
  134. <Column id="deptcd" type="STRING" size="256"/>
  135. <Column id="userdepthngnm" type="STRING" size="256"/>
  136. </ColumnInfo>
  137. </Dataset>
  138. <Dataset id="ds_initZ_M0005" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  139. <ColumnInfo>
  140. <Column id="cdid" type="STRING" size="256"/>
  141. <Column id="cdnm" type="STRING" size="256"/>
  142. </ColumnInfo>
  143. </Dataset>
  144. <Dataset id="ds_initZ_M0034" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  145. <ColumnInfo>
  146. <Column id="cdid" type="STRING" size="256"/>
  147. <Column id="cdnm" type="STRING" size="256"/>
  148. </ColumnInfo>
  149. </Dataset>
  150. <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  151. <ColumnInfo>
  152. <Column id="popupendflag" type="STRING" size="256"/>
  153. <Column id="pid" type="STRING" size="256"/>
  154. <Column id="hngnm" type="STRING" size="256"/>
  155. </ColumnInfo>
  156. <Rows>
  157. <Row/>
  158. </Rows>
  159. </Dataset>
  160. <Dataset id="ds_codelist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  161. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  162. </Objects>
  163. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  164. * System Name : Himed
  165. * Job Name :
  166. * File Name : SMMNO02800_외래 선처치 미수금 발생내역.xfdl
  167. * Creator :
  168. * Make Date : 2014-07-03
  169. *
  170. * Description :
  171. *---------------------------------------------------------------------------------------
  172. * Modify Date Modifier Modify Description
  173. *---------------------------------------------------------------------------------------
  174. * 2014-07-03 HIT Converting Program(TF->XP)
  175. *
  176. *---------------------------------------------------------------------------------------
  177. ****************************************************************************************/
  178. //=======================================================================================
  179. // xjs Include
  180. //---------------------------------------------------------------------------------------
  181. include "com_commonxp::comm_main.xjs";
  182. include "emr_carecomxp::CareCom.xjs";
  183. include "com_departmentcodexp::ZSD001.xjs";
  184. include "com_basiccodexp::ZBC001.xjs";
  185. include "lis_commonxp::LZZ001.xjs";
  186. var seoulinstcd = ""; //20090811-kys
  187. // 화면초기화
  188. function lf_init() {
  189. var currentdate = utlf_getCurrentDate();
  190. var instcd = sysf_getUserInfo("dutplceinstcd");
  191. var dutplcecd = sysf_getUserInfo("dutplcecd");
  192. zsdfGetCareOutOrderDepartmentList(instcd, "ds_init_orddeptcd", currentdate); // 간호외래진료부서콤보 (특정하위부서를 포함- 분만실, 육아상담실, 인공신장실)
  193. frmf_addComboItem("grp_sea.cmb_orddept", "전체", "0000000000", "above");
  194. var arrParam = [{dsNm: "ds_initZ_M0005", cdGrpId: "M0005"}
  195. ,{dsNm: "ds_initZ_M0034", cdGrpId: "M0034"}
  196. ]
  197. appf_getCodeList(arrParam);
  198. grp_sea.ipt_srchfromdd.value = currentdate.toDate("YYYYMMDD").getAddDate(-1,"M").getDateFormat("YYYYMMDD");
  199. grp_sea.ipt_srchtodd.value = currentdate;
  200. grp_sea.cmb_orddept.value = dutplcecd;
  201. lf_getOrdDrList(); // 진료의리스트 조회
  202. frmf_addComboItem("grp_sea.cmb_prcpclscd", "전체", "", "above");
  203. frmf_addComboItem("grp_sea.cmb_prcpinptflag", "전체", "", "above");
  204. grp_sea.cmb_prcpclscd.index = 0;
  205. grp_sea.cmb_prcpinptflag.index = 0;
  206. if(utlf_isNull(grp_sea.cmb_orddept.value)){
  207. grp_sea.cmb_orddept.value = "0000000000"; // 전체진료과
  208. }
  209. var pCode = "'077'"; // 조회할 CdGrupID 코드정보
  210. var pDate = utlf_getCurrentDate(); //조회기준일자
  211. fGetNursHardCdInfo(pCode, pDate);
  212. for(var i=0; i< ds_codelist.rowcount; i++){
  213. switch (ds_codelist.getColumn(i,"cdgrupid")){
  214. case "077": // 의정부성모병원기관코드_20090606
  215. switch(ds_codelist.getColumn(i,"supcdid")){
  216. case "01": // (01:서울성모,02:의정부성모,03:부천성가, 04:성빈센트)-20090811
  217. seoulinstcd = ds_codelist.getColumn(i,"cdid");
  218. break;
  219. }
  220. }
  221. }
  222. }
  223. // 진료의리스트 조회
  224. function lf_getOrdDrList(){
  225. var orddeptcd = grp_sea.cmb_orddept.value;
  226. var prcpspecflag = "Y";
  227. var frw = ds_init_orddeptcd.findRow("deptcd=='"+orddeptcd+"'");
  228. var sordclsdeptflag = ds_init_orddeptcd.getColumn(frw, "ordclsdeptflag"); // 센터/대표/분과/서브 구분
  229. var ssupdeptcd = ds_init_orddeptcd.getColumn(frw, "supdeptcd"); // 상위부서코드
  230. var sorddeptkind = ds_init_orddeptcd.getColumn(frw, "orddeptkind"); // 센터/대표 구분
  231. var sorddeptflag = "";
  232. // 센터이면
  233. if (sorddeptkind == "C") {
  234. sorddeptflag = "C";
  235. // 센터가 아니면서 분과이면
  236. }else if (sorddeptkind != "C" && sordclsdeptflag == "A") {
  237. sorddeptflag = "A";
  238. // 그외에 기타과
  239. }else {
  240. sorddeptflag = "etc";
  241. }
  242. var ordclsdeptflag = sorddeptflag;
  243. var supdeptcd = ssupdeptcd;
  244. var orddd = utlf_getCurrentDate();
  245. var dutplcecd = sysf_getUserInfo("dutplcecd");
  246. dsf_createDsRow("ds_temp_reqdata",
  247. [{col:"orddeptcd", val:orddeptcd}
  248. , {col:"orddd", val:orddd}
  249. , {col:"prcpspecflag", val:prcpspecflag}
  250. , {col:"ordclsdeptflag", val:ordclsdeptflag}
  251. , {col:"supdeptcd", val:ssupdeptcd}
  252. , {col:"MDdeptcd", val:""}
  253. ]);
  254. var oParam = new Object();
  255. oParam.id = "TRMNO00104";
  256. oParam.service = "outcareapp.OutCareMngt";
  257. oParam.method = "reqGetDrId";
  258. oParam.inds = "reqdrid=ds_temp_reqdata";
  259. oParam.outds = "ds_init_orddr=orddr";
  260. tranf_submit(oParam);
  261. frmf_addComboItem("grp_sea.cmb_orddrid", "전체", "00000000", "above");
  262. grp_sea.cmb_orddrid.value = "00000000";
  263. }
  264. // 외래 선처치 미수금 발생내역 조회
  265. function lf_getPreCurePrcpUncoPatList(){
  266. var srchfromdd = grp_sea.ipt_srchfromdd.value
  267. var srchtodd = grp_sea.ipt_srchtodd.value;
  268. var orddeptcd = grp_sea.cmb_orddept.value;
  269. var orddrid = grp_sea.cmb_orddrid.value;
  270. var precureprcpflag = grp_sea.chk_precureprcpflag.value;
  271. var prcpcd = grp_sea.ipt_pid.value;
  272. var prcpclscd = grp_sea.cmb_prcpclscd.value;
  273. var prcpinptflag = grp_sea.cmb_prcpinptflag.value;
  274. var pid = grp_sea.input1.value;
  275. //20090811-kys(서울성모인경우 수납전에도 진료예약일시가 조회되어야 한다)
  276. var seoulyn = "N";
  277. if(sysf_getUserInfo("dutplceinstcd") == seoulinstcd){
  278. seoulyn = "Y";
  279. }
  280. dsf_createDsRow("ds_temp_reqdata",
  281. [{col:"srchfromdd", val:srchfromdd}
  282. , {col:"srchtodd", val:srchtodd}
  283. , {col:"orddeptcd", val:orddeptcd}
  284. , {col:"orddrid", val:orddrid}
  285. , {col:"precureprcpflag", val:precureprcpflag}
  286. , {col:"prcpcd", val:prcpcd}
  287. , {col:"prcpclscd", val:prcpclscd}
  288. , {col:"prcpinptflag", val:prcpinptflag}
  289. , {col:"pid", val:pid}
  290. , {col:"seoulyn", val:seoulyn}
  291. ]);
  292. var oParam = new Object();
  293. oParam.id = "TRMNO02801";
  294. oParam.service = "outcareapp.OutCareMngt";
  295. oParam.method = "reqGetPreCurePrcpUncoPatList";
  296. oParam.inds = "req=ds_temp_reqdata";
  297. oParam.outds = "ds_grid_grd_prcpendlist=precureprcpuncopatinfo";
  298. oParam.callback = "cbf_TRMNO02800";
  299. oParam.async = true
  300. tranf_submit(oParam);
  301. }
  302. function cbf_TRMNO02800(strSvcID, nErrorCode, strErrorMsg) {
  303. //에러 처리
  304. if(nErrorCode != 0) {
  305. sysf_messageBox("ID: "+ strSvcID + " Error: " + strErrorMag, "E009", "");
  306. }else{
  307. // trace(strSvcID);
  308. switch(strSvcID){
  309. case "TRZSD00206":
  310. frmf_addComboItem("grp_sea.cmb_orddept", "전체", "0000000000", "above"); // 진료부서 콤보 전체추가_ tfHelper.js
  311. //fGetNursHardCdInfo 추가, xM0XXX변수 생성
  312. // fGetNursHardCdInfo("'077','172','177','M01'", getCurrentDate()); //CareCom.js
  313. /*
  314. var sPath1 = "/root/code/codeinfo/codelist";
  315. lf_selectDeptsPath1 = sPath1 + "[cdgrupid='M01' and cdnm = 'M0005']/supcdid";
  316. var sPath2 = "/root/code/codeinfo/codelist";
  317. sPath2 = sPath2 + "[cdgrupid='M01' and cdnm = 'M0034']/supcdid";
  318. var sM0005 = model.getValue(sPath1);
  319. var sM0034 = model.getValue(sPath2);
  320. zbcfGetCodeList( new Array(sM0005, sM0034), new Array("/root/init/M0005list", "/root/init/M0034list")); // 공통코드 스크립트 호출
  321. */
  322. // lf_getAllBizCodeList(arrParam, bMinimum, bAsync, sCallback)
  323. lf_getAllBizCodeList([{bizFlag: "N", cdGrpId: "077", dsNm: "ds_init_N_077", sortField: "cdid", sortMethod: "asc"}], false, false, "cbf_TRMNO02800");
  324. break;
  325. case "TRMNO02801":
  326. for(var i=0; i<ds_grid_grd_prcpendlist.rowcount; i++){
  327. var a_pid = ds_grid_grd_prcpendlist.getColumn(i, "pid");
  328. var a_prcpdd = ds_grid_grd_prcpendlist.getColumn(i, "prcpdd");
  329. var a_ownbamt = ds_grid_grd_prcpendlist.getColumn(i, "ownbamt");
  330. var a_orddt = ds_grid_grd_prcpendlist.getColumn(i, "orddt");
  331. for(var k=0; k<ds_grid_grd_prcpendlist.rowcount; k++){
  332. var b_pid = ds_grid_grd_prcpendlist.getColumn(k, "pid");
  333. var b_prcpdd = ds_grid_grd_prcpendlist.getColumn(k, "prcpdd");
  334. var b_ownbamt = ds_grid_grd_prcpendlist.getColumn(k, "ownbamt");
  335. var b_orddt = ds_grid_grd_prcpendlist.getColumn(k, "orddt");
  336. if( i < k ){
  337. if(a_pid == b_pid && a_prcpdd == b_prcpdd && a_ownbamt == b_ownbamt){
  338. // grd_prcpendlist.mergeByFree(i, grd_prcpendlist.colRef("ownbamt"), k, grd_prcpendlist.colRef("ownbamt"));
  339. }
  340. if(a_pid == b_pid && a_prcpdd == b_prcpdd && a_orddt == b_orddt){
  341. // grd_prcpendlist.mergeByFree(i, grd_prcpendlist.colRef("orddt"), k, grd_prcpendlist.colRef("orddt"));
  342. }
  343. }
  344. }
  345. }
  346. break;
  347. default:
  348. break;
  349. }
  350. }
  351. }
  352. function SMMNO02800_onload(obj:Form, e:LoadEventInfo)
  353. {
  354. frmf_initForm(obj); // 화면공통
  355. lf_init(); // 화면초기화
  356. }
  357. function button1_onclick(obj:Button, e:ClickEventInfo)
  358. {
  359. var shNm = grp_sea.ipt_srchfromdd.value+"~"+grp_sea.ipt_srchtodd.value+"_";
  360. grdf_exportExcel(grd_prcpendlist,"외래 선처치 미수금 발생내역", shNm);
  361. }
  362. function btn_srchprecureprcpuncopatlist_onclick(obj:Button, e:ClickEventInfo)
  363. {
  364. lf_getPreCurePrcpUncoPatList();
  365. }
  366. function btn_pid_onclick(obj:Button, e:ClickEventInfo)
  367. {
  368. /*
  369. var popupendflag = model.getValue("/root/main/popupendflag");
  370. if (popupendflag == "ok"){
  371. model.makeValue("/root/main/cond/pid", model.getValue("/root/main/patinfo/patinfolist/pid"));
  372. model.makeValue("/root/main/cond/hngnm", model.getValue("/root/main/patinfo/patinfolist/hngnm"));
  373. ipt_pid.refresh();
  374. opt_hngnm.refresh();
  375. }
  376. */
  377. // 외래간호환자조회로 변경_20090218(ByJA)
  378. //환자번호 copy
  379. grp_sea.input1.value = "";
  380. grp_sea.opt_hngnm.value = "";
  381. var obj = new Object();
  382. // obj.condparam = sParam;
  383. var rtn = frmf_modal("SPMNO02400","SPMNO02400", obj);
  384. //modal("../../../emr/outcareweb/xrw/SPMNO02400", "1","150", "150", "SPMNO02400", "/root/source", "/root/main/cond");
  385. var popupendflag = ds_cond.getColumn(0, "popupendflag");
  386. if (popupendflag == "ok") {
  387. // ds_cond.setColumn(0, "pid", rtn[0]);
  388. // ds_cond.setColumn(0, "hngnm", rtn[1]);
  389. grp_sea.input1.value = ds_cond.getColumn(0, "pid");
  390. grp_sea.opt_hngnm.value = ds_cond.getColumn(0, "hngnm");
  391. }
  392. lf_getPreCurePrcpUncoPatList(); // 외래 선처치 미수금 발생내역 조회
  393. }
  394. /****************************************************************************************
  395. * Components :
  396. * Components ID : input1
  397. * Event : onkeydown
  398. * Argument : 01.obj : Object Event has occurred
  399. * : 02.e : Event Object
  400. * Description :
  401. ****************************************************************************************/
  402. function grp_sea_input1_onkeydown(obj:Edit, e:KeyEventInfo)
  403. {
  404. if(e.keycode==13) {
  405. frmf_setInputNodeCurPid(obj, "");
  406. lf_getPreCurePrcpUncoPatList();
  407. }
  408. }
  409. function grp_sea_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
  410. {
  411. lf_getPreCurePrcpUncoPatList(); // 외래 선처치 미수금 발생내역 조회
  412. }
  413. function grp_sea_cmb_orddept_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  414. {
  415. lf_getOrdDrList(); // 진료의리스트 조회
  416. }
  417. ]]></Script>
  418. </Form>
  419. </FDL>