YNU_JEUS/app_home/himed/xpapps/ast/healexamxp/xp/SMAHR00600_종합판정추후관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAHR00600" position="absolute 0 0 1204 805" titletext="종합판정 추후관리" oninit="SMAHR00600_oninit" onload="SMAHR00600_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 25 1195 65" align="align:center top;" id="group1" anchor="left top right" class="div_SA">
          <Layouts>
            <Layout>
              <Button position="absolute 1130 9 1186 31" id="btn_searchhist" class="btn1" text="조회" anchor="top right" onclick="group1_btn_searchhist_onclick"/>
              <Static text="성명 :" position="absolute 7 12 68 29" id="caption1" class="search_name" anchor="default"/>
              <Edit position="absolute 66 11 133 30" id="ipt_srchpnm" class="input_search" taborder="1" anchor="default" autoselect="true" autoskip="true" onkeyup="group1_ipt_srchpnm_onkeyup"/>
              <Button position="absolute 542 12 558 28" id="btn_srchpat" class="icon_search" text="" anchor="default" onclick="group1_btn_srchpat_onclick"/>
              <Static text="등록번호 :" position="absolute 378 12 464 29" id="caption7" class="search_name" anchor="default"/>
              <Edit position="absolute 462 10 539 29" id="ipt_srchpid" class="input_search" taborder="4" anchor="default" autoselect="true" autoskip="true" onkeyup="group1_ipt_srchpid_onkeyup"/>
              <Static text="주민번호 :" position="absolute 151 13 229 30" id="caption5" class="search_name" anchor="default"/>
              <MaskEdit position="absolute 234 11 291 30" id="ipt_srchrgstno1" class="input_search" taborder="2" mask="######" anchor="default" autoselect="true" autoskip="true" style="align:left middle;" maskchar=" " type="string" trimtype="both"/>
              <Static text="-" position="absolute 294 12 306 29" id="caption93" class="search_n_b" anchor="default"/>
              <MaskEdit position="absolute 307 11 364 30" id="ipt_srchrgstno2" class="input_search" taborder="3" mask="#######" anchor="default" autoselect="true" autoskip="true" onkeyup="group1_ipt_srchrgstno2_onkeyup" style="align:left middle;" maskchar=" " type="string" trimtype="both"/>
              <Shape position="absolute 1040 9 1046 31" linetype="vertical" id="line1" anchor="top right"/>
              <Button position="absolute 1055 9 1123 31" id="button1" class="btn3" text="초기화" anchor="top right" onclick="group1_button1_onclick"/>
              <Edit position="absolute 860 10 970 29" id="mpphon" class="input_search" taborder="4" anchor="default" autoselect="true" autoskip="true"/>
              <Static text="휴대번호 :" position="absolute 775 12 861 29" id="caption3" class="search_name" anchor="default"/>
              <Static text="연락처 :" position="absolute 580 12 666 29" id="caption6" class="search_name" anchor="default"/>
              <Edit position="absolute 650 10 760 29" id="telno" class="input_search" taborder="4" anchor="default" autoselect="true" autoskip="true"/>
            </Layout>
          </Layouts>
        </Div>
        <Static text="종합판정기록" position="absolute 0 74 115 95" id="caption4" class="tit_2"/>
        <Shape position="absolute 0 90 460 96" linetype="horizontal" id="line13" class="line_10" anchor="left top right"/>
        <TextArea position="absolute 0 120 460 750" id="tar_judghngcnts2" wordwrap="word" acceptstab="true" autoselect="true" anchor="all"/>
        <Static text="추가/재검/타과의뢰/연장" position="absolute 470 224 645 245" id="caption28" class="tit_2" anchor="top right"/>
        <Shape position="absolute 470 240 1195 246" linetype="horizontal" id="line25" class="line_10" anchor="top right"/>
        <Grid position="absolute 470 245 1195 750" id="grd_afexamlist" binddataset="ds_main_afterColgJudgInfo_afexamlist_item" autoenter="select" cellsizingtype="col" anchor="top right bottom" onexpanddown="grd_afexamlist_onexpanddown">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="23"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="30"/>
                <Column size="40"/>
                <Column size="70"/>
                <Column size="90"/>
                <Column size="50"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="90"/>
                <Column size="90"/>
                <Column size="80"/>
                <Column size="70"/>
                <Column size="300"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="healexamflag"/>
                <Cell col="2" text="rsrvdd"/>
                <Cell col="3" text="rsrvno"/>
                <Cell col="4" text="seq"/>
                <Cell col="5" text="healexamdetlflag"/>
                <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:healexamflag"/>
                <Cell col="2" text="bind:rsrvdd"/>
                <Cell col="3" text="bind:rsrvno"/>
                <Cell col="4" text="bind:seq"/>
                <Cell col="5" text="bind:healexamdetlflag"/>
                <Cell col="6" displaytype="checkbox" edittype="checkbox" text="bind:afnotiyn" expr="expr:afnotiyn == 'Y' ? 1 : 0"/>
                <Cell col="7" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:aftype" combodataset="ds_cmb_aftype" combocodecol="value" combodatacol="label"/>
                <Cell col="8" displaytype="text" edittype="text" text="bind:testcd" expandshow="show"/>
                <Cell col="9" edittype="none" style="align:left middle;padding:0 0 0 3;" text="bind:testnm"/>
                <Cell col="10" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:monthgb" combodataset="ds_cmb_monthgb" combocodecol="value" combodatacol="label"/>
                <Cell col="11" displaytype="text" edittype="text" text="bind:berslt"/>
                <Cell col="12" displaytype="text" edittype="text" text="bind:afrslt"/>
                <Cell col="13" displaytype="date" edittype="date" text="bind:aforddd" calendardisplaynulltype="nulltext"/>
                <Cell col="14" displaytype="date" edittype="date" text="bind:cnstdd" calendardisplaynulltype="nulltext"/>
                <Cell col="15" displaytype="combo" edittype="combo" text="bind:afdeptcd" combodataset="ds_init_baseinfo_orddeptcdlst_S610" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="16" displaytype="text" edittype="text" text="bind:afdrnm"/>
                <Cell col="17" displaytype="text" edittype="text" text="bind:remcnts"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button position="absolute 1085 221 1138 240" id="btn_add" class="btn2" text="행추가" anchor="top right" onclick="btn_add_onclick"/>
        <Button position="absolute 1140 221 1193 240" id="btn_del" class="btn2" text="행삭제" anchor="top right" onclick="btn_del_onclick"/>
        <Static text="검진일자" position="absolute 0 95 68 118" align="align:center middle;" id="caption13" class="cell_1"/>
        <Static text="판정의사" position="absolute 135 95 203 118" align="align:center middle;" id="caption14" class="cell_1"/>
        <Edit readonly="true" position="absolute 70 97 130 116" align="align:center middle;" id="orddd" visible="true" class="output"/>
        <Edit readonly="true" position="absolute 350 97 410 116" align="align:center middle;" id="rsltcnstdd" visible="true" class="output"/>
        <Static text="상담일자" position="absolute 280 95 348 118" align="align:center middle;" id="caption2" class="cell_1"/>
        <Combo position="absolute 205 97 275 116" id="judgdrid" class="combo" enable="false" innerdataset="@ds_init_baseinfo_drlst_itemdr" datacolumn="drnm" codecolumn="drid"/>
        <Shape position="absolute 470 90 1195 96" linetype="horizontal" id="line2" class="line_10" anchor="top right"/>
        <Static text="질환내역" position="absolute 470 74 645 95" id="caption8" class="tit_2" anchor="top right"/>
        <Grid position="absolute 470 95 1195 215" id="grd_sicklst" binddataset="ds_main_afterColgJudgInfo_itemsick" autoenter="select" autofittype="col" cellsizingtype="col" anchor="top right">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="21"/>
                <Column size="96"/>
                <Column size="586"/>
                <Column size="0"/>
                <Column size="0"/>
              </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="cmpycd"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" text="bind:sickcd"/>
                <Cell col="2" text="bind:sicknm"/>
                <Cell col="3" displaytype="combo" edittype="combo" text="bind:judgcd"/>
                <Cell col="4" text="bind:cmpycd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption19" text="종합판정 추후관리" class="tit_1" position="absolute 0 0 205 25"/>
        <Button id="button2" taborder="1" text="출력" class="btn6" position="absolute 0 753 56 775" anchor="left bottom" onclick="button2_onclick"/>
        <Button id="button6" taborder="2" text="판정저장" class="btn4" position="absolute 379 753 459 775" anchor="right bottom" onclick="button6_onclick"/>
        <Button id="btn_save" taborder="3" text="의뢰저장" class="btn4" position="absolute 1115 755 1195 777" anchor="right bottom" onclick="btn_save_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_srch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="healexamflag" type="STRING" size="256"/>
          <Column id="healexamdetlflag" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="rgstno1" type="STRING" size="256"/>
          <Column id="rgstno2" type="STRING" size="256"/>
          <Column id="telno" type="STRING" size="256"/>
          <Column id="mpphon" type="STRING" size="256"/>
          <Column id="rsrvdd" type="STRING" size="256"/>
          <Column id="rsrvno" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
          <Column id="sex" type="STRING" size="256"/>
          <Column id="age" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="healexamflag"/>
            <Col id="healexamdetlflag"/>
            <Col id="hngnm"/>
            <Col id="pid"/>
            <Col id="rgstno1"/>
            <Col id="rgstno2"/>
            <Col id="telno"/>
            <Col id="mpphon"/>
            <Col id="rsrvdd"/>
            <Col id="rsrvno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_afterColgJudgInfo_judginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="healexamflag" type="STRING" size="256" sumtext="건진구분"/>
          <Column id="healexamdetlflag" type="STRING" size="256" sumtext="건진상세구분"/>
          <Column id="rsrvdd" type="STRING" size="256" sumtext="예약등록일자"/>
          <Column id="rsrvno" type="INT" size="256" sumtext="예약번호"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="cretno" type="INT" size="256" sumtext="생성번호"/>
          <Column id="judgdd" type="STRING" size="256" sumtext="판정일자"/>
          <Column id="judgtm" type="STRING" size="256" sumtext="판정시간"/>
          <Column id="judgdrid" type="STRING" size="256" sumtext="판정의id"/>
          <Column id="pkgcd" type="STRING" size="256" sumtext="Pkg코드"/>
          <Column id="shrthngjudgcnts" type="STRING" size="256" sumtext="판정단문내용(한글)"/>
          <Column id="shrtengjudgcnts" type="STRING" size="256" sumtext="판정단문내용(영문)"/>
          <Column id="hngjudgcnts" type="STRING" size="256" sumtext="판정장문내용(한글)"/>
          <Column id="engjudgcnts" type="STRING" size="256" sumtext="판정장문내용(영문)"/>
          <Column id="prntyn" type="STRING" size="256" sumtext="전체종합판정결과지출력여부"/>
          <Column id="rsltcnstdrid" type="STRING" size="256" sumtext="상담의사"/>
          <Column id="afhngjudgcnts" type="STRING" size="256" sumtext="추후관리 판정장문내용(한글)"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_baseinfo_drlst_itemdr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sel" type="STRING" size="256" sumtext="선택"/>
          <Column id="drid" type="STRING" size="256" sumtext="의사ID"/>
          <Column id="drnm" type="STRING" size="256" sumtext="의사명"/>
          <Column id="drlicnsno" type="STRING" size="256" sumtext="의사면허번호"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cmb_aftype" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">추가</Col>
            <Col id="value">A</Col>
          </Row>
          <Row>
            <Col id="label">재검</Col>
            <Col id="value">B</Col>
          </Row>
          <Row>
            <Col id="label">타과</Col>
            <Col id="value">C</Col>
          </Row>
          <Row>
            <Col id="label">연장</Col>
            <Col id="value">D</Col>
          </Row>
          <Row>
            <Col id="label">유소견</Col>
            <Col id="value">G</Col>
          </Row>
          <Row>
            <Col id="label">전화</Col>
            <Col id="value">E</Col>
          </Row>
          <Row>
            <Col id="label">방문</Col>
            <Col id="value">F</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_monthgb" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">1개월</Col>
            <Col id="value">1</Col>
          </Row>
          <Row>
            <Col id="label">3개월</Col>
            <Col id="value">3</Col>
          </Row>
          <Row>
            <Col id="label">6개월</Col>
            <Col id="value">6</Col>
          </Row>
          <Row>
            <Col id="label">9개월</Col>
            <Col id="value">9</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_baseinfo_orddeptcdlst_S610" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_afterColgJudgInfo_afexamlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="healexamflag" type="STRING" size="256" sumtext="건진구분"/>
          <Column id="rsrvdd" type="STRING" size="256" sumtext="예약등록일자"/>
          <Column id="rsrvno" type="INT" size="256" sumtext="예약번호"/>
          <Column id="seq" type="STRING" size="256" sumtext="seq"/>
          <Column id="healexamdetlflag" type="STRING" size="256" sumtext="건진상세구분"/>
          <Column id="afnotiyn" type="STRING" size="256" sumtext="통보여부"/>
          <Column id="aftype" type="STRING" size="256" sumtext="추후검사구분"/>
          <Column id="testcd" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="testnm" type="STRING" size="256" sumtext="검사명"/>
          <Column id="monthgb" type="STRING" size="256" sumtext="월구분"/>
          <Column id="afdeptcd" type="STRING" size="256" sumtext="의뢰진료과"/>
          <Column id="afdrnm" type="STRING" size="256" sumtext="의뢰의사명"/>
          <Column id="aforddd" type="STRING" size="256" sumtext="의뢰진료일자"/>
          <Column id="berslt" type="STRING" size="256" sumtext="이전결과"/>
          <Column id="afrslt" type="STRING" size="256" sumtext="이후결과"/>
          <Column id="remcnts" type="STRING" size="256" sumtext="비고"/>
          <Column id="cnstdd" type="STRING" size="256" sumtext="상담일자"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_judgdetl_judginfo_afhngjudgcnts" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_afterColgJudgInfo_afexamlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_detlcodelst_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="okflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_rexprnt_viewinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_rexprnt_viewinfo_afexamlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_saveAfjudg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_afterColgJudgInfo_itemsick" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sickcd" type="STRING" size="256" sumtext="질환코드"/>
          <Column id="sicknm" type="STRING" size="256" sumtext="질환명"/>
          <Column id="judgcd" type="STRING" size="256" sumtext="판정코드"/>
          <Column id="cmpycd" type="STRING" size="256" sumtext="업체코드"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.ipt_srchpnm" propid="value" datasetid="ds_send_srch" columnid="hngnm"/>
      <BindItem id="item1" compid="group1.ipt_srchrgstno1" propid="value" datasetid="ds_send_srch" columnid="rgstno1"/>
      <BindItem id="item2" compid="group1.ipt_srchrgstno2" propid="value" datasetid="ds_send_srch" columnid="rgstno2"/>
      <BindItem id="item3" compid="group1.ipt_srchpid" propid="value" datasetid="ds_send_srch" columnid="pid"/>
      <BindItem id="item4" compid="group1.telno" propid="value" datasetid="ds_send_srch" columnid="telno"/>
      <BindItem id="item5" compid="group1.mpphon" propid="value" datasetid="ds_send_srch" columnid="mpphon"/>
      <BindItem id="item6" compid="orddd" propid="value" datasetid="ds_main_afterColgJudgInfo_judginfo" columnid="orddd"/>
      <BindItem id="item7" compid="judgdrid" propid="value" datasetid="ds_main_afterColgJudgInfo_judginfo" columnid="judgdrid"/>
      <BindItem id="item8" compid="tar_judghngcnts2" propid="value" datasetid="ds_main_afterColgJudgInfo_judginfo" columnid="afhngjudgcnts"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "ast_healexamxp::AHA001.xjs";
