YNU_JEUS/app_home/himed/xpapps/pam/bfjudgcarexp/xp/SPPPI00100_사전심사요구.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml" />
  <Form id="SPPPI00100" position="absolute 0 0 1000 500" titletext="보험제한처방" onload="SPPPI00100_onload">
    <Layouts>
      <Layout>
        <Static id="caption1" class="tit_2" position="absolute 5 0 333 14" style="" text="사전심사" />
        <Shape id="line7" class="line_1" linetype="horizontal" position="absolute 3 15 970 18" style="" anchor="default" />
        <Grid id="grd_bfjudglist" binddataset="ds_result_bfjudgprcplist" position="absolute 3 20 970 465" style="" ontextchanged="grd_bfjudglist_ontextchanged">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="100" />
                <Column size="100" />
                <Column size="150" />
                <Column size="300" />
                <Column size="300" />
              </Columns>
              <Rows>
                <Row size="23" band="head" />
                <Row size="23" />
              </Rows>
              <Band id="head">
                <Cell text="처방코드" />
                <Cell col="1" text="제어코드" />
                <Cell col="2" text="제어명" />
                <Cell col="3" text="제어메세지" />
                <Cell col="4" text="규제사유" />
              </Band>
              <Band id="body">
                <Cell text="bind:prcpcd" />
                <Cell col="1" text="bind:rulecd" />
                <Cell col="2" text="bind:rulenm" />
                <Cell col="3" text="bind:rulemsg" />
                <Cell col="4" text="bind:limresn" />
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption7" class="hand" position="absolute 1 471 260 491" style="" text="인정기준 문의 : 보험팀 T." />
        <Button id="button1" class="btn4_letter4" visible="false" position="absolute 615 471 695 493" style="" text="심사요구" onclick="button1_onclick" />
        <Button id="button2" class="btn4_letter5" visible="false" position="absolute 706 471 798 493" style="" text="본인100%" onclick="button2_onclick" />
        <Button id="button3" class="btn4_letter4" visible="false" position="absolute 809 471 889 493" style="" text="처방변경" onclick="button3_onclick" />
        <Button id="btn_init" class="btn4_letter3" position="absolute 900 471 968 493" style="" text="닫 기" onclick="btn_init_onclick" />
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_savedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="savedata" 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="keep">
        <ColumnInfo>
          <Column id="limprcp" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="limprcp"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="temp" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="temp"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_result" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="payflagcd" type="STRING" size="256" />
          <Column id="msgchk" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="payflagcd"></Col>
            <Col id="msgchk">Y</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_result_bfjudgprcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="status" type="STRING" size="256" />
          <Column id="delflag" type="STRING" size="256" />
          <Column id="rowid" type="STRING" size="256" />
          <Column id="calcscorcd" type="STRING" size="256" />
          <Column id="prcpnm" type="STRING" size="256" />
          <Column id="qestmsg" type="STRING" size="256" />
          <Column id="choiflag" type="STRING" size="256" />
          <Column id="qestflag" type="STRING" size="256" />
          <Column id="essnyn" type="STRING" size="256" />
          <Column id="payflag" type="STRING" size="256" />
          <Column id="rsltinpt" type="STRING" size="256" />
          <Column id="qestanswcnts" type="STRING" size="256" />
          <Column id="genrdd" type="STRING" size="256" />
          <Column id="genrno" type="STRING" size="256" />
          <Column id="instcd" type="STRING" size="256" />
          <Column id="seq" type="STRING" size="256" />
          <Column id="seqno" type="STRING" size="256" />
          <Column id="fstrgstrid" type="STRING" size="256" />
          <Column id="fstrgstdt" type="STRING" size="256" />
          <Column id="lastupdtrid" type="STRING" size="256" />
          <Column id="lastupdtdt" type="STRING" size="256" />
          <Column id="prcpdd" type="STRING" size="256" />
          <Column id="prcpno" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="status"></Col>
            <Col id="delflag"></Col>
            <Col id="rowid"></Col>
            <Col id="calcscorcd"></Col>
            <Col id="prcpnm"></Col>
            <Col id="qestmsg"></Col>
            <Col id="choiflag"></Col>
            <Col id="qestflag"></Col>
            <Col id="essnyn"></Col>
            <Col id="payflag"></Col>
            <Col id="rsltinpt"></Col>
            <Col id="qestanswcnts"></Col>
            <Col id="genrdd"></Col>
            <Col id="genrno"></Col>
            <Col id="instcd"></Col>
            <Col id="seq"></Col>
            <Col id="seqno"></Col>
            <Col id="fstrgstrid"></Col>
            <Col id="fstrgstdt"></Col>
            <Col id="lastupdtrid"></Col>
            <Col id="lastupdtdt"></Col>
            <Col id="prcpdd"></Col>
            <Col id="prcpno"></Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind />
    <Script type="xscript4.0"><![CDATA[function SPPPI00100_onload(obj:Form, e:LoadEventInfo) {

 				    var arrParam = [ {dsNm: "ds_init_payflagcd", 
                  cdGrpId: "M0029"  } ];
appf_getCodeList(arrParam, );	     				    									                                 
			          /*  grd_prcplist.mergeCells = "bycol";
                                  grd_prcplist.mergeCol(0) = true;
                                  grd_prcplist.mergeCol(1) = true;
                                  grd_prcplist.mergeCol(2) = false;
                                  grd_prcplist.mergeCol(3) = false;
                                  grd_prcplist.mergeCol(4) = false;                                                                                                      
                                  grd_prcplist.mergeCol(5) = false;                                                                                                                                        
                                  grd_prcplist.merge();		*/

                                  //by sonjy start 2008-09-09 cp요구사항 cp의 경우 보험제한팝업시 미래처방도 뜰수 있으므로 처방일자를 보여주도록 한다. 조범준과장님 요청사항.
                                  if(frmf_checkOpener() ){ 
	                                    if( opener.ds.getColumn(0, "cp") == "Y" ){
	                                 		grd_prcplist.colhidden(grd_prcplist.colref("prcpdd") ) = false ;
	                                    }
                                  }
                                  //by sonjy end

				    grd_prcplist.autoResize = true ;                                  

//model.refresh();

}

function SPPPI00100_onload(obj:Form, e:LoadEventInfo) {
 frmf_initForm(obj); 
 //grdf_initGrid(grd_XXX); 
 //grdf_setGridSort(grd_XXX); 
 //grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

				caption7.value = caption7.value + opener.ds_initsrch_callnoinfo.lookupExpr("trgtcd == '" + insurance + "'", "trgtcdnm");
				//1. qestflag 이 M일때  choiflag ready only
				//2. qestflag 이 M일때  qestmsg ready only

}

include '../../.._com_commonweb_js_common.js'
include '../../.._emr_prcpmngtweb_js_MMO001.js'
include '../../.._com_basiccodeweb_js_ZBC001.js'
include '../../.._com_commonweb_js_stringHelper.js'
include '../../.._com_commonweb_js_tfHelper.js'
include '../../.._com_commonweb_js_dateHelper.js'

			// 화면 open, 저장시 초기화 기능을 수행한다.
			function fClose() {						    
				window.close();                                            
			}

function grd_bfjudglist_ontextchanged(obj:Grid, e:GridEditTextChangedEventInfo) {

/*				
				if ( grd_prcplist.col == grd_prcplist.colRef ( "choiflag" ) || grd_prcplist.col == grd_prcplist.colRef ( "delflag" ) ) {
					var srcNodeList = model.instances(0).selectNodes( "ds_result_limprcplist" );
					var currow = grd_prcplist.row;
					if ( grd_prcplist.col == grd_prcplist.colRef ( "delflag" )) {
						// 삭제 체크 선택 시 여러 row일 경우 mregecell이 안되므로 하드 코딩 20080828 msh
						var choiflag =  model.getValue ( "ds_result_limprcplist[" + currow + "]_choiflag" );		
						for ( var i= currow; i<=srcNodeList.length; i++) {	
							var j = i + 1; 
							var currowcd = model.getValue ( "ds_result_limprcplist[" + i + "]_calcscorcd" );	
							var nextrowcd = model.getValue ( "ds_result_limprcplist[" + j + "]_calcscorcd" );	
							if (currowcd == nextrowcd) {
								ds_result.setColumn( j , "delflag", model.getValue( "ds_result_limprcplist[" + i + "]_delflag" )) ; 								
							}
						}	

//model.refresh();

					} else if ( grd_prcplist.col == grd_prcplist.colRef ( "choiflag" )) {
						//var mergeprcpcd = model.getValue ( "ds_result_limprcplist[" + currow + "]_calcscorcd" );
						var mergeseqno =  model.getValue ( "ds_result_limprcplist[" + currow + "]_seqno" );
						var mergerowid = model.getValue ( "ds_result_limprcplist[" + currow + "]_rowid" );
						var prcpcd = "";
						var rowid = "";					

						for ( var i= 1; i<=srcNodeList.length ; i++) {	
							// prcpcd = model.getValue ( "ds_result_limprcplist[" + i + "]_calcscorcd" ); // 같은 코드일 때 같게 변경되는 것은 막는다.
							rowid = model.getValue ( "ds_result_limprcplist[" + i + "]_rowid" );
							 seqno = model.getValue ( "ds_result_limprcplist[" + i + "]_seqno" );							 
							 //if ( mergeprcpcd == prcpcd ) {
							 if ( mergerowid == rowid ) {
							 	if ( mergeseqno == seqno ) { //처방코드가 같은 머지된 부분에서
									ds_result.setColumn( i , "choiflag", "Y" );						 	
							 	} else {
									ds_result.setColumn( i , "choiflag", "N" );						 								 		
							 	}
							 } 
						}
					}

//model.refresh();

					model.recalculate();
				}
				*/

}

function button1_onclick(obj:Button, e:ClickEventInfo) {

}

function button2_onclick(obj:Button, e:ClickEventInfo) {

}

function button3_onclick(obj:Button, e:ClickEventInfo) {

}

function btn_init_onclick(obj:Button, e:ClickEventInfo) {

}

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