YNU_JEUS/app_home/himed/xpapps/ast/pharmacydrugsumxp/xp/SMADT10311_집계라벨출력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMADT10311" position="absolute 0 0 0 0" titletext="집계라벨출력" onload="SMADT10311_onload" onkeyup="SMADT10311_onkeyup" oninit="SMADT10311_oninit">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 0 0" id="grp_report1" visible="false"/>
        <Div position="absolute 0 0 0 0" id="grp_report2" visible="false"/>
        <Div position="absolute 0 0 0 0" id="group1" visible="false"/>
        <Div position="absolute 0 0 0 0" id="group2" visible="false"/>
        <Div position="absolute 0 0 0 0" id="grp_report3" visible="false"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_prcpdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_prnt_lbllist_lbllist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_prcpinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_srchdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptflag" type="STRING" size="256"/>
          <Column id="drugflag" type="STRING" size="256"/>
          <Column id="prcpflag" type="STRING" size="256"/>
          <Column id="srchfromdd" type="STRING" size="256"/>
          <Column id="srchfromtm" type="STRING" size="256"/>
          <Column id="srchtodd" type="STRING" size="256"/>
          <Column id="srchtotm" type="STRING" size="256"/>
          <Column id="srchprcpcd" type="STRING" size="256"/>
          <Column id="udsflag" type="STRING" size="256"/>
          <Column id="prcpkindcd" type="STRING" size="256"/>
          <Column id="sumdt" type="STRING" size="256"/>
          <Column id="srchorddeptcd" type="STRING" size="256"/>
          <Column id="srchorddeptflag" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="srchdeptnm" type="STRING" size="256"/>
          <Column id="stocdeptcd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="drugcd" type="STRING" size="256"/>
          <Column id="sumflag" type="STRING" size="256"/>
          <Column id="orderby" type="STRING" size="256"/>
          <Column id="expnflag" type="STRING" size="256"/>
          <Column id="prcpno" type="STRING" size="256"/>
          <Column id="ptpall" type="STRING" size="256"/>
          <Column id="drugno" type="STRING" size="256"/>
          <Column id="drugdd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="deptflag"/>
            <Col id="drugflag">1 2</Col>
            <Col id="prcpflag">1 2 3</Col>
            <Col id="srchfromdd"/>
            <Col id="srchfromtm">0000</Col>
            <Col id="srchtodd"/>
            <Col id="srchtotm">2400</Col>
            <Col id="srchprcpcd"/>
            <Col id="udsflag">N</Col>
            <Col id="prcpkindcd">A</Col>
            <Col id="sumdt"/>
            <Col id="srchorddeptcd"/>
            <Col id="srchorddeptflag"/>
            <Col id="userid"/>
            <Col id="instcd"/>
            <Col id="srchdeptnm"/>
            <Col id="stocdeptcd">3242107000</Col>
            <Col id="pid"/>
            <Col id="drugcd"/>
            <Col id="sumflag"/>
            <Col id="orderby"/>
            <Col id="expnflag"/>
            <Col id="prcpno"/>
            <Col id="ptpall"/>
            <Col id="drugno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_deptdata_deptinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sumorddeptcd" type="STRING" size="256"/>
          <Column id="sumorddeptflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_srchdetlinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchpid" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="orddeptflag" type="STRING" size="256"/>
          <Column id="prcpno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchpid"/>
            <Col id="prcpdd"/>
            <Col id="orddeptflag"/>
            <Col id="prcpno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_srchbcinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchdrugdd" type="STRING" size="256"/>
          <Column id="srchdrugno" type="STRING" size="256"/>
          <Column id="srchioflag" type="STRING" size="256"/>
          <Column id="srchbcno1" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchdrugdd"/>
            <Col id="srchdrugno"/>
            <Col id="srchioflag"/>
            <Col id="srchbcno1"/>
          </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="scrnid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_srchdept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_srchpid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sumdt" type="STRING" size="256"/>
          <Column id="srchorddeptcd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="drugno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="sumdt"/>
            <Col id="srchorddeptcd"/>
            <Col id="pid"/>
            <Col id="drugno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_lbllist_lbllist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_barcdprntsetup" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <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                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs";
include "ast_commonxp::AST.xjs";
include "com_commodulexp::SSZFM00901.xjs";

//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var oOpener = "";

//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: desNode (dataset)			
 *					: srcNodeList (dataset) 
 * Description		: 목적 데이터셋으로 내용카피(append) - 필요없을듯.
 ****************************************************************************************/
function fAppendSaveNode( desNode, srcNodeList ) {
	var saveDrPrcpList = model.instances(0).selectNodes( srcNodeList );    //의사처방 저장데이터
	
	for(var i = 0; i < saveDrPrcpList.length; i++) {
		var destNode =  model.instances(0).selectSingleNode( desNode );
		destNode.appendChild(saveDrPrcpList.item(i).cloneNode(true));
	}
}