include "ast_healthexambasexp::healcombolist.xjs";
var arErrorCode = new HashArray();
function SMAHR00600_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMAHR00600_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_sicklst);
	grdf_setRowTypeIcon(grd_sicklst, 0);
	grdf_initGrid(grd_afexamlist);
	grdf_setRowTypeIcon(grd_afexamlist, 0);
	
	fInit();				
	fGetBaseInfo();
	
	vRsrvdd  = opener.frmf_getParameter("SMAHR00600_PARAM1");
	vRsrvno  = opener.frmf_getParameter("SMAHR00600_PARAM2");
	vPid 	 = opener.frmf_getParameter("SMAHR00600_PARAM3");
	vPnm 	 = opener.frmf_getParameter("SMAHR00600_PARAM4");	
	vRgstno1 = opener.frmf_getParameter("SMAHR00600_PARAM5");
	vRgstno2 = opener.frmf_getParameter("SMAHR00600_PARAM6");					

	vTelno   = opener.frmf_getParameter("SMAHR00600_PARAM7");					
	vMpphon  = opener.frmf_getParameter("SMAHR00600_PARAM8");					
	
	if (!utlf_isNull(vRsrvdd))
	{
		ds_send_srch.setColumn(0, "rsrvdd" , vRsrvdd);
		ds_send_srch.setColumn(0, "rsrvno" , vRsrvno);
		ds_send_srch.setColumn(0, "pid" , vPid);
		ds_send_srch.setColumn(0, "healexamflag" , "C");
		ds_send_srch.setColumn(0, "hngnm" , vPnm);
		ds_send_srch.setColumn(0, "rgstno1" , vRgstno1);
		ds_send_srch.setColumn(0, "rgstno2" , vRgstno2);
		
		dsf_makeValue(ds_send_srch, "telno", "string", vTelno);
		dsf_makeValue(ds_send_srch, "mpphon", "string", vMpphon);
		fSearchAfterColgJudgInfo();
	}
}

