YNU_JEUS/app_home/himed/xpapps/mis/reqxp/xp/SMRSD07200.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[function fInit()
{
	fInitialize();

	return;
} 

function fInitialize()
{                  
	grp_key.opt_instcd.value = sysf_getUserInfo("dutplceinstcd");
	grp_key.opt_instcdnm.value = sysf_getUserInfo("dutplceinstnm");
	var curdate = utlf_getCurrentDate();
	var cvtdate = curdate.toDate("YYYYMMDD");

	grp_key.ipt_prcpdd.value = curdate;
	grp_key.ipt_prcpdd2.value = curdate;
	
	grp_key.rdo_sumflag.value = "Y";
	
	ds_main_list_prcpgoodcase_prcpgoodcaselist.clearData();
	ds_main_list_prcpgoodcase_prcppatcaselist.clearData();
}
 
function fDataSearchTree()
{
	var oParam = {};
		oParam.id          = "TRRSD07103";
		oParam.service     = "reqapp.ReqMngt";
		oParam.method      = "reqGetSearchGoodTree2";
		oParam.inds        = "req=ds_send_SearchTree";
		oParam.outds       = "ds_main_PrcpGoodTrees_TreeList=TreeList";
		oParam.async       = false;
		//oParam.callback    = "cf_TRRSD07103";

	tranf_submit(oParam);
}

function fDataSearchDetail(pIdx)
{
	var rPath = ds_send_SearchTree;
	var dPath = ds_send_prcppatcaseinfo;
	var tPath = ds_main_PrcpGoodTrees_TreeList;

	var vCaption = " 처방전달물품";

	var Idx       = pIdx + 1;
	var sDepth    = tPath.getColumn(Idx, "depth");
	var vCodeCd   = tPath.getColumn(Idx, "codecd");
	var vCodeNm   = tPath.getColumn(Idx, "codenm");
	var vBaseCd   = tPath.getColumn(Idx, "basecode");
	var Tree2 	  = pIdx;
												
	if (utlf_isNull(vCodeCd))
	{
		return;
	}

	dPath.setColumn(0, "instcd", rPath.getColumn(0, "instcd"));
	dPath.setColumn(0, "prcpdd", rPath.getColumn(0, "prcpdd"));
	dPath.setColumn(0, "prcpdd2", rPath.getColumn(0, "prcpdd2"));
	dPath.setColumn(0, "sumflag", rPath.getColumn(0, "sumflag"));
	dPath.setColumn(0, "reqflag", rPath.getColumn(0, "reqflag"));
	dPath.setColumn(0, "reqdeptcd", "");
	dPath.setColumn(0, "reqprid", rPath.getColumn(0, "reqprid"));
    dPath.setColumn(0, "prcpdeptcd", "");
    dPath.setColumn(0, "goodcd", rPath.getColumn(0, "goodcd"));
    dPath.setColumn(0, "deptgr", "");
    dPath.setColumn(0, "pid", rPath.getColumn(0, "pid"));
    dPath.setColumn(0, "patnm", rPath.getColumn(0, "patnm"));
    dPath.setColumn(0, "purcflag", rPath.getColumn(0, "purcflag"));
    dPath.setColumn(0, "prodcmpynm", rPath.getColumn(0, "prodcmpynm"));
    dPath.setColumn(0, "suplplcecdnm", rPath.getColumn(0, "suplplcecdnm"));
    dPath.setColumn(0, "suppcustnm", rPath.getColumn(0, "suppcustnm"));
    dPath.setColumn(0, "prntmthd", "G");
	dPath.setColumn(0, "sumcnt", rPath.getColumn(0, "sumcnt"));
	dPath.setColumn(0, "querycls", ds_send_SearchTree.getColumn(0, "querycls"));
	dPath.setColumn(0, "wareflag", rPath.getColumn(0, "wareflag"));
	dPath.setColumn(0, "scrnid", "SMRSD07200");
	
	var vCls =  parseInt(rdo_viewcls.value+sDepth);         

	switch(vCls) 
	{ 
		case 01 :
				vCaption = "  ::  전체" ;
				break;
		case 02 : 
				dPath.setColumn(0, "prcpdeptcd" , vCodeCd );
				vCaption = "시행부서 : "+vCodeCd + " - " + vCodeNm;
				break;
		case 11 :
				dPath.setColumn(0, "reqdeptcd"   , vCodeCd);
				vCaption = "처방부서 : "+ vCodeCd + " - " + vCodeNm;
				 break;
		case 12 : 
				dPath.setColumn(0, "prcpdeptcd" , vCodeCd );
				 
				vCode  = tPath.getColumn(Tree2, "codecd");
				vName  = tPath.getColumn(Tree2, "codenm");
				
				dPath.setColumn(0, "reqdeptcd" , vCode );

				vCaption = "처방부서 : "+vCode + " - " + vName + " >> 시행부서 : "+vCodeCd+ " - "+vCodeNm;
				break;
		case 21 :
				dPath.setColumn(0, "prcpdeptcd" , vCodeCd );
				vCaption = "시행부서 : "+vCodeCd + " - " + vCodeNm;
				 break;
		case 22 : 
				dPath.setColumn(0, "reqdeptcd"   , vCodeCd);

				 vCode  = tPath.getColumn(Tree2, "codecd");
				 vName  = tPath.getColumn(Tree2, "codenm");
				 dPath.setColumn(0, "prcpdeptcd" , vCode );

				 vCaption = "시행부서 : "+vCode + " - " + vName + "  >> 처방부서 : "+vCodeCd+ " - "+vCodeNm ;
				 break;
		case 31 : 
				dPath.setColumn(0, "prcpdeptcd" , vCodeCd );
				vCaption = "시행부서 : "+vCodeCd + " - " + vCodeNm;
				break;
		case 32 : 
				dPath.setColumn(0, "goodcd"   , vCodeCd);
				vCode  = tPath.setColumn(Tree2, "codecd");
				vName  = tPath.setColumn(Tree2, "codenm");
				dPath.setColumn(0, "prcpdeptcd" , vCode );
				vCaption = "시행부서 : "+vCode + " - " + vName + "  >> 물품코드 : "+vCodeCd+ " - "+vCodeNm ;
	}
	
	if (dPath.getColumn(0, "prntmthd") == "P")
	{
		var oParam = {};
			oParam.id          = "TRRSD07101";
			oParam.service     = "reqapp.ReqMngt";
			oParam.method      = "reqGetPrcpPatCaseList";
			oParam.inds        = "req=ds_send_prcppatcaseinfo";
			oParam.outds       = "ds_main_list_prcpgoodcase_prcppatcaselist=prcppatcaselist";
			oParam.async       = false;
			oParam.callback    = "cf_TRRSD07101";

		tranf_submit(oParam);
	}
	else
	{
		var oParam = {};
			oParam.id          = "TRRSD07102";
			oParam.service     = "reqapp.ReqMngt";
			oParam.method      = "reqGetPrcpGoodCaseList";
			oParam.inds        = "req=ds_send_prcppatcaseinfo";
			oParam.outds       = "ds_main_list_prcpgoodcase_prcpgoodcaselist=prcpgoodcaselist ds_=deptstoccaselist ds_=prcpsuminfo";
			oParam.async       = false;
			//oParam.callback    = "cf_TRRSD07102";

		tranf_submit(oParam);      
	}
}
]]></Script>