SMADB00900_신규프로토콜조회.xfdl 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMADB00900" position="absolute 0 0 1211 915" titletext="신규프로토콜조회" oninit="SMADB00900_oninit" onload="SMADB00900_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 0 1194 25" id="group1">
  8. <Layouts>
  9. <Layout>
  10. <Static text="신규 프로토콜 조회" position="absolute 0 0 160 25" id="caption19" class="tit_1"/>
  11. </Layout>
  12. </Layouts>
  13. </Div>
  14. <Div position="absolute 0 40 1195 784" id="group3" scrollbars="autoboth">
  15. <Layouts>
  16. <Layout>
  17. <Grid position="absolute 4 80 1194 742" id="datagrid2" binddataset="ds_datagrid2">
  18. <Formats>
  19. <Format id="default">
  20. <Columns>
  21. <Column size="78"/>
  22. <Column size="77"/>
  23. <Column size="130"/>
  24. <Column size="90"/>
  25. <Column size="220"/>
  26. <Column size="70"/>
  27. <Column size="100"/>
  28. <Column size="70"/>
  29. <Column size="100"/>
  30. <Column size="70"/>
  31. <Column size="100"/>
  32. </Columns>
  33. <Rows>
  34. <Row size="24" band="head"/>
  35. <Row size="24"/>
  36. </Rows>
  37. <Band id="head">
  38. <Cell text="진료과 "/>
  39. <Cell col="1" text="질병코드"/>
  40. <Cell col="2" text="질병명"/>
  41. <Cell col="3" text="프로토콜 코드"/>
  42. <Cell col="4" text="프로토콜명"/>
  43. <Cell col="5" text="약국승인"/>
  44. <Cell col="6" text="승인일"/>
  45. <Cell col="7" text="보험승인"/>
  46. <Cell col="8" text="승인일"/>
  47. <Cell col="9" text="진료승인"/>
  48. <Cell col="10" text="승인일"/>
  49. </Band>
  50. <Band id="body">
  51. <Cell text="bind:j"/>
  52. <Cell col="1" text="bind:code"/>
  53. <Cell col="2" text="bind:name"/>
  54. <Cell col="3" text="bind:code2"/>
  55. <Cell col="4" text="bind:pname"/>
  56. <Cell col="5" text="bind:ok"/>
  57. <Cell col="6" text="bind:date"/>
  58. <Cell col="7" text="bind:per"/>
  59. <Cell col="8" text="bind:bo"/>
  60. <Cell col="9"/>
  61. <Cell col="10"/>
  62. </Band>
  63. </Format>
  64. </Formats>
  65. </Grid>
  66. <Div position="absolute 0 5 1195 45" id="group2">
  67. <Layouts>
  68. <Layout>
  69. <Shape position="absolute 0 9 1194 40" id="roundrect1" type="roundrectangle"/>
  70. <Shape position="absolute 1112 14 1118 36" linetype="vertical" id="line13"/>
  71. <Button position="absolute 1125 13 1181 35" id="btn_sea" class="btn1" text="조회" onclick="group3_group2_btn_sea_onclick"/>
  72. </Layout>
  73. </Layouts>
  74. </Div>
  75. <Button position="absolute 1151 55 1193 74" id="button51" class="btn2_letter2" text="엑셀"/>
  76. <Grid position="absolute 4 75 1194 737" id="grd_protocol" class="datagrid2" binddataset="ds_grd_protocol" oncelldblclick="group3_grd_protocol_oncelldblclick">
  77. <Formats>
  78. <Format id="default">
  79. <Columns>
  80. <Column size="70"/>
  81. <Column size="70"/>
  82. <Column size="130"/>
  83. <Column size="82"/>
  84. <Column size="88"/>
  85. <Column size="189"/>
  86. <Column size="52"/>
  87. <Column size="67"/>
  88. <Column size="113"/>
  89. <Column size="73"/>
  90. <Column size="93"/>
  91. <Column size="61"/>
  92. <Column size="94"/>
  93. <Column size="68"/>
  94. <Column size="103"/>
  95. <Column size="315"/>
  96. </Columns>
  97. <Rows>
  98. <Row size="48" band="head"/>
  99. <Row size="24"/>
  100. </Rows>
  101. <Band id="head">
  102. <Cell text="진료과 "/>
  103. <Cell col="1" text="질병코드"/>
  104. <Cell col="2" text="질병명"/>
  105. <Cell col="3" text="입원외래구분"/>
  106. <Cell col="4" text="프로토콜 코드"/>
  107. <Cell col="5" text="프로토콜명"/>
  108. <Cell col="6" text="투여주기"/>
  109. <Cell col="7" text="진토제코드"/>
  110. <Cell col="8" text="진토제명"/>
  111. <Cell col="9" text="보험팀확인"/>
  112. <Cell col="10" text="보험팀확인일시"/>
  113. <Cell col="11" text="진료확인"/>
  114. <Cell col="12" text="진료확인일시"/>
  115. <Cell col="13" text="약제팀확인"/>
  116. <Cell col="14" text="약제팀확인일시"/>
  117. <Cell col="15" text="Remark"/>
  118. </Band>
  119. <Band id="body">
  120. <Cell displaytype="combo" edittype="none" text="bind:orddeptcd" suppress="1" suppressalign="middle,over" combodataset="ds_main_orddeptlist" combocodecol="orddeptcd" combodatacol="orddeptnm" enable="false"/>
  121. <Cell col="1" text="bind:sickclscd"/>
  122. <Cell col="2" text="bind:sickclsnm"/>
  123. <Cell col="3" displaytype="combo" edittype="none" text="bind:ioflag" combodataset="ds_ioflag" combocodecol="value" combodatacol="label"/>
  124. <Cell col="4" text="bind:prtlcd"/>
  125. <Cell col="5" text="bind:prtlnm"/>
  126. <Cell col="6" text="bind:drugprid"/>
  127. <Cell col="7" text="bind:antimetprtlcd"/>
  128. <Cell col="8" text="bind:antimetprtlnm"/>
  129. <Cell col="9" text="bind:insuqualid"/>
  130. <Cell col="10" displaytype="date" edittype="date" text="bind:insuqualdt"/>
  131. <Cell col="11" text="bind:ordqualid"/>
  132. <Cell col="12" displaytype="date" edittype="date" text="bind:ordqualdt"/>
  133. <Cell col="13" text="bind:pharmqualid"/>
  134. <Cell col="14" displaytype="date" edittype="date" text="bind:pharmqualdt"/>
  135. <Cell col="15" text="bind:remark"/>
  136. </Band>
  137. </Format>
  138. </Formats>
  139. </Grid>
  140. </Layout>
  141. </Layouts>
  142. </Div>
  143. <Div position="absolute 0 13 1195 55" id="group4" scrollbars="autoboth">
  144. <Layouts>
  145. <Layout>
  146. <Button position="absolute 0 17 56 39" id="btn_prt" class="btn6" text="출력" anchor="default"/>
  147. </Layout>
  148. </Layouts>
  149. </Div>
  150. </Layout>
  151. </Layouts>
  152. <Objects>
  153. <Dataset id="ds_datagrid2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  154. <ColumnInfo>
  155. <Column id="j" type="STRING"/>
  156. <Column id="code" type="STRING"/>
  157. <Column id="name" type="STRING"/>
  158. <Column id="code2" type="STRING"/>
  159. <Column id="pname" type="STRING"/>
  160. <Column id="ok" type="STRING"/>
  161. <Column id="date" type="STRING"/>
  162. <Column id="per" type="STRING"/>
  163. <Column id="bo" type="STRING"/>
  164. </ColumnInfo>
  165. </Dataset>
  166. <Dataset id="ds_grd_protocol" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  167. <ColumnInfo>
  168. <Column id="orddeptcd" type="STRING"/>
  169. <Column id="sickclscd" type="STRING"/>
  170. <Column id="sickclsnm" type="STRING"/>
  171. <Column id="ioflag" type="STRING"/>
  172. <Column id="prtlcd" type="STRING"/>
  173. <Column id="prtlnm" type="STRING"/>
  174. <Column id="drugprid" type="STRING"/>
  175. <Column id="antimetprtlcd" type="STRING"/>
  176. <Column id="antimetprtlnm" type="STRING"/>
  177. <Column id="insuqualid" type="STRING"/>
  178. <Column id="insuqualdt" type="STRING"/>
  179. <Column id="ordqualid" type="STRING"/>
  180. <Column id="ordqualdt" type="STRING"/>
  181. <Column id="pharmqualid" type="STRING"/>
  182. <Column id="pharmqualdt" type="STRING"/>
  183. <Column id="remark" type="STRING"/>
  184. </ColumnInfo>
  185. </Dataset>
  186. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  187. <ColumnInfo>
  188. <Column id="loguser" type="STRING" size="256" sumtext="로그인유저"/>
  189. </ColumnInfo>
  190. </Dataset>
  191. <Dataset id="ds_main_orddeptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  192. <ColumnInfo>
  193. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
  194. <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과명"/>
  195. </ColumnInfo>
  196. </Dataset>
  197. <Dataset id="ds_send_srchdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  198. <ColumnInfo>
  199. <Column id="srchkind" type="STRING" size="256" sumtext="조회종류"/>
  200. <Column id="userjpbflag" type="STRING" size="256" sumtext="세션정보_의사구분"/>
  201. </ColumnInfo>
  202. <Rows>
  203. <Row>
  204. <Col id="srchkind">C</Col>
  205. </Row>
  206. </Rows>
  207. </Dataset>
  208. <Dataset id="ds_main_list_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  209. <ColumnInfo>
  210. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
  211. <Column id="sickclscd" type="STRING" size="256" sumtext="질병분류코드"/>
  212. <Column id="sickclsnm" type="STRING" size="256" sumtext="질병분류명"/>
  213. <Column id="ioflag" type="STRING" size="256" sumtext="입원외래구분"/>
  214. <Column id="prtlcd" type="STRING" size="256" sumtext="코드"/>
  215. <Column id="prtlnm" type="STRING" size="256" sumtext="명칭"/>
  216. <Column id="drugprid" type="INT" size="256" sumtext="투여주기"/>
  217. <Column id="antimetprtlcd" type="STRING" size="256" sumtext="진토제코드"/>
  218. <Column id="antimetprtlnm" type="STRING" size="256" sumtext="진토제명칭"/>
  219. <Column id="insuqualid" type="STRING" size="256" sumtext="보험팀확인"/>
  220. <Column id="insuqualdt" type="STRING" size="256" sumtext="보험팀확인일시"/>
  221. <Column id="ordqualid" type="STRING" size="256" sumtext="진료팀확인"/>
  222. <Column id="ordqualdt" type="STRING" size="256" sumtext="진료팀확인일시"/>
  223. <Column id="pharmqualid" type="STRING" size="256" sumtext="약제팀확인"/>
  224. <Column id="pharmqualdt" type="STRING" size="256" sumtext="약제팀확인일시"/>
  225. <Column id="remark" type="STRING" size="256" sumtext="비고"/>
  226. </ColumnInfo>
  227. </Dataset>
  228. <Dataset id="ds_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  229. <ColumnInfo>
  230. <Column id="label" type="STRING" size="256"/>
  231. <Column id="value" type="STRING" size="256"/>
  232. </ColumnInfo>
  233. <Rows>
  234. <Row>
  235. <Col id="label">입원</Col>
  236. <Col id="value">I</Col>
  237. </Row>
  238. <Row>
  239. <Col id="label">외래</Col>
  240. <Col id="value">O</Col>
  241. </Row>
  242. </Rows>
  243. </Dataset>
  244. </Objects>
  245. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  246. * System Name :
  247. * Job Name :
  248. * Creator :
  249. * Make Date : 2015-10-26
  250. * Description :
  251. *---------------------------------------------------------------------------------------
  252. * Modify Date Modifier Modify Description
  253. *---------------------------------------------------------------------------------------
  254. * 2015-10-26 Live Converter TF->XP
  255. *
  256. *---------------------------------------------------------------------------------------
  257. ****************************************************************************************/
  258. include "com_commonxp::comm_main.xjs";
  259. function SMADB00900_oninit(obj:Form, e:InitEventInfo)
  260. {
  261. frmf_initForm(obj); // 폼 초기화
  262. }
  263. function SMADB00900_onload(obj:Form, e:LoadEventInfo)
  264. {
  265. var oParam = {};
  266. oParam.id = "TRADB00801";
  267. oParam.service = "pharmacybaseapp.AnticancerProtocol";
  268. oParam.method = "reqGetAnticancerProtocolOrdDeptList";
  269. oParam.inds = "req=ds_send_srchdata";
  270. oParam.outds = "ds_main_orddeptlist=item";
  271. oParam.async = false;
  272. oParam.callback = "cf_TRADB00801";
  273. tranf_submit(oParam);
  274. var jobkindcd = sysf_getUserInfo("jobkindcd");
  275. var jobkindnm = sysf_getUserInfo("jobkindnm");
  276. var dutplcecd = sysf_getUserInfo("dutplcecd");
  277. if(jobkindcd == "0330"){ //의사일 경우
  278. ds_send_srchdata.setColumn(0,"userjpbflag","dr");
  279. }
  280. if(dutplcecd == "4070300000"){ //보험팀일 경우
  281. ds_send_srchdata.setColumn(0,"userjpbflag","insu");
  282. }
  283. if(dutplcecd.substring(0,4) == "3241"){ //약제팀일 경우
  284. ds_send_srchdata.setColumn(0,"userjpbflag","pharm");
  285. }
  286. var userjpbflag = ds_send_srchdata.getColumn(0, "userjpbflag");
  287. if( userjpbflag == "dr" || userjpbflag == "insu" || userjpbflag == "pharm"){
  288. group3_group2_btn_sea_onclick();
  289. }else{
  290. sysf_messageBox("해당 로그인ID는 신규프로토콜 확인 작업을", "E001");
  291. }
  292. }
  293. function cf_TRADB00801(sSvcId, nErrorCode, sErrorMsg) {
  294. if(nErrorCode < 0) return;
  295. }
  296. function group3_group2_btn_sea_onclick(obj:Button, e:ClickEventInfo)
  297. {
  298. var userjpbflag = ds_send_srchdata.getColumn(0,"userjpbflag");
  299. if ( userjpbflag == "dr" || userjpbflag == "insu" || userjpbflag == "pharm"){
  300. var oParam = {};
  301. oParam.id = "TRADB00901";
  302. oParam.service = "pharmacybaseapp.AnticancerProtocol";
  303. oParam.method = "reqGetNewAnticancerProtocolList";
  304. oParam.inds = "req=ds_send_srchdata";
  305. oParam.outds = "ds_grd_protocol=item";
  306. oParam.async = false;
  307. oParam.callback = "cf_TRADB00901";
  308. tranf_submit(oParam);
  309. }else{
  310. sysf_messageBox("해당 로그인ID는 신규프로토콜 확인 작업을","E001");
  311. }
  312. }
  313. function cf_TRADB00901(sSvcId, nErrorCode, sErrorMsg) {
  314. if(nErrorCode < 0) return;
  315. }
  316. function group3_grd_protocol_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  317. {
  318. var userjpbflag = ds_send_srchdata.getColumn(0, "userjpbflag");
  319. if( userjpbflag == "dr" || userjpbflag == "insu" || userjpbflag == "pharm"){
  320. group3_group2_btn_sea_onclick();
  321. }else{
  322. sysf_messageBox("해당 로그인ID는 신규프로토콜 확인 작업을", "E001");
  323. }
  324. }
  325. ]]></Script>
  326. </Form>
  327. </FDL>