function fInit()
{
	ds_send_srch.clearData();
	ds_send_srch.addRow();
	
	ds_main_afterColgJudgInfo_judginfo.clearData();
	ds_main_afterColgJudgInfo_judginfo.addRow();
	
	ds_main_afterColgJudgInfo_afexamlist_item.clearData();
	
	dsf_makeValue(ds_send, "srchhealexamflag", "string", "C");
	dsf_makeValue(ds_send, "srchcond", "string", "J");
	
	var oParam = {};
		oParam.id          = "TRAHB01504";
		oParam.service     = "healexambaseapp.ComCode";
		oParam.method      = "reqGetHealExamDrList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_baseinfo_drlst_itemdr=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHB01504";

	tranf_submit(oParam);
}

function fGetBaseInfo() 
{
	var arrParam 	= [{dsNm: "ds_init_baseinfo_orddeptcdlst_S610", cdGrpId: "S610"}];
	healGetCodeList(arrParam);
	ds_init_baseinfo_orddeptcdlst_S610.deleteRow(0);
}

function fSearchAfterColgJudgInfo()
{
	if(!utlf_isNull(ds_send_srch.getColumn(0, "rrgstno1")))
	{
		ds_send_srch.setColumn(0, "rgstno1", ds_send_srch.getColumn(0, "rrgstno1"));
		ds_send_srch.setColumn(0, "rgstno2", ds_send_srch.getColumn(0, "rrgstno2"));
	}
	
	ds_main_judgdetl_judginfo_afhngjudgcnts.clearData();
	ds_main_afterColgJudgInfo_afexamlist.clearData();

	var srchrsrvdd = ds_send_srch.getColumn(0, "rsrvdd");
	var srchrsrvno = ds_send_srch.getColumn(0, "rsrvno");
	
	if(utlf_isNull(srchrsrvdd) && utlf_isNull(srchrsrvno))
	{
		sysf_messageBox("환자정보가", "E016");
		return;
	}
	else
	{
		var oParam = {};
			oParam.id          = "TRAHR00600";
			oParam.service     = "healexamrsltjudgapp.ColgJudgInpt";
			oParam.method      = "reqGetAfterColgJudgInfo";
			oParam.inds        = "req=ds_send_srch";
			oParam.outds       = "ds_main_afterColgJudgInfo_judginfo=judginfo ds_main_afterColgJudgInfo_afexamlist_item=afexamlist ds_main_afterColgJudgInfo_itemsick=itemsick";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAHR00600";

		tranf_submit(oParam);
	}
}

