YNU_JEUS/app_home/himed/xpapps/pam/aftjudgxp/xp/SPPID32000_사후전자제출목록관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPID32000" position="absolute 0 0 1179 719" titletext="사후 전자제출 목록 관리" oninit="model1_oninit" onload="SPPID32000_onload">
    <Layouts>
      <Layout>
        <Static id="caption1" class="tit_1" position="absolute 0 0 177 26" text="사후 전자제출 목록 관리"/>
        <Button id="btn_close" taborder="3" text="닫기" onclick="btn_close_onclick" class="btn4" position="absolute 1110 692 1163 712" anchor="right bottom"/>
        <Static id="caption00" text="선택목록" class="tit_2" position="absolute 0 88 116 108"/>
        <Static id="caption02" text="서식목록" class="tit_2" position="absolute 328 88 444 108"/>
        <Grid id="grd_hreflist" taborder="5" useinputpanel="false" position="absolute 0 112 314 677" binddataset="ds_hreflist" autoenter="select" oncelldblclick="grd_hreflist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="26"/>
                <Column size="109"/>
                <Column size="70"/>
                <Column size="94"/>
                <Column size="102"/>
                <Column size="158"/>
                <Column size="128"/>
                <Column size="162"/>
                <Column size="116"/>
              </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" text="SIGNNO"/>
                <Cell col="6" text="PRCPDD"/>
                <Cell col="7" text="EXECPRCPUNIQNO"/>
                <Cell col="8" text="FOM_VER"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" style="align:left;" text="bind:formnm"/>
                <Cell col="2" text="bind:recno"/>
                <Cell col="3" text="bind:result"/>
                <Cell col="4" text="bind:supl_data_fom_cd"/>
                <Cell col="5" displaytype="text" edittype="text" text="bind:signno"/>
                <Cell col="6" text="bind:prcpdd"/>
                <Cell col="7" displaytype="text" edittype="text" text="bind:execprcpuniqno"/>
                <Cell col="8" text="bind:fom_ver"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_recordlist" taborder="6" useinputpanel="false" position="absolute 327 112 1164 677" binddataset="ds_recordlist" autoenter="none" cellsizingtype="col" oncelldblclick="grd_recordlist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="16"/>
                <Column size="59"/>
                <Column size="77"/>
                <Column size="75"/>
                <Column size="92"/>
                <Column size="38"/>
                <Column size="104"/>
                <Column size="83"/>
                <Column size="76"/>
                <Column size="87"/>
                <Column size="214"/>
                <Column size="30"/>
                <Column size="29"/>
                <Column size="40"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="122"/>
                <Column size="82"/>
              </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" text="입/외"/>
                <Cell col="6" text="진료과"/>
                <Cell col="7" text="처방일자"/>
                <Cell col="8" text="실시일자"/>
                <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="처방일련번호"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" text="bind:recno"/>
                <Cell col="2" displaytype="date" text="bind:rgstdd"/>
                <Cell col="3" displaytype="combo" text="bind:rgstrid" combodataset="ds_init_judgrid" combocodecol="judgrid" combodatacol="judgrnm"/>
                <Cell col="4" style="align:left;" text="bind:formnm"/>
                <Cell col="5" text="bind:ioflag"/>
                <Cell col="6" displaytype="combo" style="align:left;" text="bind:orddeptcd" combodataset="ds_init_orddeptcd" combocodecol="cd" combodatacol="nm"/>
                <Cell col="7" edittype="date" text="bind:prcpdd"/>
                <Cell col="8" edittype="date" text="bind:execdd"/>
                <Cell col="9" style="align:left;" text="bind:calcscorcd"/>
                <Cell col="10" style="align:left;" text="bind:calcnm"/>
                <Cell col="11" text="bind:insukind"/>
                <Cell col="12" text="bind:suppkind"/>
                <Cell col="13" text="bind:mskind"/>
                <Cell col="14" text="bind:supl_data_fom_cd"/>
                <Cell col="15" text="bind:fom_ver"/>
                <Cell col="16" displaytype="text" edittype="text" text="bind:signno"/>
                <Cell col="17" displaytype="text" edittype="text" text="bind:execprcpuniqno"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Calendar id="ipt_fromdd" taborder="7" dateformat="yyyy-MM-dd" position="absolute 896 85 984 104"/>
        <Static id="caption2" text="~" class="search_no_b" position="absolute 986 86 998 103"/>
        <Calendar id="ipt_todd" taborder="8" dateformat="yyyy-MM-dd" onchanged="group3_group2_ipt_toobtappdd_onchanged" position="absolute 996 85 1084 104"/>
        <Static id="caption03" text="수집일자" class="search_name" position="absolute 827 84 901 104" onclick="caption03_onclick"/>
        <Button id="btn_select" taborder="9" text="조회" class="btn1" position="absolute 1111 84 1164 104" anchor="right bottom" onclick="btn_select_onclick"/>
        <Div id="group5" taborder="10" onkeydown="group5_onkeydown" text="Div00" class="div_SA" position="absolute 0 27 1164 72">
          <Layouts>
            <Layout>
              <Static id="caption9" text="접수번호" class="search_name" position="absolute 390 12 464 32" anchor="default"/>
              <Edit id="ipt_acptno" taborder="19" imemode="hangul" maxlength="15" class="input_search" position="absolute 457 12 554 32" anchor="default" enable="false"/>
              <Edit id="ipt_docuseqno" taborder="22" imemode="hangul" maxlength="15" onkeydown="group5_ipt_docuseqno1_onkeydown" ontextchanged="group5_ipt_docuseqno1_ontextchanged" class="input_search" position="absolute 656 12 714 32" anchor="default" enable="false"/>
              <Static id="caption7" text="명번호" class="search_name" position="absolute 602 12 663 32" anchor="default"/>
              <Static id="caption46" text="진료과" class="search_name" position="absolute 776 12 837 32" anchor="default"/>
              <Static id="caption10" text="내원유형" class="search_name" position="absolute 1010 11 1084 31" anchor="default"/>
              <Static id="caption00" text="등록번호" class="search_name" position="absolute 19 12 93 32" anchor="default"/>
              <Edit id="ipt_pid" taborder="31" imemode="alpha" maxlength="15" class="input_search" position="absolute 88 12 166 32" anchor="default" enable="false"/>
              <Static id="caption01" text="환자명" class="search_name" position="absolute 211 11 272 31" anchor="default"/>
              <Edit id="ipt_patnm" taborder="32" imemode="alpha" maxlength="15" class="input_search" position="absolute 266 12 344 32" anchor="default" enable="false"/>
              <Edit id="ipt_orddeptnm" taborder="36" imemode="hangul" maxlength="15" class="input_search" position="absolute 834 12 950 32" anchor="default" enable="false"/>
              <Edit id="ipt_ioflag" taborder="37" imemode="hangul" maxlength="15" class="input_search" position="absolute 1080 11 1134 31" enable="false"/>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_save" taborder="11" text="저장" class="btn5" position="absolute 261 84 314 104" anchor="right bottom" onclick="btn_save_onclick"/>
        <Button id="btn_select1" taborder="12" text="조회" class="btn1" position="absolute 207 84 260 104" anchor="right bottom" onclick="btn_select1_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_hreflist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="supl_data_fom_cd" type="STRING" size="256"/>
          <Column id="recno" type="STRING" size="256"/>
          <Column id="result" type="STRING" size="256"/>
          <Column id="signno" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
          <Column id="fom_ver" type="STRING" size="256"/>
          <Column id="formnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_recordlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="recno" type="STRING" size="256"/>
          <Column id="rgstdd" type="STRING" size="256"/>
          <Column id="rgstrid" type="STRING" size="256"/>
          <Column id="formnm" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="execdd" type="STRING" size="256"/>
          <Column id="calcscorcd" type="STRING" size="256"/>
          <Column id="calcnm" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
          <Column id="suppkind" type="STRING" size="256"/>
          <Column id="mskind" type="STRING" size="256"/>
          <Column id="supl_data_fom_cd" type="STRING" size="256"/>
          <Column id="fom_ver" type="STRING" size="256"/>
          <Column id="signno" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="supl_data_fom_cd" type="STRING" size="256"/>
          <Column id="recno" type="STRING" size="256"/>
          <Column id="signno" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="execprcpuniqno" type="STRING" size="256"/>
          <Column id="fom_ver" type="STRING" size="256"/>
          <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"/>
          <Column id="status" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cond" 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"/>
          <Column id="patnm" type="STRING" size="256"/>
          <Column id="acptno" type="STRING" size="256"/>
          <Column id="docuseqno" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_judgrid" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="judgrnm" type="STRING" size="256"/>
          <Column id="judgrid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item1" compid="ipt_fromdd" propid="value" datasetid="ds_cond" columnid="fromdd"/>
      <BindItem id="item2" compid="ipt_todd" propid="value" datasetid="ds_cond" columnid="todd"/>
      <BindItem id="item4" compid="group5.ipt_pid" propid="displaynulltext" datasetid="ds_cond" columnid="pid"/>
      <BindItem id="item5" compid="group5.ipt_patnm" propid="displaynulltext" datasetid="ds_cond" columnid="patnm"/>
      <BindItem id="item6" compid="group5.ipt_acptno" propid="displaynulltext" datasetid="ds_cond" columnid="acptno"/>
      <BindItem id="item7" compid="group5.ipt_docuseqno" propid="displaynulltext" datasetid="ds_cond" columnid="docuseqno"/>
      <BindItem id="item8" compid="group5.ipt_orddeptnm" propid="displaynulltext" datasetid="ds_cond" columnid="orddeptcd"/>
      <BindItem id="item0" compid="group5.ipt_ioflag" propid="displaynulltext" datasetid="ds_cond" columnid="ioflag"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	        :	
 * Make Date 		:	2019-04-09
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
 
