YNU_JEUS/app_home/himed/xpapps/pam/aftjudgxp/xp/SPPID21800_처방심사변경조회.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPID21800" position="absolute 0 0 1104 685" titletext="처방 심사변경 조회" oninit="SPPID21800_oninit" onload="SPPID21800_onload">
    <Layouts>
      <Layout>
        <Shape id="roundrect2" type="roundrectangle" class="roundrect_example" position="absolute 0 654 516 678"/>
        <Static id="caption1" text="심사변경 목록" class="tit_2" position="absolute 0 1 108 22"/>
        <Radio id="rdo_cloppayflag" taborder="1" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 125 1 372 16" onitemchanged="rdo_cloppayflag_onitemchanged" columncount="-1" rowcount="-1">
          <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">D</Col>
                <Col id="datacolumn">삭제처방</Col>
              </Row>
              <Row>
                <Col id="codecolumn">U</Col>
                <Col id="datacolumn">수정처방</Col>
              </Row>
              <Row>
                <Col id="codecolumn">I</Col>
                <Col id="datacolumn">입력처방</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Shape id="line1" class="line_10" position="absolute 0 15 1099 26" anchor="left top right"/>
        <Grid id="grd_delorder" class="datagrid2" taborder="2" binddataset="ds_main_list5_clod" useinputpanel="false" position="absolute 0 22 1099 650" onaftersort="grp_biz_grd_delorder_onaftersort" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="17" band="left"/>
                <Column size="20" band="left"/>
                <Column size="20" band="left"/>
                <Column size="0" band="left"/>
                <Column size="0" band="left"/>
                <Column size="0" band="left"/>
                <Column size="0" band="left"/>
                <Column size="30" band="left"/>
                <Column size="18" band="left"/>
                <Column size="28" band="left"/>
                <Column size="22" band="left"/>
                <Column size="68" band="left"/>
                <Column size="70" band="left"/>
                <Column size="70" band="left"/>
                <Column size="67" band="left"/>
                <Column size="210"/>
                <Column size="30"/>
                <Column size="58"/>
                <Column size="40"/>
                <Column size="30"/>
                <Column size="40"/>
                <Column size="60"/>
                <Column size="37"/>
                <Column size="14"/>
                <Column size="68"/>
                <Column size="200"/>
                <Column size="68"/>
              </Columns>
              <Rows>
                <Row size="30" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1"/>
                <Cell col="2" text="X"/>
                <Cell col="3" text="선&#13;&#10;별"/>
                <Cell col="4" text="재&#13;&#10;행"/>
                <Cell col="5" text="급&#13;&#10;여"/>
                <Cell col="6" text="Seq&#10;no"/>
                <Cell col="7" text="조정&#10;사유"/>
                <Cell col="8" text="줄"/>
                <Cell col="9" text="항"/>
                <Cell col="10" text="목"/>
                <Cell col="11" text="처방&#10;시작일자"/>
                <Cell col="12" text="그룹코드"/>
                <Cell col="13" text="수가코드"/>
                <Cell col="14" text="EDI코드"/>
                <Cell col="15" text="한글명"/>
                <Cell col="16" text="코드&#10;구분"/>
                <Cell col="17" text="단가"/>
                <Cell col="18" text="1회량"/>
                <Cell col="19" text="횟수"/>
                <Cell col="20" text="일수"/>
                <Cell col="21" text="금액"/>
                <Cell col="22" text="확인&#10;코드"/>
                <Cell col="23" text="T"/>
                <Cell col="24" text="처방&#10;종료일자"/>
                <Cell col="25" text="처방명"/>
                <Cell col="26" text="수정일자"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" text="bind:update"/>
                <Cell col="2" style="background:#c0c0c0ff;background2:#c0c0c0ff;" text="bind:rowstat"/>
                <Cell col="3" text="bind:spcljudgyn"/>
                <Cell col="4" text="bind:matractflag"/>
                <Cell col="5" text="bind:payflag"/>
                <Cell col="6" text="bind:seqno"/>
                <Cell col="7" text="bind:adjtresncd"/>
                <Cell col="8" text="bind:edilnno"/>
                <Cell col="9" text="bind:ediitem1"/>
                <Cell col="10" text="bind:ediitem2"/>
                <Cell col="11" displaytype="date" text="bind:ordfromdd" mask="yyyy-MM-dd"/>
                <Cell col="12" style="align:left middle;" text="bind:grupcalcscorcd"/>
                <Cell col="13" style="align:left middle;" text="bind:snglcalcscorcd"/>
                <Cell col="14" style="align:left middle;" text="bind:edicd"/>
                <Cell col="15" style="align:left middle;" text="bind:hngnm"/>
                <Cell col="16" style="align:right middle;" text="bind:edicdflag"/>
                <Cell col="17" displaytype="number" text="bind:unitcost"/>
                <Cell col="18" displaytype="number" text="bind:drugqty"/>
                <Cell col="19" displaytype="number" text="bind:tims"/>
                <Cell col="20" displaytype="number" text="bind:dayno"/>
                <Cell col="21" displaytype="number" text="bind:amt"/>
                <Cell col="22" text="bind:cnfmcd"/>
                <Cell col="23" text="bind:lnunitspclspecyn"/>
                <Cell col="24" displaytype="date" text="bind:ordtodd" mask="yyyy-MM-dd"/>
                <Cell col="25" style="align:left middle;" text="bind:ordnm"/>
                <Cell col="26" displaytype="date" text="bind:lastupdtdt" mask="yyyy-MM-dd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line32" class="line_6" position="absolute 0 652 1099 655" anchor="left right bottom"/>
        <Button id="btn_close" taborder="3" text="닫기" class="btn4" position="absolute 1043 655 1099 677" anchor="right bottom" onclick="btn_close_onclick"/>
        <Static id="caption2" text="조정사유" class="cell_2" position="absolute 5 656 65 676" style="align:center middle;"/>
        <Static id="caption3" text="A:일투총투 조정  B:처방누락(입력)  C:산정불가(삭제)  D:적용착오  E:타부서요청" position="absolute 68 656 511 676"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="selectedRdo" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="selectedRdo">selectedRdo</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamdg" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="pidsn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list5_clod" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="update" type="STRING" size="256" sumtext="rowStatus"/>
          <Column id="rowstat" type="STRING" size="256" sumtext="ROW상태"/>
          <Column id="spcljudgyn" type="STRING" size="256" sumtext="선별심사여부"/>
          <Column id="matractflag" type="STRING" size="256" sumtext="재료행위구분"/>
          <Column id="payflag" type="STRING" size="256" sumtext="급여구분"/>
          <Column id="seqno" type="STRING" size="256" sumtext="일련번호"/>
          <Column id="adjtresncd" type="STRING" size="256" sumtext="조정사유코드"/>
          <Column id="edilnno" type="STRING" size="256" sumtext="줄번호"/>
          <Column id="ediitem1" type="STRING" size="256" sumtext="항"/>
          <Column id="ediitem2" type="STRING" size="256" sumtext="목"/>
          <Column id="ordfromdd" type="STRING" size="256" sumtext="처방시작일"/>
          <Column id="grupcalcscorcd" type="STRING" size="256" sumtext="그룹코드"/>
          <Column id="snglcalcscorcd" type="STRING" size="256" sumtext="수가코드"/>
          <Column id="edicd" type="STRING" size="256" sumtext="EDI코드"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="한글명"/>
          <Column id="edicdflag" type="STRING" size="256" sumtext="코드구분"/>
          <Column id="unitcost" type="STRING" size="256" sumtext="단가"/>
          <Column id="drugqty" type="STRING" size="256" sumtext="1회투여량"/>
          <Column id="tims" type="STRING" size="256" sumtext="횟수"/>
          <Column id="dayno" type="STRING" size="256" sumtext="일수"/>
          <Column id="amt" type="STRING" size="256" sumtext="금액"/>
          <Column id="cnfmcd" type="STRING" size="256" sumtext="확인코드"/>
          <Column id="lnunitspclspecyn" type="STRING" size="256" sumtext="줄단위특정내역여부"/>
          <Column id="ordtodd" type="STRING" size="256" sumtext="처방종료일"/>
          <Column id="ordnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="lastupdtdt" type="STRING" size="256" sumtext="최종수정일시"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="rdo_cloppayflag" propid="value" datasetid="ds_hidden" columnid="selectedRdo"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "pam_insucomxp::PAM.xjs";