function grd_afexamlist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
{
	if(e.cell == grd_afexamlist.getBindCellIndex("Body", "testcd"))
	{
		ds_main_detlcodelst_item.clearData();
		var flag = ds_main_afterColgJudgInfo_afexamlist_item.getColumn(ds_main_afterColgJudgInfo_afexamlist_item.rowposition, "aftype");
		frmf_setParameter("SPAHA00801_FLAG", flag);
		frmf_modal("SPAHA00801", "SPAHA00801", "", "", "", "", "", "", "", "", "", "", "M");
		
		if(ds_temp.getColumn(0, "okflag") == "ok")
		{
			dsf_makeValue(ds_main_afterColgJudgInfo_afexamlist_item, "aftype", "string", ds_main_detlcodelst_item.getColumn(0, "aftype"), ds_main_afterColgJudgInfo_afexamlist_item.rowposition);
			dsf_makeValue(ds_main_afterColgJudgInfo_afexamlist_item, "testcd", "string", ds_main_detlcodelst_item.getColumn(0, "etcdetlcd"), ds_main_afterColgJudgInfo_afexamlist_item.rowposition);
			dsf_makeValue(ds_main_afterColgJudgInfo_afexamlist_item, "testnm", "string", ds_main_detlcodelst_item.getColumn(0, "etcdetlnm"), ds_main_afterColgJudgInfo_afexamlist_item.rowposition);
			
			if(ds_main_afterColgJudgInfo_afexamlist_item.getRowType(ds_main_afterColgJudgInfo_afexamlist_item.rowposition) != 2)
			{
				ds_main_afterColgJudgInfo_afexamlist_item.updatecontrol = false;
				ds_main_afterColgJudgInfo_afexamlist_item.setRowType(ds_main_afterColgJudgInfo_afexamlist_item.rowposition, "u");
				ds_main_afterColgJudgInfo_afexamlist_item.updatecontrol = true;
			}
		}
	}
}

