YNU_JEUS/app_home/himed/xpapps/ast/pharmacybasexp/xp/SMADB00400_용법관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMADB00400" position="absolute 0 0 1196 663" titletext="용법관리" oninit="SMADB00400_oninit" onload="SMADB00400_onload">
    <Layouts>
      <Layout>
        <Div id="group2" taborder="1" style="align:center top;" class="div_SA" position="absolute 0 25 1193 65" anchor="left top right">
          <Layouts>
            <Layout>
              <Static id="caption3" text="용법종류 :" class="search_name" position="absolute 15 12 101 29" anchor="default"/>
              <Combo id="cmb_srchmthdflag" taborder="1" innerdataset="@ds_A0017" codecolumn="cdid" datacolumn="cdnm" class="combo_search" position="absolute 89 10 224 31" anchor="default" onitemchanged="group2_cmb_srchmthdflag_onitemchanged"/>
              <Static id="caption1" text="용법코드 :" class="search_name" position="absolute 290 12 376 29" anchor="default"/>
              <Edit id="ipt_srchmthdcd" taborder="2" class="input_search" position="absolute 364 10 554 31" anchor="default" onkeydown="group2_ipt_srchmthdcd_onkeydown"/>
              <Static id="caption4" text="기본용법 :" class="search_name" position="absolute 610 12 696 29" anchor="default"/>
              <Static id="caption5" text="횟수 :" class="search_name" position="absolute 735 12 805 29" anchor="default"/>
              <Combo id="combo1" taborder="4" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 783 10 833 31" anchor="default" onitemchanged="group2_combo1_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">-</Col>
                      <Col id="datacolumn">-</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">1</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">2</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">3</Col>
                      <Col id="datacolumn">3</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">4</Col>
                      <Col id="datacolumn">4</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1077 9 1083 34" anchor="top right"/>
              <Button id="btn_seamthd" taborder="5" text="용법조회" class="btn1" position="absolute 1096 9 1176 31" anchor="top right" onclick="group2_btn_seamthd_onclick"/>
              <CheckBox id="CheckBox00" taborder="8" position="absolute 685 9 702 29" onchanged="group2_checkbox2_onchanged" truevalue="Y" falsevalue="N"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption19" text="용법관리" class="tit_1" position="absolute 0 0 145 25"/>
        <Button id="btn_save" taborder="2" text="저장" class="btn4" position="absolute 1135 2 1191 24" onclick="btn_save_onclick" anchor="top right"/>
        <Button id="btn_grddel" taborder="3" text="행삭제" onclick="group3_btn_grddel_onclick" class="btn2" position="absolute 1087 71 1140 93" anchor="top right"/>
        <Button id="btn_grdadd" taborder="4" text="행추가" onclick="group3_btn_grdadd_onclick" class="btn2" position="absolute 977 71 1030 93" anchor="top right"/>
        <Button id="btn_grdcopy" taborder="5" text="행복사" onclick="group3_btn_grdcopy_onclick" class="btn2" position="absolute 1032 71 1085 93" anchor="top right"/>
        <Button id="btn_excsave" taborder="6" text="엑셀" onclick="group3_btn_excsave_onclick" class="btn7" position="absolute 1142 71 1193 93" anchor="top right"/>
        <Grid id="grd_mthdlist" taborder="7" binddataset="ds_grd_mthdlist" useinputpanel="false" position="absolute 0 98 1193 659" anchor="all" cellsizingtype="both" autoenter="key" extendsizetype="row">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="97"/>
                <Column size="67"/>
                <Column size="72"/>
                <Column size="157"/>
                <Column size="80"/>
                <Column size="189"/>
                <Column size="101"/>
                <Column size="120"/>
                <Column size="35"/>
                <Column size="57"/>
                <Column size="47"/>
                <Column size="40"/>
                <Column size="190"/>
                <Column size="83"/>
                <Column size="57"/>
                <Column size="51"/>
                <Column size="71"/>
                <Column size="56"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="용법종류"/>
                <Cell col="2" text="추가구분"/>
                <Cell col="3" text="용법코드"/>
                <Cell col="4" text="용법약어명"/>
                <Cell col="5" colspan="4" text="용법명" taborder="undefined"/>
                <Cell col="9" text="일수"/>
                <Cell col="10" text="횟수패턴"/>
                <Cell col="11" text="횟수"/>
                <Cell col="12" text="순서"/>
                <Cell col="13" text="영문 용법명"/>
                <Cell col="14" text="기본용법여부"/>
                <Cell col="15" text="식전후"/>
                <Cell col="16" text="수가팀"/>
                <Cell col="17" text="투여경로"/>
                <Cell col="18" text="의사지시"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" displaytype="combo" edittype="combo" style="padding:0 0 0 5;" text="bind:mthdkind" combodataset="ds_A0017" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="2" displaytype="combo" edittype="combo" style="padding:0 0 0 5;" text="bind:mthdflag" combodataset="ds_mthdflag" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="3" displaytype="text" edittype="text" style="padding:0 0 0 5;" text="bind:mthdcd" editautoselect="true"/>
                <Cell col="4" displaytype="text" edittype="text" style="padding:0 0 0 5;" text="bind:abbrnm" editautoselect="true"/>
                <Cell col="5" displaytype="text" edittype="text" style="padding:0 0 0 5;" text="bind:mthdcnts1" editautoselect="true"/>
                <Cell col="6" displaytype="text" edittype="text" style="padding:0 0 0 5;" text="bind:mthdcnts2" editautoselect="true"/>
                <Cell col="7" displaytype="text" edittype="text" style="padding:0 0 0 5;" text="bind:mthdcnts3" editautoselect="true"/>
                <Cell col="8" displaytype="text" edittype="text" style="padding:0 0 0 5;" text="bind:mthdcnts4" editautoselect="true"/>
                <Cell col="9" displaytype="normal" edittype="normal" editfilter="digit" text="bind:dayno" editlimit="3" editautoselect="true"/>
                <Cell col="10" displaytype="normal" edittype="normal" editfilter="digit" text="bind:cntpatt" editlimit="5" editautoselect="true"/>
                <Cell col="11" displaytype="normal" edittype="normal" editfilter="digit" text="bind:basecnt" editlimit="5" editautoselect="true"/>
                <Cell col="12" displaytype="normal" edittype="normal" editfilter="digit" style="align:right middle;padding:0 5 0 0;" text="bind:outprntseq" editlimit="3" editautoselect="true"/>
                <Cell col="13" displaytype="text" edittype="text" text="bind:mthdengnm" editautoselect="true"/>
                <Cell col="14" displaytype="checkbox" edittype="checkbox" text="bind:basemthdyn" expr="expr:(basemthdyn==&quot;Y&quot;||basemthdyn==1)?1:0"/>
                <Cell col="15" displaytype="combo" edittype="combo" text="bind:mealflag" combodataset="ds_mealflag" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="16" displaytype="checkbox" edittype="checkbox" text="bind:lblprntyn" expr="expr:(lblprntyn==&quot;Y&quot;||lblprntyn==1)?1:0"/>
                <Cell col="17" displaytype="combo" edittype="combo" text="bind:adminpath" combodataset="ds_adminpath" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="18" displaytype="checkbox" edittype="checkbox" text="bind:drdirecyn" expr="expr:(drdirecyn==&quot;Y&quot;||drdirecyn==1)?1:0"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption10" text="용법정보" class="tit_2" position="absolute 0 77 99 94"/>
        <Shape id="line01" class="line_1" position="absolute 0 92 1193 98" anchor="left top right"/>
        <Shape id="line00" class="line_1" position="absolute 0 93 1193 99" anchor="left top right"/>
        <Shape id="line02" class="line_1" position="absolute 0 94 1193 100" anchor="left top right"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_mthdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_mthdlist_oncolumnchanged">
        <ColumnInfo>
          <Column id="mthdkind" type="STRING"/>
          <Column id="mthdflag" type="STRING"/>
          <Column id="mthdcd" type="STRING"/>
          <Column id="abbrnm" type="STRING"/>
          <Column id="mthdcnts1" type="STRING"/>
          <Column id="mthdcnts2" type="STRING"/>
          <Column id="mthdcnts3" type="STRING"/>
          <Column id="mthdcnts4" type="STRING"/>
          <Column id="dayno" type="STRING"/>
          <Column id="cntpatt" type="STRING"/>
          <Column id="basecnt" type="STRING"/>
          <Column id="outprntseq" type="STRING"/>
          <Column id="mthdengnm" type="STRING"/>
          <Column id="basemthdyn" type="STRING"/>
          <Column id="mealflag" type="STRING"/>
          <Column id="lblprntyn" type="STRING"/>
          <Column id="adminpath" type="STRING"/>
          <Column id="drdirecyn" type="STRING"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_A0017" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_searchdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchmthdkind" type="STRING" size="256"/>
          <Column id="srchmthdcd" type="STRING" size="256"/>
          <Column id="srchbasemthdyn" type="STRING" size="256"/>
          <Column id="srchbasecnt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchmthdkind">N</Col>
            <Col id="srchbasecnt">-</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_srchmthdcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_mthdflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdid">1</Col>
            <Col id="cdnm">일반</Col>
          </Row>
          <Row>
            <Col id="cdid">2</Col>
            <Col id="cdnm">추가</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_rslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_mealflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdid">0</Col>
            <Col id="cdnm">-</Col>
          </Row>
          <Row>
            <Col id="cdid">1</Col>
            <Col id="cdnm">식전</Col>
          </Row>
          <Row>
            <Col id="cdid">2</Col>
            <Col id="cdnm">식후</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_adminpath" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdid">0</Col>
            <Col id="cdnm">-</Col>
          </Row>
          <Row>
            <Col id="cdid">1</Col>
            <Col id="cdnm">투약</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_req" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_mthdlist_oncolumnchanged"/>
      <Dataset id="ds_temp_mthdlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_mthdlist_oncolumnchanged">
        <ColumnInfo>
          <Column id="mthdkind" type="STRING"/>
          <Column id="mthdflag" type="STRING"/>
          <Column id="mthdcd" type="STRING"/>
          <Column id="abbrnm" type="STRING"/>
          <Column id="mthdcnts1" type="STRING"/>
          <Column id="mthdcnts2" type="STRING"/>
          <Column id="mthdcnts3" type="STRING"/>
          <Column id="mthdcnts4" type="STRING"/>
          <Column id="dayno" type="STRING"/>
          <Column id="cntpatt" type="STRING"/>
          <Column id="basecnt" type="STRING"/>
          <Column id="outprntseq" type="STRING"/>
          <Column id="mthdengnm" type="STRING"/>
          <Column id="basemthdyn" type="STRING"/>
          <Column id="mealflag" type="STRING"/>
          <Column id="lblprntyn" type="STRING"/>
          <Column id="adminpath" type="STRING"/>
          <Column id="drdirecyn" type="STRING"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.cmb_srchmthdflag" propid="value" datasetid="ds_send_searchdata" columnid="srchmthdkind"/>
      <BindItem id="item1" compid="group2.ipt_srchmthdcd" propid="value" datasetid="ds_send_searchdata" columnid="srchmthdcd"/>
      <BindItem id="item3" compid="group2.combo1" propid="value" datasetid="ds_send_searchdata" columnid="srchbasecnt"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-10-27
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-10-27      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