include "pam_pamcomnxp::PAM.xjs";
function SPPID21800_oninit(obj:Form, e:InitEventInfo)
{
	 frmf_initForm(obj); 
}

function SPPID21800_onload(obj:Form, e:LoadEventInfo) 
{
	grdf_initGrid(grd_delorder); 
	grdf_setRowTypeIcon(grd_delorder, 1); 

	fInitialize();		// 화면을 초기화한다.
}

function fInitialize() 
{
	ds_hidden.setColumn(0, "selectedRdo", "-");
	
	if (frmf_checkOpener()) 
	{
		var clamym 	= opener.ds_main_item1_clbs.getColumn(0, "clamym");
		var clamdg 	= opener.ds_main_item1_clbs.getColumn(0, "clamdg");
		var pid 		= opener.ds_main_item1_clbs.getColumn(0, "pid");
		var pidsn 	= opener.ds_main_item1_clbs.getColumn(0, "pidsn");
		
		if (clamym) 
		{
			ds_send.setColumn(0, "clamym", clamym);
			ds_send.setColumn(0, "clamdg", clamdg);
			ds_send.setColumn(0, "pid", pid);
			ds_send.setColumn(0, "pidsn", pidsn);
																								
			var ioflag = opener.ds_main_item1_clbs.getColumn(0, "ioflag");

			var oParam = {};
				oParam.id          = "TRPID20305";
				oParam.service     = "aftjudgapp.InAftJudg";
				oParam.method      = "reqGetAftJudgDelOrderList";
				oParam.inds        = "req=ds_send";
				oParam.outds       = "ds_main_list5_clod=clod";
				oParam.async       = false;
				//oParam.callback    = "cf_TRPID20305";

			tranf_submit(oParam);
			
			dsf_setDefaultVal(ds_main_list5_clod, "rowstat:D");
			
			var arrRow = new Array();
			
			for(var i = 0; i < ds_main_list5_clod.rowcount; i++)
			{
				if(ds_main_list5_clod.getColumn(i, "rowstat") == "D")
				{
					arrRow[0] = i; 
					
					grdf_setStatus(grd_delorder, "D", arrRow);
				}
				else if(ds_main_list5_clod.getColumn(i, "rowstat") == "U")
				{
					arrRow[0] = i; 
					
					grdf_setStatus(grd_delorder, "U", arrRow);
				}
				else if(ds_main_list5_clod.getColumn(i, "rowstat") == "I")
				{
					arrRow[0] = i; 
					
					grdf_setStatus(grd_delorder, "I", arrRow);
				}
			}
		}
		return;
	}
}

function rdo_cloppayflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	var selectedRdo = obj.value;
	
	if (selectedRdo == "D") 
	{
		ds_main_list5_clod.filterstr = "rowstat == 'D'";
	} 
	else if (selectedRdo == "U") 
	{
		ds_main_list5_clod.filterstr = "rowstat == 'U'";
	} 
	else if (selectedRdo == "I")
	{
		ds_main_list5_clod.filterstr = "rowstat == 'I'";
	} 
	else 
	{
		ds_main_list5_clod.filterstr = "";
	}
}

function btn_close_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
]]></Script>
  </Form>
</FDL>