SMARC00700_입원수술 환자조회.xfdl 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMARC00700" position="absolute 0 0 1202 800" titletext="입원수술환자조회" oninit="SMARC00700_oninit" onload="SMARC00700_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div id="group1" taborder="0" class="div_SA" position="absolute 0 24 1195 64" anchor="left top right">
  8. <Layouts>
  9. <Layout>
  10. <Shape id="line8" linetype="vertical" class="line_4" position="absolute 1107 8 1113 31"/>
  11. <Static id="caption9" text="조회일자 :" class="search_name" position="absolute 11 12 110 29"/>
  12. <Static id="caption5" text="~" class="search_no_b" position="absolute 293 13 305 30"/>
  13. <Button id="button19" taborder="1" class="icon_search" position="absolute 618 11 634 27" onclick="group1_button19_onclick"/>
  14. <Static id="caption15" text="등록번호:" class="search_name" position="absolute 438 11 517 28"/>
  15. <Static id="caption1" text="환자명 :" class="search_name" position="absolute 649 11 729 28"/>
  16. <Combo id="cmb_condflag" taborder="2" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 93 11 178 30" onitemchanged="group1_cmb_condflag_onitemchanged">
  17. <Dataset id="innerdataset">
  18. <ColumnInfo>
  19. <Column id="codecolumn"/>
  20. <Column id="datacolumn"/>
  21. </ColumnInfo>
  22. <Rows>
  23. <Row>
  24. <Col id="codecolumn">1</Col>
  25. <Col id="datacolumn">재원자</Col>
  26. </Row>
  27. <Row>
  28. <Col id="codecolumn">2</Col>
  29. <Col id="datacolumn">퇴원일자</Col>
  30. </Row>
  31. <Row>
  32. <Col id="codecolumn">3</Col>
  33. <Col id="datacolumn">입원일자</Col>
  34. </Row>
  35. </Rows>
  36. </Dataset>
  37. </Combo>
  38. <Calendar id="ipt_fromdd" taborder="3" autoselect="true" autoskip="true" class="input_search" position="absolute 181 11 284 30"/>
  39. <Calendar id="ipt_todd" taborder="4" autoselect="true" class="input_search" position="absolute 309 11 412 30"/>
  40. <Edit id="ipt_pid" taborder="5" autoselect="true" class="input_search" position="absolute 515 10 615 29" onkeyup="group1_ipt_pid_onkeyup"/>
  41. <Edit id="ipt_hngnm" taborder="6" autoselect="true" class="input_search" position="absolute 722 10 822 29" onkeyup="group1_ipt_hngnm_onkeyup"/>
  42. <CheckBox id="chk_opyn" taborder="7" text="수술환자" truevalue="E" position="absolute 840 9 920 29" onclick="group1_chk_opyn_onclick"/>
  43. <CheckBox id="chk_reqyn" taborder="8" text="의뢰환자" truevalue="EP" position="absolute 920 9 1000 29" onclick="group1_chk_reqyn_onclick"/>
  44. <Button id="btn_search" taborder="9" text="조회" class="btn1" position="absolute 1126 10 1182 32" onclick="group1_btn_search_onclick"/>
  45. </Layout>
  46. </Layouts>
  47. </Div>
  48. <Static id="caption22" text="입원/수술환자리스트" class="tit_2" position="absolute 0 86 147 107"/>
  49. <Shape id="line1" class="line_10" position="absolute 0 102 1195 108" anchor="left top right"/>
  50. <Grid id="grd_list" taborder="1" binddataset="ds_main_list_inpatlist" useinputpanel="false" position="absolute 0 107 1195 758" autoenter="select" cellsizingtype="col" anchor="all" oncelldblclick="grd_list_oncelldblclick">
  51. <Formats>
  52. <Format id="default">
  53. <Columns>
  54. <Column size="28" band="left"/>
  55. <Column size="100"/>
  56. <Column size="66"/>
  57. <Column size="79"/>
  58. <Column size="90"/>
  59. <Column size="93"/>
  60. <Column size="40"/>
  61. <Column size="40"/>
  62. <Column size="154"/>
  63. <Column size="67"/>
  64. <Column size="70"/>
  65. <Column size="70"/>
  66. <Column size="70"/>
  67. <Column size="70"/>
  68. <Column size="200"/>
  69. <Column size="70"/>
  70. <Column size="70"/>
  71. <Column size="70"/>
  72. </Columns>
  73. <Rows>
  74. <Row size="24" band="head"/>
  75. <Row size="24"/>
  76. </Rows>
  77. <Band id="head">
  78. <Cell/>
  79. <Cell col="1" text="병동"/>
  80. <Cell col="2" text="병실"/>
  81. <Cell col="3" text="등록번호"/>
  82. <Cell col="4" text="환자명"/>
  83. <Cell col="5" text="주민번호"/>
  84. <Cell col="6" text="성별"/>
  85. <Cell col="7" text="나이"/>
  86. <Cell col="8" text="진료과"/>
  87. <Cell col="9" text="진료의사"/>
  88. <Cell col="10" text="입원일자"/>
  89. <Cell col="11" text="퇴원일자"/>
  90. <Cell col="12" text="등록일자"/>
  91. <Cell col="13" text="의뢰일자"/>
  92. <Cell col="14" text="의뢰병원명"/>
  93. <Cell col="15" text="의뢰의사"/>
  94. <Cell col="16" text="회신일자"/>
  95. <Cell col="17" text="병원구분"/>
  96. </Band>
  97. <Band id="body">
  98. <Cell celltype="head" expr="currow+1"/>
  99. <Cell col="1" text="bind:wardcd"/>
  100. <Cell col="2" text="bind:roomcd"/>
  101. <Cell col="3" text="bind:pid"/>
  102. <Cell col="4" text="bind:hngnm"/>
  103. <Cell col="5" text="bind:rrgstno"/>
  104. <Cell col="6" text="bind:sex"/>
  105. <Cell col="7" text="bind:age"/>
  106. <Cell col="8" displaytype="text" text="bind:orddeptnm"/>
  107. <Cell col="9" text="bind:orddrnm"/>
  108. <Cell col="10" displaytype="date" text="bind:indd" calendardisplaynulltype="nulltext"/>
  109. <Cell col="11" displaytype="date" text="bind:dschdd" calendardisplaynulltype="nulltext"/>
  110. <Cell col="12" displaytype="date" text="bind:rgstdd" calendardisplaynulltype="nulltext"/>
  111. <Cell col="13" displaytype="date" text="bind:reqdd" calendardisplaynulltype="nulltext"/>
  112. <Cell col="14" displaytype="text" style="align:left middle;padding:2 2 2 2;" text="bind:coophospnm"/>
  113. <Cell col="15" displaytype="text" text="bind:drnm"/>
  114. <Cell col="16" displaytype="date" text="bind:repldd" calendardisplaynulltype="nulltext"/>
  115. <Cell col="17" displaytype="combo" style="align:center middle;" text="bind:hospgrade" combodataset="ds_init_cond_A0429" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
  116. </Band>
  117. </Format>
  118. </Formats>
  119. </Grid>
  120. <Static id="caption2" text="입원/수술 환자조회" class="tit_1" position="absolute 0 0 163 24"/>
  121. <Button id="btn_allclear" taborder="2" text="초기화" class="btn4" position="absolute 1126 763 1194 785" anchor="right bottom" onclick="btn_allclear_onclick"/>
  122. </Layout>
  123. </Layouts>
  124. <Objects>
  125. <Dataset id="ds_main_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  126. <ColumnInfo>
  127. <Column id="condflag" type="STRING" size="256"/>
  128. <Column id="fromdd" type="STRING" size="256"/>
  129. <Column id="todd" type="STRING" size="256"/>
  130. <Column id="pid" type="STRING" size="256"/>
  131. <Column id="hngnm" type="STRING" size="256"/>
  132. <Column id="opyn" type="STRING" size="256"/>
  133. <Column id="reqyn" type="STRING" size="256"/>
  134. </ColumnInfo>
  135. <Rows>
  136. <Row>
  137. <Col id="condflag"/>
  138. <Col id="fromdd"/>
  139. <Col id="todd"/>
  140. <Col id="pid"/>
  141. <Col id="hngnm"/>
  142. <Col id="opyn"/>
  143. <Col id="reqyn"/>
  144. </Row>
  145. </Rows>
  146. </Dataset>
  147. <Dataset id="ds_main_list_inpatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  148. <ColumnInfo>
  149. <Column id="wardcd" type="STRING" size="256" sumtext="병동코드"/>
  150. <Column id="roomcd" type="STRING" size="256" sumtext="병실코드"/>
  151. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  152. <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
  153. <Column id="rrgstno1" type="STRING" size="256" sumtext="주민번호1"/>
  154. <Column id="rrgstno2" type="STRING" size="256" sumtext="주민번호2"/>
  155. <Column id="rrgstno" type="STRING" size="256" sumtext="주민번호"/>
  156. <Column id="sex" type="STRING" size="256" sumtext="성별"/>
  157. <Column id="age" type="STRING" size="256" sumtext="나이"/>
  158. <Column id="sexage" type="STRING" size="256" sumtext="S/A"/>
  159. <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과명"/>
  160. <Column id="orddrnm" type="STRING" size="256" sumtext="진료의사명"/>
  161. <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
  162. <Column id="dschdd" type="STRING" size="256" sumtext="퇴원일자"/>
  163. <Column id="rgstdd" type="STRING" size="256" sumtext="등록일자"/>
  164. <Column id="reqdd" type="STRING" size="256" sumtext="의뢰일자"/>
  165. <Column id="coophospnm" type="STRING" size="256" sumtext="의뢰병원명"/>
  166. <Column id="drnm" type="STRING" size="256" sumtext="의뢰의사명"/>
  167. <Column id="repldd" type="STRING" size="256" sumtext="회신일자"/>
  168. <Column id="hospgrade" type="STRING" size="256" sumtext="병원구분"/>
  169. <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
  170. <Column id="seqno" type="STRING" size="256" sumtext="이력일련번호"/>
  171. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  172. <Column id="ordtype" type="STRING" size="256" sumtext="진료상태"/>
  173. <Column id="indschacptstat" type="STRING" size="256" sumtext="입퇴원접수상태"/>
  174. </ColumnInfo>
  175. </Dataset>
  176. <Dataset id="ds_init_cond_A0429" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  177. <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  178. <Dataset id="ds_temp_patientinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  179. </Objects>
  180. <Bind>
  181. <BindItem id="item0" compid="group1.cmb_condflag" propid="value" datasetid="ds_main_search" columnid="condflag"/>
  182. <BindItem id="item1" compid="group1.ipt_fromdd" propid="value" datasetid="ds_main_search" columnid="fromdd"/>
  183. <BindItem id="item2" compid="group1.ipt_todd" propid="value" datasetid="ds_main_search" columnid="todd"/>
  184. <BindItem id="item3" compid="group1.ipt_pid" propid="value" datasetid="ds_main_search" columnid="pid"/>
  185. <BindItem id="item4" compid="group1.ipt_hngnm" propid="value" datasetid="ds_main_search" columnid="hngnm"/>
  186. <BindItem id="item5" compid="group1.chk_opyn" propid="value" datasetid="ds_main_search" columnid="opyn"/>
  187. <BindItem id="item6" compid="group1.chk_reqyn" propid="value" datasetid="ds_main_search" columnid="reqyn"/>
  188. </Bind>
  189. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  190. * System Name :
  191. * Job Name :
  192. * Creator :
  193. * Make Date : 2015-11-13
  194. * Description :
  195. *---------------------------------------------------------------------------------------
  196. * Modify Date Modifier Modify Description
  197. *---------------------------------------------------------------------------------------
  198. * 2015-11-13 Live Converter TF->XP
  199. *
  200. *---------------------------------------------------------------------------------------
  201. ****************************************************************************************/
  202. include "com_commonxp::comm_main.xjs";
  203. var arErrorCode = new HashArray();
  204. var CurrentDate = utlf_getCurrentDate();
  205. function SMARC00700_oninit(obj:Form, e:InitEventInfo)
  206. {
  207. frmf_initForm(obj);
  208. }
  209. function SMARC00700_onload(obj:Form, e:LoadEventInfo)
  210. {
  211. grdf_initGrid(grd_list);
  212. fInit();
  213. }
  214. // 초기값 셋팅
  215. function fInit()
  216. {
  217. //병원구분코드(공통코드)조회
  218. ds_init_cond_A0429.clearData();
  219. var arrParam = [{dsNm: "ds_init_cond_A0429", cdGrpId: "A0429" }];
  220. appf_getCodeList(arrParam, true);
  221. //조회조건 세팅
  222. fSetCondition();
  223. }
  224. function fSetCondition(condflag)
  225. {
  226. if(utlf_isNull(condflag) || condflag == '' )
  227. {
  228. condflag = '1';
  229. }
  230. //condflag : 1 (내원자) , 2(퇴원일자)
  231. //내원자 조회는 잘짜입력안함.. 퇴원일자는 조회조건에 날짜선택가능하고 default는 오늘날짜만 ..
  232. if(condflag == '1')
  233. {
  234. ds_main_search.setColumn(0, "fromdd", "");
  235. ds_main_search.setColumn(0, "todd", "");
  236. group1.ipt_fromdd.enable = false;
  237. group1.ipt_todd.enable = false;
  238. ds_main_search.setColumn(0, "reqyn", "CP");
  239. }
  240. else if(condflag == '2' || condflag == '3')
  241. {
  242. ds_main_search.setColumn(0, "fromdd", CurrentDate);
  243. ds_main_search.setColumn(0, "todd", CurrentDate);
  244. group1.ipt_fromdd.enable = true;
  245. group1.ipt_todd.enable = true;
  246. }
  247. ds_main_search.setColumn(0, "condflag", condflag);
  248. }
  249. function group1_cmb_condflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  250. {
  251. fSetCondition(obj.value);
  252. }
  253. function group1_ipt_pid_onkeyup(obj:Edit, e:KeyEventInfo)
  254. {
  255. if(e.keycode == 13)
  256. {
  257. obj.updateToDataset();
  258. group1.btn_search.setFocus();
  259. fGetPatientInfo('1', obj.value);
  260. }
  261. }
  262. function fGetPatientInfo(srchcond, keyword)
  263. {
  264. ds_send_reqdata.clearData();
  265. ds_temp_patientinfo.clearData();
  266. dsf_makeValue(ds_send_reqdata, "srchcond", "String", srchcond);//1:환자번호조회, 2:환자명조회
  267. if(srchcond == '1')
  268. {
  269. dsf_makeValue(ds_send_reqdata, "pid", "String", keyword);
  270. }
  271. else if(srchcond == '2')
  272. {
  273. dsf_makeValue(ds_send_reqdata, "hngnm", "String", keyword);
  274. }
  275. var oParam = {};
  276. oParam.id = "TRARC00701";
  277. oParam.service = "patinfomngtapp.PatBaseInfo";
  278. oParam.method = "reqGetPatInfo";
  279. oParam.inds = "req=ds_send_reqdata";
  280. oParam.outds = "ds_temp_patientinfo=patinfolist";
  281. oParam.async = false;
  282. oParam.callback = "cf_TRARC00701";
  283. tranf_submit(oParam);
  284. if(arErrorCode.pop("TRARC00701") > -1)
  285. {
  286. if(ds_temp_patientinfo.rowcount != 1)
  287. {
  288. fPopupWindowPatient(srchcond, keyword);
  289. }
  290. else if(ds_temp_patientinfo.rowcount == 1)
  291. {
  292. ds_main_search.setColumn(0, "pid", ds_temp_patientinfo.getColumn(0, "pid"));
  293. ds_main_search.setColumn(0, "hngnm", ds_temp_patientinfo.getColumn(0, "hngnm"));
  294. }
  295. }
  296. }
  297. function cf_TRARC00701(sSvcId, nErrorCode, sErrorMsg) {
  298. arErrorCode.push(sSvcId, nErrorCode);
  299. }
  300. function fPopupWindowPatient(srchcond, keyword){
  301. //parameter값 세팅
  302. ds_temp_patientinfo.clearData();
  303. dsf_makeValue(ds_temp_patientinfo, "pid", "String", keyword == ''? group1.ipt_pid.text : keyword);
  304. dsf_makeValue(ds_temp_patientinfo, "hngnm", "String", keyword == ''? group1.ipt_hngnm.text : keyword);
  305. dsf_makeValue(ds_temp_patientinfo, "srchcond", "String", srchcond);
  306. //원무팀의 환자명을 받아오는 팝업창을 띄운다.
  307. var objArg = new Object();
  308. objArg.arg_ds_send = ds_temp_patientinfo;
  309. frmf_modal("SPPMC02500", "SPPMC02500", objArg, "","","","","","","","","","M");
  310. //팝업의 result는 /root/main/patinfo/patinfolist 에 들어온다.
  311. ds_main_search.setColumn(0, "pid", ds_patinfolist.getColumn(0, "pid"));
  312. ds_main_search.setColumn(0, "hngnm", ds_patinfolist.getColumn(0, "hngnm"));
  313. }
  314. function group1_button19_onclick(obj:Button, e:ClickEventInfo)
  315. {
  316. fPopupWindowPatient();
  317. }
  318. function group1_ipt_hngnm_onkeyup(obj:Edit, e:KeyEventInfo)
  319. {
  320. if(e.keycode == 13)
  321. {
  322. obj.updateToDataset();
  323. fSearch();
  324. }
  325. }
  326. function group1_chk_opyn_onclick(obj:CheckBox, e:ClickEventInfo)
  327. {
  328. if(obj.value == "E")
  329. {
  330. }
  331. else
  332. {
  333. ds_main_search.setColumn(0, "opyn", "");
  334. }
  335. }
  336. function group1_chk_reqyn_onclick(obj:CheckBox, e:ClickEventInfo)
  337. {
  338. if(obj.value == "CP")
  339. {
  340. }
  341. else
  342. {
  343. ds_main_search.setColumn(0, "reqyn", "");
  344. }
  345. }
  346. function group1_btn_search_onclick(obj:Button, e:ClickEventInfo)
  347. {
  348. fSearch();
  349. }
  350. function fSearch()
  351. {
  352. var reqyn = ds_main_search.getColumn(0, "reqyn"); //조회조건의 의뢰환자 chk true일때의 값:CP
  353. var opyn = ds_main_search.getColumn(0, "opyn"); //조회조건의 수술환자 chk true일때의 값:E
  354. var pid = group1.ipt_pid.text; //환자등록번호
  355. var hngnm = group1.ipt_hngnm.text; //환자명
  356. var condflag = ds_main_search.getColumn(0, "condflag"); //조회조건
  357. var fromdd = ds_main_search.getColumn(0, "fromdd");
  358. var todd = ds_main_search.getColumn(0, "todd");
  359. if (condflag == "1")
  360. {
  361. }
  362. else
  363. {
  364. if( ! utlf_isValidDateTime( fromdd, 'YYYYMMDD') || ! utlf_isValidDateTime( todd, 'YYYYMMDD') )
  365. {
  366. sysf_messageBox("입력하신 일자구분이 정확한 날짜타입이 아닙니다.", "E999", "");
  367. return;
  368. }
  369. if( utlf_getDateInterval(fromdd, todd) > 31 )
  370. {
  371. sysf_messageBox("조회가능한 최대 기간은 1달입니다. 일자구분에서 날짜를 수정하세요!", "E999", "");
  372. return;
  373. }
  374. if( utlf_getDateInterval(fromdd, todd) < 0 )
  375. {
  376. sysf_messageBox("일자구분에서 시작일자가 종료일자보다 미래일자 입니다. 확인하세요!", "E999", "");
  377. return;
  378. }
  379. if (String(hngnm).length > 0 && String(hngnm).length < 2)
  380. {
  381. sysf_messageBox( '환자명을 2자리 이상', 'C001' );
  382. return;
  383. }
  384. }
  385. var oParam = {};
  386. oParam.id = "TRARC00701";
  387. oParam.service = "healcarecoopapp.ReqMngt";
  388. oParam.method = "reqGetInOpPatList";
  389. oParam.inds = "req=ds_main_search";
  390. oParam.outds = "ds_main_list_inpatlist=inpatlist";
  391. oParam.async = false;
  392. oParam.callback = "cf_TRARC00701";
  393. tranf_submit(oParam);
  394. if(arErrorCode.pop("TRARC00701") < 0)
  395. {
  396. sysf_messageBox('조회를', 'E009');
  397. return ;
  398. }
  399. }
  400. function cf_TRARC00701(sSvcId, nErrorCode, sErrorMsg) {
  401. arErrorCode.push(sSvcId, nErrorCode);
  402. }
  403. function grd_list_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  404. {
  405. fOpen();
  406. }
  407. function fOpen()
  408. {
  409. var mainObj = frmf_getMainViewer();
  410. var curRow = ds_main_list_inpatlist.rowposition; //그리드에서 해당 환자 선택
  411. if (curRow < 0) return;
  412. var pid = ds_main_list_inpatlist.getColumn(curRow, "pid");
  413. var orddd = ds_main_list_inpatlist.getColumn(curRow, "indd");
  414. var cretno = ds_main_list_inpatlist.getColumn(curRow, "cretno");
  415. var instcd = ds_main_list_inpatlist.getColumn(curRow, "instcd");
  416. var acptseqno = ds_main_list_inpatlist.getColumn(curRow, "seqno");
  417. var dschdd = ds_main_list_inpatlist.getColumn(curRow, "dschdd");
  418. var indschacptstat = ds_main_list_inpatlist.getColumn(curRow, "indschacptstat");
  419. var ordtype = ds_main_list_inpatlist.getColumn(curRow, "ordtype");
  420. var curdate = utlf_getCurrentDate();
  421. if (ordtype == "E")
  422. {
  423. curdate = orddd;
  424. }
  425. else if (ordtype == "I")
  426. {
  427. if (indschacptstat == "D")
  428. {
  429. curdate = dschdd;
  430. }
  431. else if (indschacptstat == "T")
  432. {
  433. if (dschdd != "99991231")
  434. {
  435. curdate = dschdd;
  436. }
  437. }
  438. }
  439. else
  440. {
  441. ordtype = "I";
  442. if (indschacptstat == "D")
  443. {
  444. curdate = dschdd;
  445. }
  446. }
  447. var condparam = ordtype + '▦' + pid + '▦' + orddd + '▦' + cretno + '▦' + instcd + '▦' + curdate;
  448. frmf_setParameter('condparam', condparam);
  449. appf_initPatientInfo(condparam);
  450. var curEmrRecObj = frmf_findPopup("SPARC00100"); //활성화된 진료기록 화면 object loading
  451. if (curEmrRecObj != null)
  452. {
  453. curEmrRecObj.fInit();
  454. }
  455. else
  456. {
  457. frmf_open("SPARC00100", "SPARC00100", "", "","","","","","","","","","M");
  458. }
  459. }
  460. function btn_allclear_onclick(obj:Button, e:ClickEventInfo)
  461. {
  462. fInit();
  463. }
  464. ]]></Script>
  465. </Form>
  466. </FDL>