SMADB02101_KimsPOC.xfdl 5.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMADB02001" position="absolute 0 0 1100 930" titletext="Kims POC" scrollbars="none" onload="SMADB02001_onload" oninit="SMADB02001_oninit">
  5. <Layouts>
  6. <Layout>
  7. <WebBrowser id="WebBrowser00" text="WebBrowser00" position="absolute 2 10 1096 928" anchor="default" taborder="2" useautobitmapcache="1" onloadcompleted="WebBrowser00_onloadcompleted"/>
  8. </Layout>
  9. </Layouts>
  10. <Objects>
  11. <Dataset id="ds_kimsservice" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  12. <ColumnInfo>
  13. <Column id="custid" type="STRING" size="256"/>
  14. <Column id="password" type="STRING" size="256"/>
  15. <Column id="serverurl" type="STRING" size="256"/>
  16. <Column id="prscadmsym" type="STRING" size="256"/>
  17. <Column id="prscadmnm" type="STRING" size="256"/>
  18. <Column id="prscadmtelno" type="STRING" size="256"/>
  19. <Column id="prscadmfaxno" type="STRING" size="256"/>
  20. </ColumnInfo>
  21. <Rows>
  22. <Row/>
  23. </Rows>
  24. </Dataset>
  25. <Dataset id="ds_hidden_receivedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  26. </Objects>
  27. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  28. * System Name :
  29. * Job Name :
  30. * Creator :
  31. * Make Date : 2018-11-21
  32. * Description :
  33. *---------------------------------------------------------------------------------------
  34. * Modify Date Modifier Modify Description
  35. *---------------------------------------------------------------------------------------
  36. ****************************************************************************************/
  37. include "com_commonxp::comm_main.xjs";
  38. function SMADB02001_oninit(obj:Form, e:InitEventInfo)
  39. {
  40. frmf_initForm(obj);
  41. }
  42. function SMADB02001_onload(obj:Form, e:LoadEventInfo)
  43. {
  44. fInit();
  45. }
  46. function fInit() {
  47. try
  48. {
  49. ds_hidden_receivedata.copyData(arg_ds_hidden_receivedata);
  50. }
  51. catch(e)
  52. {
  53. ds_hidden_receivedata.addColumn("srchdrugcd","string");
  54. ds_hidden_receivedata.addRow();
  55. }
  56. var drugcd = ds_hidden_receivedata.getColumn(0,"srchdrugcd");
  57. var dutplceinstcd = sysf_getUserInfo("dutplceinstcd");
  58. var inDsNm = dsf_createDsRow("ds_send"
  59. ,[ {col : "instcd", val : dutplceinstcd} //기관코드
  60. ]);
  61. var oParam = {};
  62. oParam.id = "TRADB02010";
  63. oParam.service = "comextlib.KimsDrugDur";
  64. oParam.method = "reqGetServiceInfo";
  65. oParam.inds = "req=ds_send";
  66. oParam.outds = "ds_kimsservice=kimsservice";
  67. oParam.async = false;
  68. tranf_submit(oParam);
  69. fGetDrugInfo();
  70. }
  71. function fGetDrugInfo() {
  72. var navUrl = "";
  73. if ( ds_kimsservice.rowcount > 0 ) {
  74. navUrl = navUrl + "http://" + encodeURI(utlf_transNullToEmpty(ds_kimsservice.getColumn(0,"serverurl"))) + "/";
  75. navUrl = navUrl + "?CustID=" + encodeURI(utlf_transNullToEmpty(ds_kimsservice.getColumn(0,"custid")));
  76. }
  77. WebBrowser00.url = navUrl;
  78. }
  79. function WebBrowser00_onloadcompleted(obj:WebBrowser, e:WebLoadCompEventInfo)
  80. {
  81. if(e.id != "onloadcompleted") return; // onloadcompleted 일 때만 동작
  82. //var sUrl = e.url.substr(0, e.url.indexOf("?", 1));
  83. //var nIndex = e.url.indexOf("/indigo/InfctnRgstr");
  84. }
  85. function btn_drugsearch_onclick(obj:Button, e:ClickEventInfo)
  86. {
  87. fGetDrugInfo("DRUGSEARCH");
  88. }
  89. function btn_gensearch_onclick(obj:Button, e:ClickEventInfo)
  90. {
  91. fGetDrugInfo("GENSEARCH");
  92. }
  93. function btn_identa_onclick(obj:Button, e:ClickEventInfo)
  94. {
  95. fGetDrugInfo("IDENTASEARCH");
  96. }
  97. function btn_kimsclass_onclick(obj:Button, e:ClickEventInfo)
  98. {
  99. fGetDrugInfo("SEARCHBYKIMSCLASS");
  100. }
  101. function btn_mohclass_onclick(obj:Button, e:ClickEventInfo)
  102. {
  103. fGetDrugInfo("SEARCHBYMOHCLASS");
  104. }
  105. function btn_newdrug_onclick(obj:Button, e:ClickEventInfo)
  106. {
  107. fGetDrugInfo("NEWDRUGLIST");
  108. }
  109. function btn_newdrug00_onclick(obj:Button, e:ClickEventInfo)
  110. {
  111. fGetDrugInfo("INSCHANGELIST");
  112. }
  113. function btn_newdrug01_onclick(obj:Button, e:ClickEventInfo)
  114. {
  115. fGetDrugInfo("SPDRUGLIST");
  116. }
  117. function Button00_onclick(obj:Button, e:ClickEventInfo)
  118. {
  119. var dutplceinstcd = sysf_getUserInfo("dutplceinstcd");
  120. var inDsNm = dsf_createDsRow("ds_send"
  121. ,[ {col : "instcd", val : dutplceinstcd} //기관코드
  122. ]);
  123. var inDsNm = dsf_createDsRow("ds_send"
  124. ,[ {col : "ip", val : encodeURI(utlf_transNullToEmpty(ds_kimsservice.getColumn(0,"serverurl")))} //기관코드
  125. ]);
  126. var oParam = {};
  127. oParam.id = "TRADB02011";
  128. oParam.service = "comextlib.KimsDrugDur";
  129. oParam.method = "reqGetKimsRequestTest";
  130. oParam.inds = "req=ds_send";
  131. oParam.outds = "ds_kimsservice=kimsservice";
  132. oParam.async = false;
  133. tranf_submit(oParam);
  134. }
  135. ]]></Script>
  136. </Form>
  137. </FDL>