SPADT62302_병동라벨REX출력.xfdl 4.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPADT62302" position="absolute 0 0 0 0" titletext="병동 라벨 출력" oninit="SPADT62302_oninit" onload="SPADT62302_onload" onkeydown="SPADT62302_onkeydown">
  5. <Layouts>
  6. <Layout/>
  7. </Layouts>
  8. <Objects>
  9. <Dataset id="ds_main_lbllist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  10. <Dataset id="ds_main_lbllist2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  11. <Dataset id="ds_init_barcdprntsetup" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  12. <Dataset id="ds_send_prcpinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  13. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  14. <Dataset id="ds_hidden_srchinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  15. <Dataset id="ds_main_prnt_lbllist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  16. <Dataset id="ds_init_sumprcpflagyn_flagyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  17. </Objects>
  18. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  19. * System Name :
  20. * Job Name :
  21. * Creator :
  22. * Make Date : 2015-11-13
  23. * Description :
  24. *---------------------------------------------------------------------------------------
  25. * Modify Date Modifier Modify Description
  26. *---------------------------------------------------------------------------------------
  27. * 2015-11-13 Live Converter TF->XP
  28. *
  29. *---------------------------------------------------------------------------------------
  30. ****************************************************************************************/
  31. include "com_commonxp::comm_main.xjs"
  32. include "ast_commonxp::AST.xjs"
  33. include "ast_pharmacyxp::SPADT62305.xjs"
  34. include "com_commodulexp::SSZFM00901.xjs";
  35. function SPADT62302_oninit(obj:Form, e:InitEventInfo)
  36. {
  37. frmf_initForm(obj); // 폼 초기화
  38. }
  39. function SPADT62302_onload(obj:Form, e:LoadEventInfo)
  40. {
  41. try{
  42. ds_init_barcdprntsetup.copyData(arg_ds_init_barcdprntsetup);
  43. var prntsetupinfo = ds_init_barcdprntsetup.getColumn(0,"prntsetupinfo"); //프린터설정 XML형식
  44. lf_convertXmlToDs(prntsetupinfo);
  45. var comm = ds_data_comm02.getColumn(0,"comm");
  46. var prntkind = ds_data_setupinfo.getColumn(0,"prntkind");
  47. if(comm == "2") {
  48. ds_data_comm02.setColumn(0,"comm", "1");
  49. }
  50. if(prntkind == "1") {
  51. ds_data_setupinfo.setColumn(0,"prntkind", "5");
  52. }
  53. }catch(e){}
  54. try{
  55. ds_send_prcpinfo.copyData(arg_ds_send_prcpinfo);
  56. }catch(e){}
  57. try{
  58. ds_hidden_srchinfo.copyData(arg_ds_hidden_srchinfo);
  59. }catch(e){}
  60. try{
  61. ds_init_sumprcpflagyn_flagyn.copyData(arg_ds_init_sumprcpflagyn_flagyn);
  62. }catch(e){}
  63. fInit_lbl();
  64. }
  65. function SPADT62302_onkeydown(obj:Form, e:KeyEventInfo)
  66. {
  67. var keyPressed = e.keycode;
  68. if(keyPressed == 27 || keyPressed == 81) // 'ESC' or 'Q' 키가 눌려진 경우
  69. {
  70. this.close();
  71. }
  72. }
  73. ]]></Script>
  74. </Form>
  75. </FDL>