function btn_add_onclick(obj:Button,  e:ClickEventInfo)
{
	var addRow 				= ds_main_afterColgJudgInfo_afexamlist_item.addRow();
	var healexamflag 		= ds_send_srch.getColumn(0, "healexamflag");
	var healexamdetlflag 	= ds_send_srch.getColumn(0, "healexamdetlflag");
	var rsrvdd 				= ds_send_srch.getColumn(0, "rsrvdd");
	var rsrvno 				= ds_send_srch.getColumn(0, "rsrvno");
	
	dsf_makeValue(ds_main_afterColgJudgInfo_afexamlist_item, "healexamflag", "string", healexamflag, ds_main_afterColgJudgInfo_afexamlist_item.rowposition);
	dsf_makeValue(ds_main_afterColgJudgInfo_afexamlist_item, "healexamdetlflag", "string", healexamdetlflag, ds_main_afterColgJudgInfo_afexamlist_item.rowposition);
	dsf_makeValue(ds_main_afterColgJudgInfo_afexamlist_item, "rsrvdd", "string", rsrvdd, ds_main_afterColgJudgInfo_afexamlist_item.rowposition);
	dsf_makeValue(ds_main_afterColgJudgInfo_afexamlist_item, "rsrvno", "string", rsrvno, ds_main_afterColgJudgInfo_afexamlist_item.rowposition);
}