var arErrorCode = new HashArray();
/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/
function SMADB00400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}


function SMADB00400_onload(obj:Form, e:LoadEventInfo)
{
	//List 0번째 상태값 설정
	grdf_setRowTypeIcon(grd_mthdlist, 0);
		
	//권한관리
	btn_save.enable = frmf_checkAuth("X");	//저장
	
	//공통코드 호출
	appf_getCodeList( [{dsNm: "ds_A0017", cdGrpId: "A0017"}], true );
	
	var oParam = {};
		oParam.id          = "TRADB00401";
		oParam.service     = "pharmacybaseapp.MthdCode";
		oParam.method      = "reqGetMthdList";
		oParam.inds        = "req=ds_send_searchdata";
		oParam.outds       = "ds_grd_mthdlist=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADB00401";

	tranf_submit(oParam);
	ds_send_srchmthdcd.clearData();
	
	ds_temp_mthdlist.clearData();
	ds_temp_mthdlist.copyData(ds_grd_mthdlist);
	
	grdf_initGrid(grd_mthdlist);
}

/******************************************************************
 * Argument          : 
 * Description       : chkeckbox 값 입력 변경
 ******************************************************************/
function ds_grd_mthdlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if( e.columnid == "basemthdyn" || e.columnid == "lblprntyn" || e.columnid == "drdirecyn" ) {
		obj.setColumn(e.row,e.columnid,(e.newvalue=="Y"||e.newvalue==1)?"Y":"N");
	}
	
	if( e.columnid == "cntpatt" ) {
		var s = "";
		var cnt = 0;
		
		s = obj.getColumn(e.row, e.columnid);

		if( s.substring(4,5) != "1" ){
			for( var i = 0; i < 4; i++ ){
				if( s.substring(i, i+1) == "1" ){
					cnt = cnt + 1;
				}
			}
			obj.setColumn(e.row, "basecnt", cnt);
		}
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 조회
 ******************************************************************/
function group2_btn_seamthd_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TRADB00401";
		oParam.service     = "pharmacybaseapp.MthdCode";
		oParam.method      = "reqGetMthdList";
		oParam.inds        = "req=ds_send_searchdata";
		oParam.outds       = "ds_grd_mthdlist=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADB00401";

	tranf_submit(oParam);
	ds_send_srchmthdcd.clearData();
	ds_temp_mthdlist.clearData();
	ds_temp_mthdlist.copyData(ds_grd_mthdlist);
}