/**********************************************************************************
* Argument		: 	rexnm (string) 		: 레포트코드
*           	  	closeYn (string) 	: 미리보기 여부(보기:true, 안보기:비우거나 false)  
*           		printCount (int) 	: 출력 숫자                                     
*           		dataXPath (string) 	: 파라메터 위치                                  
*           		paramsXPath (object): 파라메터 위치                                
*           		infoXPath (string) 	: 바코드 프린터 정보 위치        
* Description	: 라벨출력
**********************************************************************************/
function fPrintRexbar_new(rexnm, closeYn, printCount, dataXPath, paramsXPath, infoXPath){
	var posx 	= "";
	var posy 	= "";
	var printnm = "";

	if(infoXPath == "" || infoXPath == "undefined" || infoXPath == null) 
		infoXPath = "ds_data";
		//infoXPath = "/root/main/barcdprntsetup/prntsetupinfo";

//	if(objects[infoXPath + "_setupinfo"].getColumn(0,"rexgbn") != "1") return false;
	if(objects[infoXPath+"_setupinfo"].getColumn(objects[infoXPath+"_setupinfo"].rowcount-1,"rexgbn") != "1") {
		if(closeYn) {this.close();}
		else return false;
	}

	try{
        if(!utlf_isNull(objects[infoXPath+"_pcllist"])  										// ds 존재 체크
//		  && oOpener.objects[infoXPath+"_pcllist"].getColumn(0,"dsvaluepath") == "/setupinfo/pcl" 	// path 체크
		  && objects[infoXPath+"_pcllist"].findRowExpr("barnm=='"+rexnm+"'") > -1) {			// barnm 값 체크
			var rowNo = objects[infoXPath+"_pcllist"].findRowExpr("barnm=='"+rexnm+"'");
            posx 	= objects[infoXPath+"_pcllist"].getColumn(rowNo,"xpos");
            posy 	= objects[infoXPath+"_pcllist"].getColumn(rowNo,"ypos");
            printnm = objects[infoXPath+"_pcllist"].getColumn(rowNo,"prtnm");
		}else{
            posx 	= objects[infoXPath+"_blank"].getColumn(0,"left");
            posy 	= objects[infoXPath+"_blank"].getColumn(0,"top");
            printnm = objects[infoXPath+"_comm01"].getColumn(0,"setupval");
		}
		
		if(posx == "") posx = "0";
		if(posy == "") posy = "0";
		
		if(closeYn == "true") printnm = "";
//sysf_trace(printnm);		
		var objDOM 		= rptf_createDOM();	// DOM 객체 설정
		var objParam 	= new Object();
		rptf_setNodeListToDOM(objDOM, "/root/main/lbllist/lbllist", ds_main_lbllist_lbllist);
		objParam.xml_data_XML1 	= objDOM.documentElement.source;
		var option 		= "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=0;callback=lf_complete;";
 		var prntOtion 	= "offsetx=" + posx + ";" + "offsety=" + posy + ";" + "printername="+printnm+"";
 		rptf_exeReportPreview30([rexnm],[objParam], option, prntOtion);
	}catch(e){
		alert("출력시 오류가 발생하였습니다\n" + e);
		this.close();
	}

	return true;       
}

function lf_complete() {
	this.close();
}
					
//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Components ID	: SMADT10311
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SMADT10311_onload(obj:Form, e:LoadEventInfo)
{
	try{
		ds_main_barcdprntsetup.copyData(arg_ds_main_barcdprntsetup);
		
		var prntsetupinfo 	= ds_main_barcdprntsetup.getColumn(0,"prntsetupinfo");	//프린터설정 XML형식	
		lf_convertXmlToDs(prntsetupinfo);
	}catch(e){}
	
	try{
		ds_send_srchdata.copyData(arg_ds_send_srchdata);
	}catch(e){}

	finit();	// 초기화
}