include "com_commonxp::comm_main.xjs";
	
function SPPID32000_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);  // 화면공통
	grdf_setRowTypeIcon(grd_hreflist, 0);

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

// 화면을 초기화한다.
function lf_Initialize() {

	// 심사자, 진료과 기준자료 세팅 
	var oParam = {};
		oParam.id          = "TRPID20201";
		oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
		oParam.method      = "reqGetInitComCd";
		oParam.inds        = "req=ds_cond";
		oParam.outds       = "ds_init_judgrid=judgrid ds_init_orddeptcd=orddeptcd";
		oParam.async       = false;

	tranf_submit(oParam);		
						
	ds_cond.clearData();
	ds_cond.addRow();

	var clamym    = opener.ds_cond_sppid32000.getColumn(0, "clamym");
	var clamdg    = opener.ds_cond_sppid32000.getColumn(0, "clamdg");
	var pid       = opener.ds_cond_sppid32000.getColumn(0, "pid");
	var pidsn     = opener.ds_cond_sppid32000.getColumn(0, "pidsn");
	var patnm     = opener.ds_cond_sppid32000.getColumn(0, "patnm");
	var acptno    = opener.ds_cond_sppid32000.getColumn(0, "acptno");
	var docuseqno = opener.ds_cond_sppid32000.getColumn(0, "docuseqno");
	var orddeptcd = opener.ds_cond_sppid32000.getColumn(0, "orddeptcd");
	var ioflag    = opener.ds_cond_sppid32000.getColumn(0, "ioflag");

	ds_cond.setColumn(0, "clamym", 		clamym);
	ds_cond.setColumn(0, "clamdg", 		clamdg);
	ds_cond.setColumn(0, "pid",    		pid);
	ds_cond.setColumn(0, "pidsn",  		pidsn);
	ds_cond.setColumn(0, "patnm",  		patnm);
	ds_cond.setColumn(0, "acptno",  	acptno);
	ds_cond.setColumn(0, "docuseqno",  	docuseqno);
	ds_cond.setColumn(0, "orddeptcd",  	orddeptcd);
	ds_cond.setColumn(0, "ioflag",  	ioflag);
	ds_cond.setColumn(0, "fromdd", 		utlf_getCurrentDate().toDate().getAddDate(-30).getDateFormat("YYYYMMDD"));
	ds_cond.setColumn(0, "todd",   		utlf_getCurrentDate());

	// 전자제출 목록 조회 
	fGetHrefList();
	
	// 수집 서식 조회 
	fGetRecordList();
	
}

