SPMMO01000_외래예약처방입원전환.xfdl 22 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPMMO01000" position="absolute 0 0 890 392" titletext="외래예약처방 입원전환" oninit="SPMMO01000_oninit" onload="SPMMO01000_onload">
  5. <Layouts>
  6. <Layout>
  7. <Grid position="absolute 0 0 890 366" id="grd_prcplist" taborder="1" binddataset="ds_initsrchprcp_rsrvcvrtprcp" autofittype="col">
  8. <Formats>
  9. <Format id="default">
  10. <Columns>
  11. <Column size="29"/>
  12. <Column size="68"/>
  13. <Column size="110"/>
  14. <Column size="60"/>
  15. <Column size="0"/>
  16. <Column size="60"/>
  17. <Column size="65"/>
  18. <Column size="253"/>
  19. <Column size="30"/>
  20. <Column size="30"/>
  21. <Column size="30"/>
  22. <Column size="133"/>
  23. </Columns>
  24. <Rows>
  25. <Row size="24" band="head"/>
  26. <Row size="24"/>
  27. </Rows>
  28. <Band id="head">
  29. <Cell/>
  30. <Cell col="1" text="처방일자"/>
  31. <Cell col="2" text="처방과"/>
  32. <Cell col="3" text="처방의"/>
  33. <Cell col="4" text="분류"/>
  34. <Cell col="5" text="처방분류"/>
  35. <Cell col="6" text="처방코드"/>
  36. <Cell col="7" text="처방명"/>
  37. <Cell col="8" text="수량"/>
  38. <Cell col="9" text="횟수"/>
  39. <Cell col="10" text="일수"/>
  40. <Cell col="11" text="예약일시"/>
  41. </Band>
  42. <Band id="body">
  43. <Cell displaytype="checkbox" edittype="expr:isReadonly(currow, &quot;choiflag&quot;) ? &quot;none&quot; : &quot;checkbox&quot;" style="controlbackground:EXPR(isReadonly(currow, &quot;choiflag&quot;) ? &quot;silver&quot; : &quot;default&quot;);controlborder:EXPR(isReadonly(currow, &quot;choiflag&quot;) ? &quot;1 solid #708090cc&quot; : &quot;default&quot;);" text="bind:choiflag" expr="expr:(choiflag == &quot;Y&quot; || choiflag == 1) ? 1 : 0"/>
  44. <Cell col="1" displaytype="date" text="bind:prcpdd"/>
  45. <Cell col="2" text="bind:depthngnm"/>
  46. <Cell col="3" text="bind:usernm"/>
  47. <Cell col="4" displaytype="combo" edittype="combo" text="bind:prcpclscd"/>
  48. <Cell col="5" displaytype="combo" edittype="combo" style="align:center;" text="bind:prcpclscd" combodataset="ds_init_prcpclscd" combocodecol="cdid" combodatacol="cdnm"/>
  49. <Cell col="6" style="align:left middle;" text="bind:prcpcd"/>
  50. <Cell col="7" style="align:left middle;" text="bind:prcpnm"/>
  51. <Cell col="8" text="bind:prcpqty" mask="#.###"/>
  52. <Cell col="9" text="bind:prcptims"/>
  53. <Cell col="10" text="bind:prcpdayno"/>
  54. <Cell col="11" displaytype="date" text="bind:rsrvdt" mask="yyyy-MM-dd hh:mm:ss"/>
  55. </Band>
  56. </Format>
  57. </Formats>
  58. </Grid>
  59. <Shape position="absolute 7 0 890 1" linetype="vertical" id="line5" class="line_1"/>
  60. <Button position="absolute 774 372 830 392" id="button1" class="btn4" text="저장" onclick="button1_onclick"/>
  61. <Button position="absolute 834 372 890 392" id="button2" class="btn4" text="취소" onclick="button2_onclick"/>
  62. <Static text="외래 예약처방 입원전환은 해당 진료과 처방만 가능합니다." position="absolute 0 372 400 392" id="caption4"/>
  63. </Layout>
  64. </Layouts>
  65. <Objects>
  66. <Dataset id="ds_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  67. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  68. <ColumnInfo>
  69. <Column id="prcpkindcd" type="STRING" size="256"/>
  70. <Column id="prcpclscd" type="STRING" size="256"/>
  71. <Column id="prcpstatcd" type="STRING" size="256"/>
  72. <Column id="hosinprcpresncd" type="STRING" size="256"/>
  73. <Column id="payflagcd" type="STRING" size="256"/>
  74. <Column id="orddept" type="STRING" size="256"/>
  75. </ColumnInfo>
  76. </Dataset>
  77. <Dataset id="ds_initsrch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  78. <ColumnInfo>
  79. <Column id="rsrvcvrtprcp" type="STRING" size="256"/>
  80. </ColumnInfo>
  81. </Dataset>
  82. <Dataset id="ds_initsrchprcp_rsrvcvrtprcp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_initsrchprcp_rsrvcvrtprcp_oncolumnchanged">
  83. <ColumnInfo>
  84. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  85. <Column id="prcpno" type="STRING" size="256" sumtext="처방번호"/>
  86. <Column id="prcphistno" type="STRING" size="256" sumtext="처방이력번호"/>
  87. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  88. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  89. <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
  90. <Column id="prcpqty" type="STRING" size="256" sumtext="처방수량"/>
  91. <Column id="prcptims" type="STRING" size="256" sumtext="처방횟수"/>
  92. <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
  93. <Column id="prcpgenrflag" type="STRING" size="256" sumtext="처방발생구분"/>
  94. <Column id="prcpclscd" type="STRING" size="256" sumtext="처방분류코드"/>
  95. <Column id="execprcpno" type="STRING" size="256" sumtext="실시처방번호"/>
  96. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  97. <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
  98. <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
  99. <Column id="actorddd" type="STRING" size="256" sumtext="실시진료일자"/>
  100. <Column id="actcretno" type="STRING" size="256" sumtext="실시생성번호"/>
  101. <Column id="execprcpqty" type="STRING" size="256" sumtext="실시처방수량"/>
  102. <Column id="execprcptims" type="STRING" size="256" sumtext="실시처방횟수"/>
  103. <Column id="execprcpdayno" type="STRING" size="256" sumtext="실시처방일수"/>
  104. <Column id="rsrvdt" type="STRING" size="256" sumtext="예약일시"/>
  105. <Column id="execprcpuniqno" type="STRING" size="256" sumtext="실시처방유일번호"/>
  106. <Column id="choiflag" type="STRING" size="256" sumtext="선택구분"/>
  107. <Column id="depthngnm" type="STRING" size="256" sumtext="처방과"/>
  108. <Column id="usernm" type="STRING" size="256" sumtext="처방의"/>
  109. <Column id="smdeptyn" type="STRING" size="256" sumtext="처방과동일여부"/>
  110. </ColumnInfo>
  111. </Dataset>
  112. <Dataset id="ds_send_cond1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  113. <ColumnInfo>
  114. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  115. <Column id="prcpno" type="STRING" size="256" sumtext="처방번호"/>
  116. <Column id="prcphistno" type="STRING" size="256" sumtext="처방이력번호"/>
  117. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  118. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  119. <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
  120. <Column id="prcpqty" type="STRING" size="256" sumtext="처방수량"/>
  121. <Column id="prcptims" type="STRING" size="256" sumtext="처방횟수"/>
  122. <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
  123. <Column id="prcpclscd" type="STRING" size="256" sumtext="처방분류코드"/>
  124. <Column id="execprcpno" type="STRING" size="256" sumtext="실시처방번호"/>
  125. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  126. <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
  127. <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
  128. <Column id="actorddd" type="STRING" size="256" sumtext="실시진료일자"/>
  129. <Column id="actcretno" type="STRING" size="256" sumtext="실시생성번호"/>
  130. <Column id="execprcpqty" type="STRING" size="256" sumtext="실시처방수량"/>
  131. <Column id="execprcptims" type="STRING" size="256" sumtext="실시처방횟수"/>
  132. <Column id="execprcpdayno" type="STRING" size="256" sumtext="실시처방일수"/>
  133. <Column id="rsrvdt" type="STRING" size="256" sumtext="예약일시"/>
  134. <Column id="execprcpuniqno" type="STRING" size="256" sumtext="실시처방유일번호"/>
  135. <Column id="choiflag" type="STRING" size="256" sumtext="선택구분"/>
  136. </ColumnInfo>
  137. <Rows>
  138. <Row/>
  139. </Rows>
  140. </Dataset>
  141. <Dataset id="ds_send_cond2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  142. <ColumnInfo>
  143. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  144. <Column id="orddd" type="STRING" size="256" sumtext="진료일자 (입원일 경우 입원일자)"/>
  145. <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
  146. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  147. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  148. <Column id="deptcd" type="STRING" size="256" sumtext="부서코드"/>
  149. <Column id="userid" type="STRING" size="256" sumtext="userid"/>
  150. </ColumnInfo>
  151. <Rows>
  152. <Row/>
  153. </Rows>
  154. </Dataset>
  155. <Dataset id="ds_rsrvcvrtprcp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  156. <Dataset id="ds_init_prcpclscd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  157. <ColumnInfo>
  158. <Column id="cdnm" type="STRING" size="256"/>
  159. <Column id="cdid" type="STRING" size="256"/>
  160. </ColumnInfo>
  161. </Dataset>
  162. <Dataset id="ds_initsrchcond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  163. <ColumnInfo>
  164. <Column id="ioflag" type="STRING" size="256"/>
  165. <Column id="pid" type="STRING" size="256"/>
  166. <Column id="orddd" type="STRING" size="256"/>
  167. <Column id="cretno" type="STRING" size="256"/>
  168. <Column id="instcd" type="STRING" size="256"/>
  169. <Column id="prcpdd" type="STRING" size="256"/>
  170. <Column id="deptcd" type="STRING" size="256"/>
  171. <Column id="userid" type="STRING" size="256"/>
  172. <Column id="scrnkindcd" type="STRING" size="256"/>
  173. <Column id="scrnid" type="STRING" size="256"/>
  174. <Column id="suppkind" type="STRING" size="256"/>
  175. <Column id="orddeptcd" type="STRING" size="256"/>
  176. <Column id="prcpkind" type="STRING" size="256"/>
  177. </ColumnInfo>
  178. <Rows>
  179. <Row/>
  180. </Rows>
  181. </Dataset>
  182. <Dataset id="ds_initsrchprcp_prcpetccnts" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  183. <ColumnInfo>
  184. <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
  185. <Column id="prcpno" type="STRING" size="256" sumtext="처방번호"/>
  186. <Column id="prcphistno" type="STRING" size="256" sumtext="처방이력번호"/>
  187. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  188. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  189. <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
  190. <Column id="prcpqty" type="STRING" size="256" sumtext="처방수량"/>
  191. <Column id="prcptims" type="STRING" size="256" sumtext="처방횟수"/>
  192. <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
  193. <Column id="prcpgenrflag" type="STRING" size="256" sumtext="처방발생구분"/>
  194. <Column id="prcpclscd" type="STRING" size="256" sumtext="처방분류코드"/>
  195. <Column id="execprcpno" type="STRING" size="256" sumtext="실시처방번호"/>
  196. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  197. <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
  198. <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
  199. <Column id="actorddd" type="STRING" size="256" sumtext="실시진료일자"/>
  200. <Column id="actcretno" type="STRING" size="256" sumtext="실시생성번호"/>
  201. <Column id="execprcpqty" type="STRING" size="256" sumtext="실시처방수량"/>
  202. <Column id="execprcptims" type="STRING" size="256" sumtext="실시처방횟수"/>
  203. <Column id="execprcpdayno" type="STRING" size="256" sumtext="실시처방일수"/>
  204. <Column id="rsrvdt" type="STRING" size="256" sumtext="예약일시"/>
  205. <Column id="execprcpuniqno" type="STRING" size="256" sumtext="실시처방유일번호"/>
  206. <Column id="choiflag" type="STRING" size="256" sumtext="선택구분"/>
  207. <Column id="depthngnm" type="STRING" size="256" sumtext="처방과"/>
  208. <Column id="usernm" type="STRING" size="256" sumtext="처방의"/>
  209. <Column id="smdeptyn" type="STRING" size="256" sumtext="처방과동일여부"/>
  210. </ColumnInfo>
  211. </Dataset>
  212. <Dataset id="ds_send_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  213. <ColumnInfo>
  214. <Column id="pid" type="STRING" size="256"/>
  215. <Column id="orddd" type="STRING" size="256"/>
  216. <Column id="cretno" type="STRING" size="256"/>
  217. <Column id="instcd" type="STRING" size="256"/>
  218. <Column id="prcpdd" type="STRING" size="256"/>
  219. <Column id="deptcd" type="STRING" size="256"/>
  220. <Column id="userid" type="STRING" size="256"/>
  221. </ColumnInfo>
  222. <Rows>
  223. <Row/>
  224. </Rows>
  225. </Dataset>
  226. </Objects>
  227. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  228. * System Name :
  229. * Job Name :
  230. * Creator :
  231. * Make Date : 2014-12-10
  232. * Description :
  233. *---------------------------------------------------------------------------------------
  234. * Modify Date Modifier Modify Description
  235. *---------------------------------------------------------------------------------------
  236. * 2014-12-10 Live Converter TF->XP
  237. *
  238. *---------------------------------------------------------------------------------------
  239. ****************************************************************************************/
  240. // 20200115 이돈희 : 메뉴를 통해 오픈하는 경우 사용
  241. include "com_commonxp::comm_main.xjs";
  242. function SPMMO01000_oninit(obj:Form, e:InitEventInfo)
  243. {
  244. frmf_initForm(obj);
  245. }
  246. function fInit(){
  247. var pamInfoCvs = sysf_getGlobalVariable("paminfo");
  248. if(!utlf_isNull(pamInfoCvs)){
  249. dsf_setCSVToDs("ds_paminfo", pamInfoCvs); //상단화면 정보 초기화
  250. var userdept = sysf_getUserInfo ( "dutplcecd" );
  251. var pamdept = ds_paminfo.getColumn(0, "orddeptcd");
  252. if (userdept == pamdept){
  253. var orddd = "";
  254. if (ds_paminfo.getColumn(0, "ioflag") == "O" || ds_paminfo.getColumn(0, "ioflag") == "S") {
  255. orddd = ds_paminfo.getColumn(0, "orddd");
  256. } else {
  257. orddd = ds_paminfo.getColumn(0, "indd");
  258. }
  259. ds_initsrchcond.setColumn(0, "ioflag", ds_paminfo.getColumn(0, "ioflag"));
  260. ds_initsrchcond.setColumn(0, "pid", ds_paminfo.getColumn(0, "pid"));
  261. ds_initsrchcond.setColumn(0, "orddd", orddd);
  262. ds_initsrchcond.setColumn(0, "cretno", ds_paminfo.getColumn(0, "cretno"));
  263. ds_initsrchcond.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
  264. ds_initsrchcond.setColumn(0, "prcpdd", utlf_getCurrentDate());
  265. ds_initsrchcond.setColumn(0, "deptcd", sysf_getUserInfo("dutplcecd"));
  266. ds_initsrchcond.setColumn(0, "userid", sysf_getUserInfo("userid"));
  267. ds_initsrchcond.setColumn(0, "scrnkindcd", "00");
  268. ds_initsrchcond.setColumn(0, "scrnid", "SMMMO00100" );
  269. ds_initsrchcond.setColumn(0, "suppkind", ds_paminfo.getColumn(0, "suppkind"));
  270. ds_initsrchcond.setColumn(0, "orddeptcd", ds_paminfo.getColumn(0, "orddeptcd"));
  271. ds_initsrchcond.setColumn(0, "prcpkind", "prcp" );
  272. var oParam = {};
  273. oParam.id = "TRMMO00206";
  274. oParam.service = "prcpmngtapp.PrcpMngt";
  275. oParam.method = "reqGetPrcpEtcEnvCntsPrcp";
  276. oParam.inds = "req=ds_initsrchcond";
  277. oParam.outds = "ds_initsrchprcp_prcpetccnts=prcpetccnts ds_initsrchprcp_rsrvcvrtprcp=rsrvcvrtprcp";
  278. oParam.async = false;
  279. tranf_submit(oParam);
  280. if(ds_initsrchprcp_rsrvcvrtprcp.rowcount <= 0){
  281. sysf_messageBox("외래예약처방 중 입원전환 할 대상이 존재하지 않습니다.");
  282. }
  283. } else {
  284. sysf_messageBox("로그인 부서정보와 환자의 주진료과가 상이합니다.");
  285. }
  286. } else {
  287. sysf_messageBox("상단에 환자정보가 없습니다.");
  288. }
  289. }
  290. function SPMMO01000_onload(obj:Form, e:LoadEventInfo)
  291. {
  292. grdf_setToolTipBind(grd_prcplist);
  293. var arrParam = [{dsNm: "ds_init_prcpclscd", cdGrpId: "M0005"}]
  294. appf_getCodeList(arrParam);
  295. fInit();
  296. //진료과가 다를경우 Checkbox 비활성화
  297. /*
  298. for(var i = 0; i < grd_prcplist.rowcount; i++){
  299. var smdeptyn = ds_initsrch_rsrvcvrtprcp.getColumn(i, "smdeptyn"); //model.getValue("/root/initsrch/rsrvcvrtprcp[" + i + "]/smdeptyn");
  300. if (smdeptyn == "N") {
  301. grd_prcplist.setCellProperty('body', grd_prcplist.getBindCellIndex("body", "choiflag"), 'displaytype', 'none');
  302. grd_prcplist.setCellProperty('body', grd_prcplist.getBindCellIndex("body", "choiflag"), 'edittype', 'none');
  303. } else {
  304. grd_prcplist.setCellProperty('body', grd_prcplist.getBindCellIndex("body", "choiflag"), 'displaytype', 'checkbox');
  305. grd_prcplist.setCellProperty('body', grd_prcplist.getBindCellIndex("body", "choiflag"), 'edittype', 'checkbox');
  306. }
  307. }
  308. */
  309. }
  310. function button1_onclick(obj:Button, e:ClickEventInfo)
  311. {
  312. //var srcNodeList = model.instances(0).selectNodes ("/root/initsrch/rsrvcvrtprcp");
  313. //var destNode = model.instances(0).selectSingleNode( "/root/rsrvcvrtprcp" );
  314. var curitem = 0;
  315. var chkcnt = 0;
  316. var nochkcnt = 0;
  317. dsf_copyColInfo(ds_rsrvcvrtprcp, ds_initsrchprcp_rsrvcvrtprcp);
  318. for ( var i = 0; i < ds_initsrchprcp_rsrvcvrtprcp.rowcount; i++ ) {
  319. if ( ds_initsrchprcp_rsrvcvrtprcp.getColumn(i, "choiflag") != "Y" ) {
  320. nochkcnt++;
  321. }
  322. curitem = i - 1;
  323. chkcnt++;
  324. var row = ds_rsrvcvrtprcp.addRow();
  325. ds_rsrvcvrtprcp.copyRow(row, ds_initsrchprcp_rsrvcvrtprcp, i);
  326. //destNode.appendChild(srcNodeList.item(curitem).cloneNode(true));
  327. //kimsj app단에서 "Y", "N"에 따라 다른 프로세스로 이동하기 때문에 여기에서 걸러낼 필요없는 것으로 보임
  328. }
  329. if ( chkcnt > 0 ) {
  330. var orddd = "";
  331. if (ds_paminfo.getColumn(0, "ioflag") == "O" || ds_paminfo.getColumn(0, "ioflag") == "S") {
  332. orddd = ds_paminfo.getColumn(0, "orddd");
  333. } else {
  334. orddd = ds_paminfo.getColumn(0, "indd");
  335. }
  336. ds_send_paminfo.setColumn(0, "pid", ds_paminfo.getColumn(0, "pid"));
  337. ds_send_paminfo.setColumn(0, "orddd", orddd);
  338. ds_send_paminfo.setColumn(0, "cretno", ds_paminfo.getColumn(0, "cretno"));
  339. ds_send_paminfo.setColumn(0, "instcd", ds_paminfo.getColumn(0, "instcd"));
  340. ds_send_paminfo.setColumn(0, "prcpdd", utlf_getCurrentDate());
  341. ds_send_paminfo.setColumn(0, "deptcd", sysf_getUserInfo("dutplcecd"));
  342. ds_send_paminfo.setColumn(0, "userid", sysf_getUserInfo("userid"));
  343. //20200114 이돈희 : 현재 ds_send_cond1 과 ds_send_cond2 사용
  344. /*
  345. for( var j = 0; j < ds_rsrvcvrtprcp.colcount; j++ ) {
  346. var colId = ds_rsrvcvrtprcp.getColID(j);
  347. ds_send_cond1.setColumn( 0, colId, ds_rsrvcvrtprcp.getColumn(0, colId) );
  348. }
  349. for( var j = 0; j < ds_paminfo.colcount; j++ ) {
  350. var colId = ds_paminfo.getColID(j);
  351. ds_send_cond2.setColumn( 0, colId, ds_paminfo.getColumn(0, colId) );
  352. }
  353. */
  354. if ( nochkcnt > 0 && sysf_messageBox ( "체크안된 처방은 승계되지 않습니다. 저장하시겠습니까?", "Q" ) != "6" ) {
  355. return;
  356. }
  357. var oParam = {};
  358. oParam.id = "TXMMO01001";
  359. oParam.service = "prcpmngtapp.PrcpMngt";
  360. oParam.method = "reqExeSaveRsrvPrcpCvrt";
  361. oParam.inds = "rsrvcvrtprcp=ds_rsrvcvrtprcp paminfo=ds_send_paminfo";
  362. //oParam.outds = "";
  363. oParam.async = false;
  364. oParam.callback = "cf_TXMMO01001";
  365. tranf_submit(oParam);
  366. } else {
  367. sysf_messageBox ( "선택된 처방이", "I004" );
  368. return;
  369. }
  370. close();
  371. }
  372. function cf_TXMMO01001(sSvcId, nErrorCode, sErrorMsg) {
  373. if(nErrorCode < 0) return;
  374. opener.frmf_setParameter ( "SPMMO01000_rtnyn", "Y" );
  375. }
  376. function button2_onclick(obj:Button, e:ClickEventInfo)
  377. {
  378. close();
  379. }
  380. // TF의 readonly bind 통합처리
  381. function isReadonly(currow, colId) {
  382. var result = false;
  383. if(colId == "choiflag") { // TF bind1
  384. var smdeptyn = ds_initsrchprcp_rsrvcvrtprcp.getColumn(currow, "smdeptyn");
  385. if (smdeptyn == "N") {
  386. result = true;
  387. }
  388. }
  389. return result;
  390. }
  391. function ds_initsrchprcp_rsrvcvrtprcp_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  392. {
  393. if(e.columnid == "choiflag") {
  394. obj.setColumn(e.row, e.columnid, (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
  395. }
  396. }
  397. ]]></Script>
  398. </Form>
  399. </FDL>