function finit() {
	ds_main_prnt_lbllist_lbllist.clearData();
	
// 	if(oOpener == opener) {
// 	} else {
//		ds_send_srchdata.copyData(ds_send_srchdata);
//	}

	var oParam = {};
		oParam.id          = "TRADT10350";
		oParam.service     = "pharmacydrugsumapp.BeforeCure";
		oParam.method      = "reqGetDrugSumLBT";
		oParam.inds        = "req=ds_send_srchdata";
		oParam.outds       = "ds_main_prnt_lbllist_lbllist=lbllist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADT10350";

	tranf_submit(oParam);

	var iPoint 		= 0;			//라벨출력row 
	var cnt 		= 0;
	var iPageCntO 	= 1; 
	var sndprcpcnt 	= 1;
	var prePage 	= 0;	
	var val  		= "";
	var datcnt 		= ds_main_prnt_lbllist_lbllist.rowcount;
	var drugno      = ds_main_prnt_lbllist_lbllist.getColumn(0,"drugno");	
//sysf_trace(ds_main_prnt_lbllist_lbllist.saveXML());
	for(var j = 0 ; j <  datcnt ; j++){
		var drugno      = ds_main_prnt_lbllist_lbllist.getColumn(j,"drugno");													
		var patnm       = ds_main_prnt_lbllist_lbllist.getColumn(j,"patnm");																										
		var totdrugqty 	= ds_main_prnt_lbllist_lbllist.getColumn(j,"totdrugqty");
		var mthdcnts4 	= ds_main_prnt_lbllist_lbllist.getColumn(j,"mthdcnts4");
		var lblcnts1    = ds_main_prnt_lbllist_lbllist.getColumn(j,"lblcnts1");											
		var prcpcd      = ds_main_prnt_lbllist_lbllist.getColumn(j,"prcpcd");																						
		var prcpnm      = ds_main_prnt_lbllist_lbllist.getColumn(j,"prcpnm");
		
		mthdcnts4 = utlf_isNull(mthdcnts4) ? " " : mthdcnts4;
		lblcnts1 = utlf_isNull(lblcnts1) ? " " : lblcnts1;
		
		ds_main_prnt_lbllist_lbllist.setColumn(j,"prcpcd"	, totdrugqty + '   ' +  prcpcd + '  '+ prcpnm);
		ds_main_prnt_lbllist_lbllist.setColumn(j,"lblcnts1"	, lblcnts1 + '  ' + mthdcnts4);
		ds_main_prnt_lbllist_lbllist.setColumn(j, "unit", "");
		var atcifsnglyn = ds_main_prnt_lbllist_lbllist.getColumn(j,"atcifsnglyn");

		if(lblcnts1 == "-"){
			lblcnts1 = "";
		}
		
		if(j == 0){
			ds_main_lbllist_lbllist.clear();
			dsf_copyColInfo(ds_main_lbllist_lbllist,ds_main_prnt_lbllist_lbllist);
			ds_main_lbllist_lbllist.copyRow(ds_main_lbllist_lbllist.addRow(),ds_main_prnt_lbllist_lbllist,j);
			
			iPoint 		= 0;
			sndprcpcnt 	= 1;   
		}

		if(atcifsnglyn == "Y" || lblcnts1 == "차광보관") {
			if ( iPoint == 0 && j == 0 ) {
			} else {
				iPoint++;		
//				fAppendSaveNode("/root/main/lbllist", "/root/main/prnt/lbllist/lbllist["+j+"]" );
				ds_main_lbllist_lbllist.copyRow(ds_main_lbllist_lbllist.addRow(),ds_main_prnt_lbllist_lbllist,j);
			}
			 
			sndprcpcnt  =  7;												  
//			val	= "";  
			val	= totdrugqty + "   " +  prcpnm + "   " + mthdcnts4 + "   " +  lblcnts1;
			dsf_makeValue(ds_main_lbllist_lbllist,"sndprcp"+sndprcpcnt	,"string",val,iPoint);
			dsf_makeValue(ds_main_lbllist_lbllist,"injsamedrugflag"		,"string","N",iPoint);
			dsf_makeValue(ds_main_lbllist_lbllist,"lblcnts2flag"		,"string","N",iPoint);
		} else {
			if (sndprcpcnt > 6) {
				iPoint++;
				sndprcpcnt = 1;
//				fAppendSaveNode("/root/main/lbllist", "/root/main/prnt/lbllist/lbllist["+j+"]" );
				ds_main_lbllist_lbllist.copyRow(ds_main_lbllist_lbllist.addRow(),ds_main_prnt_lbllist_lbllist,j);
				
//				val	= "";  
				val	= totdrugqty + "   " +  prcpnm + "   " + mthdcnts4 + "   " +  lblcnts1;
				dsf_makeValue(ds_main_lbllist_lbllist,"sndprcp"+sndprcpcnt	,"string",val,iPoint);
				dsf_makeValue(ds_main_lbllist_lbllist,"injsamedrugflag"		,"string","Y",iPoint);
				sndprcpcnt++;
			} else {													
//				val = "";  
				val = totdrugqty + "   " +  prcpnm + "   " + mthdcnts4+ "   " +  lblcnts1;	
				dsf_makeValue(ds_main_lbllist_lbllist,"sndprcp"+sndprcpcnt	,"string",val,iPoint);
				dsf_makeValue(ds_main_lbllist_lbllist,"injsamedrugflag"		,"string","Y",iPoint);
				sndprcpcnt++;
			}
		}
	}
	
	
	var instcd = sysf_getUserInfo("dutplceinstcd");
	if(datcnt > 0 ) {  	
//		makeReportPreview(0,0,10, 10, "");
//		fPrintRexbar_new("RFADT62303",true);
		if(instcd== "031") {
			rptf_printRexbar("RFADT62303", "", "/root/main/lbllist/lbllist", ds_main_lbllist_lbllist, "", "lf_complete");
		} else {			
			rptf_printRexbar("RFADT62304", "", "/root/main/lbllist/lbllist", ds_main_lbllist_lbllist, "", "lf_complete");
		}
	} else {
		this.close();
	}
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SMADT10311
 * Event			: onkeyup
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 로딩중 중지
 ****************************************************************************************/
function SMADT10311_onkeyup(obj:Form, e:KeyEventInfo)
{
	if(e.keycode == 27) //  'ESC' or 'Q' 키가 눌려진 경우
	{        	
		this.close();
	}   	
}

function SMADT10311_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  		// 폼 초기화 
}
]]></Script>
  </Form>
</FDL>