// 전자제출 목록 조회 
function fGetHrefList()
{
	var oParam = {};
    oParam.id          = "TRPID32000";
    oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
    oParam.method      = "reqGetHrefList";
    oParam.inds        = "req=ds_cond"
    oParam.outds       = "ds_hreflist=hreflist";
    oParam.async       = false;

	tranf_submit(oParam);
	}

// 수집 서식 조회 
function fGetRecordList()
{
	var oParam = {};
    oParam.id          = "TRPID32001";
    oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
    oParam.method      = "reqGetRecordList";
    oParam.inds        = "req=ds_cond"
    oParam.outds       = "ds_recordlist=recordlist";
    oParam.async       = false;

	tranf_submit(oParam);	
}

function grd_recordlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var supl_data_fom_cd = ds_recordlist.getColumn(e.row, "supl_data_fom_cd");
	var recno			 = ds_recordlist.getColumn(e.row, "recno");
	var signno			 = ds_recordlist.getColumn(e.row, "signno");
	var prcpdd			 = ds_recordlist.getColumn(e.row, "prcpdd");
	var execprcpuniqno	 = ds_recordlist.getColumn(e.row, "execprcpuniqno");
	var fom_ver			 = ds_recordlist.getColumn(e.row, "fom_ver");
	var formnm			 = ds_recordlist.getColumn(e.row, "formnm");

	var row = ds_hreflist.addRow();
	ds_hreflist.setColumn(row,"supl_data_fom_cd",supl_data_fom_cd);
	ds_hreflist.setColumn(row,"recno"			,recno);
	ds_hreflist.setColumn(row,"signno"			,signno);
	ds_hreflist.setColumn(row,"prcpdd"			,prcpdd);
	ds_hreflist.setColumn(row,"execprcpuniqno"	,execprcpuniqno);
	ds_hreflist.setColumn(row,"fom_ver"			,fom_ver);
	ds_hreflist.setColumn(row,"formnm"			,formnm);
	
}