//용법종류 조회
function group2_cmb_srchmthdflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
//	group2_btn_seamthd_onclick();
	frmf_inputEnterKey("group2.btn_seamthd", "onclick", new ClickEventInfo);
}

//용법코드 조회
function group2_ipt_srchmthdcd_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13 ){
		obj.updateToDataset();
//		group2_btn_seamthd_onclick();
		frmf_inputEnterKey("group2.btn_seamthd", "onclick", new ClickEventInfo);
	}
}

//기본용법 조회
function group2_checkbox2_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
{
//	group2_btn_seamthd_onclick();
	if(e.postvalue == "Y") ds_send_searchdata.setColumn(0,"srchbasemthdyn",e.postvalue);
	else ds_send_searchdata.setColumn(0,"srchbasemthdyn","");
	frmf_inputEnterKey("group2.btn_seamthd", "onclick", new ClickEventInfo);
}

//횟수 조회
function group2_combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
//	group2_btn_seamthd_onclick();
	frmf_inputEnterKey("group2.btn_seamthd", "onclick", new ClickEventInfo);
}

/******************************************************************
 * Argument          : 
 * Description       : 행추가
 ******************************************************************/
function group3_btn_grdadd_onclick(obj:Button,  e:ClickEventInfo)
{
	var nRow = ds_grd_mthdlist.addRow();
	ds_grd_mthdlist.setColumn(nRow, "mthdkind", ds_send_searchdata.getColumn(0, "srchmthdkind"));
	ds_grd_mthdlist.setColumn(nRow, "mthdflag", "1");
}