function btn_del_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_main_afterColgJudgInfo_afexamlist_item.getRowType(ds_main_afterColgJudgInfo_afexamlist_item.rowposition) == 2)
	{
		ds_main_afterColgJudgInfo_afexamlist_item.deleteRow(ds_main_afterColgJudgInfo_afexamlist_item.rowposition);
	}
	else
	{
		ds_main_afterColgJudgInfo_afexamlist_item.updatecontrol = false;
		ds_main_afterColgJudgInfo_afexamlist_item.setRowType(ds_main_afterColgJudgInfo_afexamlist_item.rowposition, "d");
		ds_main_afterColgJudgInfo_afexamlist_item.updatecontrol = true;
	}
}

function group1_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fInit();
}

function group1_ipt_srchpnm_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		fSearchHealPatInfo();
	}
}

function fSearchHealPatInfo()
{
	frmf_clearParameter("SPAHA00402_PARAM1");
	frmf_clearParameter("SPAHA00402_PARAM2");
	frmf_clearParameter("SPAHA00402_PARAM3");
	frmf_clearParameter("SPAHA00402_PARAM4");
	frmf_clearParameter("SPAHA00402_PARAM5");
	frmf_clearParameter("SPAHA00402_PARAM6");

	frmf_setParameter("SPAHA00402_PARAM1"	, "SMAHR00600");
	frmf_setParameter("SPAHA00402_PARAM2"	, "C");
	frmf_setParameter("SPAHA00402_PARAM3"	, group1.ipt_srchpid.value);
	frmf_setParameter("SPAHA00402_PARAM4"	, group1.ipt_srchpnm.value);
	frmf_setParameter("SPAHA00402_PARAM5"	, group1.ipt_srchrgstno1.value);
	frmf_setParameter("SPAHA00402_PARAM6"	, group1.ipt_srchrgstno2.value);
	
	frmf_modal("SPAHA00402", "SPAHA00402", "", "", "", "", "", "", "", "", "", "", "M");
}