function grd_hreflist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	grdf_setStatus(grd_hreflist,"D",[e.row]);
}

function btn_close_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function btn_select_onclick(obj:Button,  e:ClickEventInfo)
{
	// 수집 서식 조회 
	fGetRecordList();	
}

function btn_select1_onclick(obj:Button,  e:ClickEventInfo)
{
	// 전자제출 목록 조회 
	fGetHrefList();
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_send.clearData();
	
	for(var i=0; i<ds_hreflist.rowcount; i++){
	
		var rowstatus = ds_hreflist.getRowType(i);	
		if(rowstatus == "2" || rowstatus == 8){
			
			var clamym 	= ds_cond.getColumn(0, "clamym");
			var clamdg	= ds_cond.getColumn(0, "clamdg");
			var pid		= ds_cond.getColumn(0, "pid");
			var pidsn	= ds_cond.getColumn(0, "pidsn");

			var row = ds_send.addRow();
			ds_send.copyRow(row,ds_hreflist,i);

			ds_send.setColumn(row,"clamym"			,clamym);
			ds_send.setColumn(row,"clamdg"			,clamdg);
			ds_send.setColumn(row,"pid"				,pid);
			ds_send.setColumn(row,"pidsn"			,pidsn);
			ds_send.setColumn(row,"status"			,rowstatus);

		}
	}

	var oParam = {};
		oParam.id          = "TXPID32000";
		oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
		oParam.method      = "reqExeHrefSave";
		oParam.inds        = "req=ds_send"
		oParam.async       = false;
	tranf_submit(oParam);			

	// 전자제출 목록 조회 
	fGetHrefList();
	
	// 수집 서식 조회 
	fGetRecordList();
	

}

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