/******************************************************************
 * Argument          : 
 * Description       : 행복사
 ******************************************************************/
function group3_btn_grdcopy_onclick(obj:Button,  e:ClickEventInfo)
{
	var addRow = ds_grd_mthdlist.insertRow( ds_grd_mthdlist.rowposition + 1 );
	ds_grd_mthdlist.copyRow(addRow, ds_grd_mthdlist, ds_grd_mthdlist.rowposition - 1);
}

/******************************************************************
 * Argument          : 
 * Description       : 행삭제
 ******************************************************************/
function group3_btn_grddel_onclick(obj:Button,  e:ClickEventInfo)
{
	var cRow = ds_grd_mthdlist.rowposition;
	
	if( ds_grd_mthdlist.getRowType(cRow) == 2 ) {
		ds_grd_mthdlist.deleteRow(cRow);
	}else{
		grdf_setStatus(grd_mthdlist, "D", [cRow]);
	}
}

/******************************************************************
 * Argument          : 
 * Description       : Excel
 ******************************************************************/
function group3_btn_excsave_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_grd_mthdlist.rowcount > 0 ){
		grdf_exportExcel(grd_mthdlist, "용법코드관리", "용법코드관리", false, "", "user", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 저장
 ******************************************************************/
function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	var oDsUpdate = grdf_getGridUpdateData(grd_mthdlist);
	
	if( oDsUpdate.rowcount < 1 ){
		sysf_messageBox("입력","E013");
		return;
	}
	
	grdf_setStatusColumn(oDsUpdate, "m");			// 각행의 status에 rowType 값에 따라 'i', 'u', 'd'로 업데이트 시켜준다
	ds_send_req.copyData(oDsUpdate, true);
	
	for( var i = 0; i < ds_send_req.rowcount; i++ ){
		if( utlf_isNull(ds_send_req.getColumn(i, "mthdcd")) ){
			sysf_messageBox("용법코드는 ","I003");
			return;
		} else {
			if( ds_send_req.getColumn(i, "m") == "i" ){
				for( var j = 0; j < ds_temp_mthdlist.rowcount; j++ ){
					var tMthdcd = ds_temp_mthdlist.getColumn(j, "mthdcd");
					var sMthdcd = ds_send_req.getColumn(i, "mthdcd");
					if( tMthdcd == sMthdcd ){
						sysf_messageBox("동일한 용법코드가 존재합니다.","I");
						return;
					}
				}
			}
		}
		
		var basemthdyn = ds_send_req.getColumn(i, "basemthdyn");
		var lblprntyn = ds_send_req.getColumn(i, "lblprntyn");
		var drdirecyn = ds_send_req.getColumn(i, "drdirecyn");
		
		if( basemthdyn == "1" || basemthdyn == "Y" ) ds_send_req.setColumn(i, "basemthdyn", "Y"); else ds_send_req.setColumn(i, "basemthdyn", "N");
		if( lblprntyn == "1" || lblprntyn == "Y" ) ds_send_req.setColumn(i, "lblprntyn", "Y"); else ds_send_req.setColumn(i, "lblprntyn", "N");
		if( drdirecyn == "1" || drdirecyn == "Y" ) ds_send_req.setColumn(i, "drdirecyn", "Y"); else ds_send_req.setColumn(i, "drdirecyn", "N");
	}

	dsf_setDefaultVal(ds_send_req, "abbrnm:-,mthdcnts1:-,mthdcnts2:-,mthdcnts3:-,mthdcnts4:-,cntpatt:00000,basecnt:0,basemthdyn:N,mealflag:-,outprntseq:0,lblprntyn:N,adminpath:-,drdirecyn:-,mthdengnm:-");
	dsf_setTypeFormat(ds_send_req, "basecnt:INT^outprntseq:INT");
	var oParam = {};
		oParam.id          = "TXADB00401";
		oParam.service     = "pharmacybaseapp.MthdCode";
		oParam.method      = "reqExeMthdCode";
		oParam.inds        = "req=ds_send_req";
		oParam.outds       = "ds_hidden_rslt=item";
		oParam.async       = false;
		oParam.callback    = "cf_TXADB00401";

	tranf_submit(oParam);
	
	var oParam = {};
		oParam.id          = "TRADB00401";
		oParam.service     = "pharmacybaseapp.MthdCode";
		oParam.method      = "reqGetMthdList";
		oParam.inds        = "req=ds_send_searchdata";
		oParam.outds       = "ds_grd_mthdlist=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADB00401";

	tranf_submit(oParam)
	ds_temp_mthdlist.clearData();
	ds_temp_mthdlist.copyData(ds_grd_mthdlist);
}

function cf_TXADB00401(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

]]></Script>
  </Form>
</FDL>