function group1_ipt_srchrgstno2_onkeyup(obj:MaskEdit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		fSearchHealPatInfo();
	}
}

function group1_ipt_srchpid_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		fSearchHealPatInfo();
	}
}

function group1_btn_srchpat_onclick(obj:Button,  e:ClickEventInfo)
{
	fSearchHealPatInfo();
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fPrintAfterColgJudgInfo();
}

function fPrintAfterColgJudgInfo()
{
	ds_rexprnt_viewinfo.clearData();
	dsf_makeValue(ds_rexprnt_viewinfo, "pid", "string", ds_main_afterColgJudgInfo_judginfo.getColumn(0, "pid"));
	dsf_makeValue(ds_rexprnt_viewinfo, "sex", "string", ds_send_srch.getColumn(0, "sex"));
	dsf_makeValue(ds_rexprnt_viewinfo, "orddeptcd", "string", "건강증진센터");
	dsf_makeValue(ds_rexprnt_viewinfo, "hngnm", "string", ds_send_srch.getColumn(0, "hngnm"));
	dsf_makeValue(ds_rexprnt_viewinfo, "age", "string", ds_send_srch.getColumn(0, "age"));
	dsf_makeValue(ds_rexprnt_viewinfo, "orddd", "string", ds_main_afterColgJudgInfo_judginfo.getColumn(0, "orddd"));
	dsf_makeValue(ds_rexprnt_viewinfo, "afhngjudgcnts", "string", ds_main_afterColgJudgInfo_judginfo.getColumn(0, "afhngjudgcnts"));
	
	ds_rexprnt_viewinfo_afexamlist_item.clearData();
	ds_rexprnt_viewinfo_afexamlist_item.copyData(ds_main_afterColgJudgInfo_afexamlist_item);
	if (ds_rexprnt_viewinfo_afexamlist_item.rowcount < 1) {
		ds_rexprnt_viewinfo_afexamlist_item.addRow();
    }
    
	var objDOM = rptf_createDOM();
	rptf_setNodeListToDOM(objDOM, "/root/rexprnt/viewinfo", ds_rexprnt_viewinfo);
	rptf_setNodeListToDOM(objDOM, "/root/rexprnt/viewinfo/afexamlist/item", ds_rexprnt_viewinfo_afexamlist_item);
		
		
		
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source; 
	var option = "directprint=1"; 
	rptf_exeReportPreview30(["RPAHR00600"],[objParam], option);
	
}

