SPZUM90100_메세지오픈.xfdl 21 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPZUM90100" position="absolute 0 0 700 300" titletext="오픈 리스트" oninit="SPZUM90100_oninit" onload="SPZUM90100_onload">
  5. <Layouts>
  6. <Layout>
  7. <Button position="absolute 641 274 696 296" id="button1" class="btn4" text="닫기" onclick="button1_onclick"/>
  8. <Static text="오픈 리스트" position="absolute 0 0 171 20" id="caption1" class="tit_2"/>
  9. <Grid position="absolute 0 20 700 270" id="grd_sysmsglist" binddataset="ds_msglist" cellsizingtype="col" selecttype="row" autosizingtype="row" extendsizetype="row" autofittype="col" oncellclick="grd_sysmsglist_oncellclick" onexpandup="grd_sysmsglist_onexpandup">
  10. <Formats>
  11. <Format id="default">
  12. <Columns>
  13. <Column size="40"/>
  14. <Column size="50"/>
  15. <Column size="120"/>
  16. <Column size="430"/>
  17. <Column size="60"/>
  18. </Columns>
  19. <Rows>
  20. <Row size="24" band="head"/>
  21. <Row size="24"/>
  22. </Rows>
  23. <Band id="head">
  24. <Cell text="업무"/>
  25. <Cell col="1" text="오픈코드"/>
  26. <Cell col="2" text="요약"/>
  27. <Cell col="3" text="상세내용"/>
  28. <Cell col="4" text="확인여부"/>
  29. </Band>
  30. <Band id="body">
  31. <Cell style="align:center middle;" text="bind:bizflag" suppress="1" suppressalign="middle,over"/>
  32. <Cell col="1" displaytype="text" style="align:center;padding:3 3 3 3;linespace:3;" text="bind:msgcode" wordwrap="word" suppress="1" suppressalign="middle,over"/>
  33. <Cell col="2" displaytype="text" style="align:left middle;" text="bind:msgnm" wordwrap="word" suppress="1" suppressalign="middle,over" autosizerow="limitmin"/>
  34. <Cell col="3" displaytype="text" edittype="none" style="align:left middle;padding:3 3 3 3;linespace:2;" text="bind:msgcnts" wordwrap="word" autosizerow="limitmin"/>
  35. <Cell col="4" displaytype="text" edittype="expand" style="align:center;cursor:hand;" text="bind:cnfcd" editautoselect="true" expandshow="show" expandsize="30"/>
  36. </Band>
  37. </Format>
  38. </Formats>
  39. </Grid>
  40. <Static id="caption2" text="* 오픈 리스트에서 [확인여부]를 클릭하여 상세 내역을 확인하세요." position="absolute 263 276 635 296"/>
  41. </Layout>
  42. </Layouts>
  43. <Objects>
  44. <Dataset id="ds_arg_sys" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  45. <ColumnInfo>
  46. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  47. <Column id="msgdd" type="STRING" size="256" sumtext="메세지일자"/>
  48. <Column id="msgno" type="STRING" size="256" sumtext="메세지번호"/>
  49. <Column id="histno" type="STRING" size="256" sumtext="메세지이력번호"/>
  50. <Column id="msgcls" type="STRING" size="256" sumtext="메세지 구분(b:before open, f:after open, x:exception e:error r:reason, i:infomation)"/>
  51. <Column id="retranyn" type="STRING" size="256" sumtext="submit recall여부 (y/n)"/>
  52. <Column id="excpcnt" type="STRING" size="256" sumtext="예외 카운트"/>
  53. <Column id="errocnt" type="STRING" size="256" sumtext="오류 카운트"/>
  54. <Column id="resncnt" type="STRING" size="256" sumtext="사유 카운트"/>
  55. <Column id="infocnt" type="STRING" size="256" sumtext="정보 카운트"/>
  56. <Column id="bfopcnt" type="STRING" size="256" sumtext="전 오픈 카운트"/>
  57. <Column id="afopcnt" type="STRING" size="256" sumtext="후 오픈 카운트"/>
  58. <Column id="service" type="STRING" size="256" sumtext="호출 서비스"/>
  59. <Column id="method" type="STRING" size="256" sumtext="호출 메서드"/>
  60. <Column id="screenid" type="STRING" size="256" sumtext="호출 화면"/>
  61. <Column id="submitid" type="STRING" size="256" sumtext="submit 아이디"/>
  62. <Column id="async" type="STRING" size="256" sumtext="비동기여부"/>
  63. <Column id="transact" type="STRING" size="256" sumtext="DB transaction사용여부"/>
  64. <Column id="deptcd" type="STRING" size="256" sumtext="부서코드"/>
  65. <Column id="userid" type="STRING" size="256" sumtext="사용자id"/>
  66. <Column id="ipaddr" type="STRING" size="256" sumtext="호출 ip"/>
  67. <Column id="macaddr" type="STRING" size="256" sumtext="호출 mac"/>
  68. <Column id="param01" type="STRING" size="256" sumtext="사용자 설정 변수값01"/>
  69. <Column id="param02" type="STRING" size="256" sumtext="사용자 설정 변수값02"/>
  70. <Column id="param03" type="STRING" size="256" sumtext="사용자 설정 변수값03"/>
  71. <Column id="param04" type="STRING" size="256" sumtext="사용자 설정 변수값04"/>
  72. <Column id="param05" type="STRING" size="256" sumtext="사용자 설정 변수값05"/>
  73. <Column id="param06" type="STRING" size="256" sumtext="사용자 설정 변수값06"/>
  74. <Column id="param07" type="STRING" size="256" sumtext="사용자 설정 변수값07"/>
  75. <Column id="param08" type="STRING" size="256" sumtext="사용자 설정 변수값08"/>
  76. <Column id="param09" type="STRING" size="256" sumtext="사용자 설정 변수값09"/>
  77. <Column id="param10" type="STRING" size="256" sumtext="사용자 설정 변수값10"/>
  78. <Column id="param11" type="STRING" size="256" sumtext="사용자 설정 변수값11"/>
  79. <Column id="param12" type="STRING" size="256" sumtext="사용자 설정 변수값12"/>
  80. <Column id="param13" type="STRING" size="256" sumtext="사용자 설정 변수값13"/>
  81. <Column id="param14" type="STRING" size="256" sumtext="사용자 설정 변수값14"/>
  82. <Column id="param15" type="STRING" size="256" sumtext="사용자 설정 변수값15"/>
  83. <Column id="param16" type="STRING" size="256" sumtext="사용자 설정 변수값16"/>
  84. <Column id="param17" type="STRING" size="256" sumtext="사용자 설정 변수값17"/>
  85. <Column id="param18" type="STRING" size="256" sumtext="사용자 설정 변수값18"/>
  86. <Column id="param19" type="STRING" size="256" sumtext="사용자 설정 변수값19"/>
  87. <Column id="param20" type="STRING" size="256" sumtext="사용자 설정 변수값20"/>
  88. </ColumnInfo>
  89. </Dataset>
  90. <Dataset id="ds_msglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  91. <ColumnInfo>
  92. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  93. <Column id="msgdd" type="STRING" size="256" sumtext="메세지일자"/>
  94. <Column id="msgno" type="STRING" size="256" sumtext="메세지번호"/>
  95. <Column id="histno" type="STRING" size="256" sumtext="메세지이력번호"/>
  96. <Column id="msgseq" type="STRING" size="256" sumtext="메세지상세번호"/>
  97. <Column id="bizflag" type="STRING" size="256" sumtext="업무구분 ast, com, emr, enr, lis, pam"/>
  98. <Column id="msgcls" type="STRING" size="256" sumtext="메세지 구분(b:before open, f:after open, x:exception e:error r:reason, i:infomation)"/>
  99. <Column id="msgcd" type="STRING" size="256" sumtext="메세지코드"/>
  100. <Column id="msgcode" type="STRING" size="256" sumtext="메세지 코드(cls+cd)"/>
  101. <Column id="msgnm" type="STRING" size="256" sumtext="메세지명"/>
  102. <Column id="msgcnts" type="STRING" size="256" sumtext="메세지 내용"/>
  103. <Column id="openscreen" type="STRING" size="256" sumtext="오픈화면코드"/>
  104. <Column id="resngrupid" type="STRING" size="256" sumtext="사유그룹코드 com.zbcmcode 참조"/>
  105. <Column id="multiyn" type="STRING" size="256" sumtext="사유 멀티선택여부"/>
  106. <Column id="cnfcd" type="STRING" size="256" sumtext="사유/확인 코드"/>
  107. <Column id="cnfmsg" type="STRING" size="256" sumtext="사유/상세 내용"/>
  108. <Column id="param01" type="STRING" size="256" sumtext="사용자 설정 변수값01"/>
  109. <Column id="param02" type="STRING" size="256" sumtext="사용자 설정 변수값02"/>
  110. <Column id="param03" type="STRING" size="256" sumtext="사용자 설정 변수값03"/>
  111. <Column id="param04" type="STRING" size="256" sumtext="사용자 설정 변수값04"/>
  112. <Column id="param05" type="STRING" size="256" sumtext="사용자 설정 변수값05"/>
  113. <Column id="param06" type="STRING" size="256" sumtext="사용자 설정 변수값06"/>
  114. <Column id="param07" type="STRING" size="256" sumtext="사용자 설정 변수값07"/>
  115. <Column id="param08" type="STRING" size="256" sumtext="사용자 설정 변수값08"/>
  116. <Column id="param09" type="STRING" size="256" sumtext="사용자 설정 변수값09"/>
  117. <Column id="param10" type="STRING" size="256" sumtext="사용자 설정 변수값10"/>
  118. <Column id="param11" type="STRING" size="256" sumtext="사용자 설정 변수값11"/>
  119. <Column id="param12" type="STRING" size="256" sumtext="사용자 설정 변수값12"/>
  120. <Column id="param13" type="STRING" size="256" sumtext="사용자 설정 변수값13"/>
  121. <Column id="param14" type="STRING" size="256" sumtext="사용자 설정 변수값14"/>
  122. <Column id="param15" type="STRING" size="256" sumtext="사용자 설정 변수값15"/>
  123. <Column id="param16" type="STRING" size="256" sumtext="사용자 설정 변수값16"/>
  124. <Column id="param17" type="STRING" size="256" sumtext="사용자 설정 변수값17"/>
  125. <Column id="param18" type="STRING" size="256" sumtext="사용자 설정 변수값18"/>
  126. <Column id="param19" type="STRING" size="256" sumtext="사용자 설정 변수값19"/>
  127. <Column id="param20" type="STRING" size="256" sumtext="사용자 설정 변수값20"/>
  128. </ColumnInfo>
  129. </Dataset>
  130. <Dataset id="ds_send_savedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  131. <ColumnInfo>
  132. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  133. <Column id="msgdd" type="STRING" size="256" sumtext="메세지일자"/>
  134. <Column id="msgno" type="STRING" size="256" sumtext="메세지번호"/>
  135. <Column id="histno" type="STRING" size="256" sumtext="메세지이력번호"/>
  136. <Column id="msgseq" type="STRING" size="256" sumtext="메세지상세번호"/>
  137. <Column id="cnfcd" type="STRING" size="256" sumtext="사유/확인 코드"/>
  138. <Column id="cnfmsg" type="STRING" size="256" sumtext="사유/상세 내용"/>
  139. </ColumnInfo>
  140. </Dataset>
  141. <Dataset id="ds_send_formcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  142. <ColumnInfo>
  143. <Column id="formcd" type="STRING" size="256"/>
  144. </ColumnInfo>
  145. <Rows>
  146. <Row/>
  147. </Rows>
  148. </Dataset>
  149. <Dataset id="ds_result_formcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  150. </Objects>
  151. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  152. * System Name :
  153. * Job Name :
  154. * Creator :
  155. * Make Date : 2014-08-29
  156. * Description :
  157. *---------------------------------------------------------------------------------------
  158. * Modify Date Modifier Modify Description
  159. *---------------------------------------------------------------------------------------
  160. * 2014-08-29 Live Converter TF->XP
  161. *
  162. *---------------------------------------------------------------------------------------
  163. ****************************************************************************************/
  164. include "com_commonxp::comm_main.xjs";
  165. include "emr_prcpmngtxp::MMO001.xjs";
  166. include "emr_medirecxp::MMR01100.xjs";
  167. function SPZUM90100_oninit(obj:Form, e:InitEventInfo)
  168. {
  169. frmf_initForm(obj);
  170. }
  171. function SPZUM90100_onload(obj:Form, e:LoadEventInfo)
  172. {
  173. ds_arg_sys.copyData(arg_sys);
  174. var msgno = ds_arg_sys.getColumn(0, "msgno");
  175. if(msgno == "0"){
  176. sysf_messageBox("메세지 정보가 정확하지 않습니다.", "E999");
  177. return;
  178. }
  179. var sMsgCls = opener.frmf_getParameter("SPZUM90100_msgcls"); // 전 오픈(B) or 후 오픈(F)
  180. ds_arg_sys.setColumn(0, "msgcls", sMsgCls);
  181. var oParam = {};
  182. oParam.id = "TRZUM90101";
  183. oParam.service = "hismainapp.HisMain";
  184. oParam.method = "reqTranMsgList";
  185. oParam.inds = "req=ds_arg_sys";
  186. oParam.outds = "ds_msglist=msglist";
  187. oParam.async = false;
  188. tranf_submit(oParam);
  189. }
  190. function button1_onclick(obj:Button, e:ClickEventInfo)
  191. {
  192. var srcNodeCnt = ds_msglist.getCaseCount("cnfcd == '-'");
  193. if( srcNodeCnt > 0) {
  194. if(sysf_messageBox ("확인 되지 않은 항목이 있습니다.\n리스트에서 [확인여부]를 클릭하여 상세내역을 확인하세요.\n\n지금 확인 하시겠습니까?","Q") == "6") {
  195. } else {
  196. this.close();
  197. }
  198. } else {
  199. this.close();
  200. }
  201. }
  202. function grd_sysmsglist_oncellclick(obj:Grid, e:GridClickEventInfo)
  203. {
  204. if(e.row < 0 || e.col < 0) return;
  205. if(obj.getCellPos() == obj.getBindCellIndex("body", "cnfcd")) {
  206. onConfirm();
  207. }
  208. }
  209. function grd_sysmsglist_onexpandup(obj:Grid, e:GridMouseEventInfo)
  210. {
  211. if(e.row < 0 || e.col < 0) return;
  212. onConfirm();
  213. }
  214. function onConfirm() {
  215. var mon = sysf_getCurrentMonitorNumber();
  216. var xpt = this.getOwnerFrame().position.x + 50;
  217. var ypt = this.getOwnerFrame().position.y + 50;
  218. var iRow = ds_msglist.rowposition;
  219. var sOpenScreen = ds_msglist.getColumn(iRow, "openscreen");
  220. var sOpenArgNm = ds_msglist.getColumn(iRow, "openargnm");
  221. var sOpenArgTxt = ds_msglist.getColumn(iRow, "openargtxt");
  222. var sOpenArgVal = ds_msglist.getColumn(iRow, "openargval");
  223. var sOpenPrmTxt = ds_msglist.getColumn(iRow, "openprmtxt");
  224. var sOpenPrmVal = ds_msglist.getColumn(iRow, "openprmval");
  225. if (utlf_isNull(sOpenScreen)) {
  226. sysf_messageBox ("확인 할 상세화면이 지정 되지 않았습니다.", "E");
  227. return;
  228. }
  229. var objArg = new Object();
  230. if( !utlf_isNull(sOpenArgNm) && sOpenArgNm != "-" && !utlf_isNull(sOpenArgTxt) && sOpenArgTxt != "-" && !utlf_isNull(sOpenArgVal) && sOpenArgVal != "-" ) {
  231. var arrArgNm = sOpenArgNm.split("|");
  232. var ArrArgRowTxt = sOpenArgTxt.split("^");
  233. var ArrArgRowVal = sOpenArgVal.split("^");
  234. if(arrArgNm.length != ArrArgRowTxt.length || arrArgNm.length != ArrArgRowVal.length) {
  235. sysf_messageBox ("Open Arg 관련 Row 항목 갯수가 맞지 않습니다..", "E");
  236. return;
  237. }
  238. for(var i = 0; i < arrArgNm.length; i++) {
  239. var ArrArgColTxt = ArrArgRowTxt[i].split("|");
  240. var ArrArgColVal = ArrArgRowVal[i].split("|");
  241. if(ArrArgColTxt.length != ArrArgColVal.length) {
  242. sysf_messageBox ("Open Arg 관련 Col 항목 갯수가 맞지 않습니다..", "E");
  243. return;
  244. }
  245. dsf_createDs(arrArgNm[i]); // 데이터셋을 생성한다.
  246. var objDS = this.objects[arrArgNm[i]];
  247. for(var j = 0; j < ArrArgColTxt.length; j++) {
  248. dsf_makeValue(objDS, ArrArgColTxt[j], "string", ArrArgColVal[j], 0); // 데이터 셋이 값 설정
  249. //20190911 이돈희 : 서식로드시 최신 서식으로 띄울수 있도록 수정
  250. if(sOpenScreen == "SSMMR01100" && ArrArgColTxt[j] == "formcd"){
  251. ds_send_formcd.setColumn(0, "formcd", objDS.getColumn(0, "formcd"));
  252. var oParam = {};
  253. oParam.id = "TXZUM90102";
  254. oParam.service = "prcpmngtapp.EtcPrcpMngt";
  255. oParam.method = "reqGetLastestFormcd";
  256. oParam.inds = "req=ds_send_formcd";
  257. oParam.outds = "ds_result_formcd=result";
  258. oParam.async = false;
  259. tranf_submit(oParam);
  260. if(ds_result_formcd.rowcount > 0){
  261. objDS.setColumn(0, "formcd", ds_result_formcd.getColumn(0, "formcd"))
  262. }
  263. }
  264. }
  265. objArg[arrArgNm[i]] = objDS;
  266. }
  267. }
  268. if( !utlf_isNull(sOpenPrmTxt) && sOpenPrmTxt != "-" && !utlf_isNull(sOpenPrmVal) && sOpenPrmVal != "-" ) {
  269. var ArrPrmTxt = sOpenPrmTxt.split("|");
  270. var ArrPrmVal = sOpenPrmVal.split("|");
  271. if(ArrPrmTxt.length != ArrPrmVal.length) {
  272. sysf_messageBox ("Open Param항목 갯수가 맞지 않습니다..", "E");
  273. return;
  274. }
  275. for(var i = 0; i < ArrPrmTxt.length; i++) {
  276. frmf_clearParameter(ArrPrmTxt[i]);
  277. frmf_setParameter(ArrPrmTxt[i], ArrPrmVal[i]);
  278. }
  279. }
  280. if(sOpenScreen == "SSMMR01100") { // 서식 formcd로 서식 창 오픈
  281. lf_loadSMMMR01100(true, objArg);
  282. } else {
  283. frmf_modal(sOpenScreen, sOpenScreen, objArg, false, mon, xpt, ypt, null, null, null, null, null, "M");
  284. }
  285. ds_msglist.setColumn(iRow, "cnfcd", "Y");
  286. ds_send_savedata.clearData();
  287. ds_send_savedata.addRow();
  288. ds_send_savedata.copyRow(0, ds_msglist, iRow);
  289. var oParam = {};
  290. oParam.id = "TXZUM90101";
  291. oParam.service = "hismainapp.HisMain";
  292. oParam.method = "reqSetTranMsgDetail";
  293. oParam.inds = "req=ds_send_savedata";
  294. oParam.outds = "";
  295. oParam.async = false;
  296. tranf_submit(oParam);
  297. }
  298. function onConfirm_old() {
  299. var iRow = ds_msglist.rowposition;
  300. var sOpenScreen = ds_msglist.getColumn(iRow, "openscreen");
  301. var sOpenArgNm = ds_msglist.getColumn(iRow, "openargnm");
  302. var sOpenArgTxt = ds_msglist.getColumn(iRow, "openargtxt");
  303. var sOpenArgVal = ds_msglist.getColumn(iRow, "openargval");
  304. var sOpenPrmTxt = ds_msglist.getColumn(iRow, "openargtxt");
  305. var sOpenPrmVal = ds_msglist.getColumn(iRow, "openargval");
  306. var sParam01 = ds_msglist.getColumn(iRow, "param01");
  307. var sParam02 = ds_msglist.getColumn(iRow, "param02");
  308. var sParam03 = ds_msglist.getColumn(iRow, "param03");
  309. var sParam04 = ds_msglist.getColumn(iRow, "param04");
  310. var sParam05 = ds_msglist.getColumn(iRow, "param05");
  311. var sParam06 = ds_msglist.getColumn(iRow, "param06");
  312. var sParam07 = ds_msglist.getColumn(iRow, "param07");
  313. var sParam08 = ds_msglist.getColumn(iRow, "param08");
  314. var sParam09 = ds_msglist.getColumn(iRow, "param09");
  315. var sParam10 = ds_msglist.getColumn(iRow, "param10");
  316. var sParam11 = ds_msglist.getColumn(iRow, "param11");
  317. var sParam12 = ds_msglist.getColumn(iRow, "param12");
  318. var sParam13 = ds_msglist.getColumn(iRow, "param13");
  319. var sParam14 = ds_msglist.getColumn(iRow, "param14");
  320. var sParam15 = ds_msglist.getColumn(iRow, "param15");
  321. var sParam16 = ds_msglist.getColumn(iRow, "param16");
  322. var sParam17 = ds_msglist.getColumn(iRow, "param17");
  323. var sParam18 = ds_msglist.getColumn(iRow, "param18");
  324. var sParam19 = ds_msglist.getColumn(iRow, "param19");
  325. var sParam20 = ds_msglist.getColumn(iRow, "param20");
  326. if (utlf_isNull(sOpenScreen)) {
  327. sysf_messageBox ("확인 할 상세화면이 지정 되지 않았습니다.", "E");
  328. return;
  329. } else if(sOpenScreen == "SSMMR01100") { // 서식 formcd로 서식 창 오픈
  330. var objArg = new Object();
  331. ds_cond_formdata.clearData();
  332. ds_cond_formdata.addRow();
  333. ds_cond_formdata.setColumn(0, "ioflag", sParam11); // 입원 외래 구분
  334. ds_cond_formdata.setColumn(0, "pid", sParam12); // 환자번호
  335. ds_cond_formdata.setColumn(0, "orddd", sParam13); // 진료일자
  336. ds_cond_formdata.setColumn(0, "cretno", sParam14); // 접수번호
  337. ds_cond_formdata.setColumn(0, "formcd", sParam15); // 서식코드
  338. ds_cond_formdata.setColumn(0, "orddeptcd", sParam16); // 진료과
  339. ds_cond_formdata.setColumn(0, "orddrid", sParam17); // 진료의
  340. ds_cond_formdata.setColumn(0, "formkind", "new");
  341. ds_cond_formdata.setColumn(0, "btnvisible", true);
  342. ds_cond_formdata.setColumn(0, "modalyn", "Y");
  343. //ds_cond_formdata.setColumn(0, "topyn", "N");
  344. objArg["ds_cond_formdata"] = ds_cond_formdata;
  345. lf_loadSMMMR01100(true, objArg);
  346. } else {
  347. frmf_modal(sOpenScreen, sOpenScreen, null, null, null, null, null, null, null, null, null, null, "M");
  348. }
  349. ds_msglist.setColumn(iRow, "cnfcd", "Y");
  350. ds_send_savedata.clearData();
  351. ds_send_savedata.addRow();
  352. ds_send_savedata.copyRow(0, ds_msglist, iRow);
  353. var oParam = {};
  354. oParam.id = "TXZUM90101";
  355. oParam.service = "hismainapp.HisMain";
  356. oParam.method = "reqSetTranMsgDetail";
  357. oParam.inds = "req=ds_send_savedata";
  358. oParam.outds = "";
  359. oParam.async = false;
  360. tranf_submit(oParam);
  361. }
  362. ]]></Script>
  363. </Form>
  364. </FDL>