function button6_onclick(obj:Button,  e:ClickEventInfo)
{
	if(fSaveAfJudg())
	{
		fSearchAfterColgJudgInfo();
	}
}

function fSaveAfJudg()
{
	var srchrsrvdd = ds_send_srch.getColumn(0, "rsrvdd");
	var srchrsrvno = ds_send_srch.getColumn(0, "rsrvno");
	
	if(utlf_isNull(srchrsrvdd) && utlf_isNull(srchrsrvno))
	{
		sysf_messageBox("환자정보가", "E016");
		return false;
	}
	else
	{
		dsf_makeValue(ds_send_saveAfjudg, "healexamflag", "string", ds_send_srch.getColumn(0, "healexamflag"));
		dsf_makeValue(ds_send_saveAfjudg, "healexamdetlflag", "string", ds_send_srch.getColumn(0, "healexamdetlflag"));
		dsf_makeValue(ds_send_saveAfjudg, "rsrvdd", "string", ds_send_srch.getColumn(0, "rsrvdd"));
		dsf_makeValue(ds_send_saveAfjudg, "rsrvno", "string", ds_send_srch.getColumn(0, "rsrvno"));
		dsf_makeValue(ds_send_saveAfjudg, "afhngjudgcnts", "string", ds_main_afterColgJudgInfo_judginfo.getColumn(0, "afhngjudgcnts"));
		
		var oParam = {};
			oParam.id          = "TXAHR00602";
			oParam.service     = "healexamrsltjudgapp.ColgJudgInpt";
			oParam.method      = "reqExeAfterColgJudgInfo";
			oParam.inds        = "req=ds_send_saveAfjudg";
			oParam.outds       = "ds_=item";
			oParam.async       = false;
			oParam.callback    = "cf_TXAHR00602";

		tranf_submit(oParam);
		
		if(arErrorCode.pop("TXAHR00602") > -1)
		{
			sysf_messageBox("저장이", "I002");
			return true;
		}
		else
		{
			return false;
		}
	}
}

function cf_TXAHR00602(sSvcId, nErrorCode, sErrorMsg)
{
	arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	if(fSaveAfexam())
	{
		fSearchAfterColgJudgInfo();
	}
}

function fSaveAfexam()
{
	var updData = grdf_getGridUpdateData(grd_afexamlist).rowcount;
	
	if(updData == 0)
	{
		sysf_messageBox("저장할 데이터가 존재하지 않습니다.", "E999");
		return false;
	}
	
	var oParam = {};
		oParam.id          = "TXAHR00603";
		oParam.service     = "healexamrsltjudgapp.ColgJudgInpt";
		oParam.method      = "reqExeAfterExamInfo";
		oParam.inds        = "req=ds_main_afterColgJudgInfo_afexamlist_item:u";
		oParam.outds       = "ds_=item";
		oParam.typeStr     = "m";
		oParam.async       = false;
		oParam.callback    = "cf_TXAHR00603";

	tranf_submit(oParam);

	if(arErrorCode.pop("TXAHR00603") > -1)
	{
		sysf_messageBox("저장이", "I002");
		return true;
	}
	else
	{
		return false;
	}
}

function cf_TXAHR00603(sSvcId, nErrorCode, sErrorMsg) 
{
	arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
}

function group1_btn_searchhist_onclick(obj:Button,  e:ClickEventInfo)
{
	fSearchAfterColgJudgInfo();
}
]]></Script>
  </Form>
</FDL>