YNU_JEUS/app_home/himed/webapps/pam/insucomweb/js/PAM.js

/**
* @(#) PAM.js
*	???????????? ???? ???????? ?????????? ????????.
* 	????????
* 	- 2008. 07. 11 / ?????????? / ??????
*/
 

/**
 * @desc   : Global ????????
 * <pre>
 *           1. ?????? ??????(Parent)
 *           2. ???????? ??????(Child)
 * </pre>
 * @---------------------------------------------------
 */
// 1. ?????? ??????(Parent)
var cond = "";
// 2. ???????? ??????(Child)
var send = "";


/**
 * @desc   : ???? ????
 * <pre>
 *           ?????? ???? ?????? ????
 * </pre>
 * @param  : trgtWindow - ????ID, cond - ?????? ??????, send - ???????? ??????, openType - ????????
 * @return : 
 * @---------------------------------------------------
 */
function fLinkPopMenu(trgtWindow, cond, send, openType) {
	if (openType == "open") {
		var trgtManWindow = getChildWindow(trgtWindow);
		if (trgtManWindow == null) {
			open(trgtWindow, "", "10", "10", trgtWindow, cond, send, "", "");
		} else {
			activateChild(trgtWindow);
		}
	} else {
		open(trgtWindow, "", "10", "10", trgtWindow, cond, send, "", "");
	}
}


/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           emr/prcpmngtweb/xrw/SMMMO02500_????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMMO02500_1(pid){
	cond = "";
	send = "";
	setParameter("SMMMO02500_cond", pid);
	
	fLinkPopMenu("SMMMO02500", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????????(????????)
 * <pre>
 *           emr/prcpmngtweb/xrw/SMMMO02500_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMMO02500(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMMO02500", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           pam/patinfomngtweb/xrw/SMPMC01900_????????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMC01900(pid){
	send = "/root/source/pid";
	cond = "/root/hidden/SMPMC01900_cond/pid";
	
	model.makevalue("/root/hidden/SMPMC01900_cond/pid", pid);
	
	fLinkPopMenu("SMPMC01900", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           pam/opatmngtweb/xrw/SMPMO00600_????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMO00600(pid){
	send = "/root/send/pid";
	cond = "/root/hidden/SMPMO00600_cond/pid";
	
	model.makevalue("/root/hidden/SMPMO00600_cond/pid", pid);
	
	fLinkPopMenu("SMPMO00600", cond, send, "modal");
}

/**
 * @desc   : ???????? - ??????????????????????
 * <pre>
 *           pam/aftjudgstatweb/xrw/SMPIS00100_??????????????????????.xrw
 * </pre>
 * @param  : ioflag, clamdeptcd, pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPIS00100(ioflag, clamdeptcd, pid) {
	send = "/root/send";
	cond = "/root/hidden/SMPIS00100_cond";
	
	model.makevalue("/root/hidden/SMPIS00100_cond/ioflag", ioflag);
	model.makevalue("/root/hidden/SMPIS00100_cond/clamdeptcd", clamdeptcd);
	model.makevalue("/root/hidden/SMPIS00100_cond/patunitsrch", pid);
	
	fLinkPopMenu("SMPIS00100", cond, send, "modal");
}

/**
 * @desc   : ???????? - ?????? ????????
 * <pre>
 *           pam/aftjudgweb/xrw/SMPID20900_????????????????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPID20900(pid){
	send = "/root/hidden/popup/pid";
	cond = "/root/hidden/SMPID20900_cond/pid";
	
	model.makevalue("/root/hidden/SMPID20900_cond/pid", pid);
	
	fLinkPopMenu("SMPID20900", cond, send, "modal");
}

/**
 * @desc   : ???????? - ?????? ????????(????/????)
 * <pre>
 *           pam/aftjudgstatweb/xrw/SMPIS00500_????????????????.xrw
 * </pre>
 * @param  : datecond, fromdd, todd, ioflag, orddeptcd, orddrid, codecond, code, patunitsrch
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPIS00500(datecond, fromdd, todd, ioflag, orddeptcd, orddrid, codecond, code, patunitsrch, large, middle, small){
	send = "/root/send";
	cond = "/root/hidden/SMPIS00500_cond";
	
	model.makevalue("/root/hidden/SMPIS00500_cond/datecond", datecond);
	model.makevalue("/root/hidden/SMPIS00500_cond/fromdd", fromdd);
	model.makevalue("/root/hidden/SMPIS00500_cond/todd", todd);
	model.makevalue("/root/hidden/SMPIS00500_cond/ioflag", ioflag);
	model.makevalue("/root/hidden/SMPIS00500_cond/orddeptcd", orddeptcd);
	model.makevalue("/root/hidden/SMPIS00500_cond/orddrid", orddrid);
	model.makevalue("/root/hidden/SMPIS00500_cond/codecond", codecond);
	model.makevalue("/root/hidden/SMPIS00500_cond/code", code);
	model.makevalue("/root/hidden/SMPIS00500_cond/patunitsrch", patunitsrch);
	model.makevalue("/root/hidden/SMPIS00500_cond/large", large);
	model.makevalue("/root/hidden/SMPIS00500_cond/middle", middle);
	model.makevalue("/root/hidden/SMPIS00500_cond/small", small);
	
	fLinkPopMenu("SMPIS00500", cond, send, "modal");
}

/**
 * @desc   : ???????? - ?????? ????????(????/????)
 * <pre>
 *           pam/aftjudgstatweb/xrw/SMPIS00600_????????????.xrw
 * </pre>
 * @param  : clamflag, clamym, clamymfrom, clamdgfrom, clamymto, clamdgto, insukind, ioflag, clamdeptid, orddeptcd, orddrid, codecond, code, patunitsrch
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPIS00600(clamflag, clamym, clamymfrom, clamdgfrom, clamymto, clamdgto, insukind, ioflag, clamdeptid, orddeptcd, orddrid, codecond, code, patunitsrch, cutonly){
	send = "/root/send";
	cond = "/root/hidden/SMPIS00600_cond";
	
	model.makevalue("/root/hidden/SMPIS00600_cond/clamflag", clamflag);
	model.makevalue("/root/hidden/SMPIS00600_cond/clamym", clamym);
	model.makevalue("/root/hidden/SMPIS00600_cond/clamymfrom", clamymfrom);
	model.makevalue("/root/hidden/SMPIS00600_cond/clamdgfrom", clamdgfrom);
	model.makevalue("/root/hidden/SMPIS00600_cond/clamymto", clamymto);
	model.makevalue("/root/hidden/SMPIS00600_cond/clamdgto", clamdgto);
	model.makevalue("/root/hidden/SMPIS00600_cond/insukind", insukind);
	model.makevalue("/root/hidden/SMPIS00600_cond/ioflag", ioflag);
	model.makevalue("/root/hidden/SMPIS00600_cond/clamdeptid", clamdeptid);
	model.makevalue("/root/hidden/SMPIS00600_cond/orddeptcd", orddeptcd);
	model.makevalue("/root/hidden/SMPIS00600_cond/orddrid", orddrid);
	model.makevalue("/root/hidden/SMPIS00600_cond/codecond", codecond);
	model.makevalue("/root/hidden/SMPIS00600_cond/code", code);
	model.makevalue("/root/hidden/SMPIS00600_cond/patunitsrch", patunitsrch);
	model.makevalue("/root/hidden/SMPIS00600_cond/cutonly", cutonly);	
	
	fLinkPopMenu("SMPIS00600", cond, send, "modal");
}

/**
 * @desc   : ???????? - ??????????
 * <pre>
 *           emr/prcpmngtweb/xrw/SPMMO00100_??????????.xrw
 * </pre>
 * @param  : pid, patnm, orddeptcd, medispclid, insukind, suppkind, indd, cretno, ioflag
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPMMO00100(pid, patnm, orddeptcd, medispclid, insukind, suppkind, indd, cretno, ioflag){			
	cond = "";
	send = "";		
	var cond_value = pid + "▦"+ patnm + "▦"+ orddeptcd + "▦"+ medispclid 
					+ "▦"+ insukind + "▦"+ suppkind+ "▦"+ indd 
					+ "▦" + cretno + "▦"+ ioflag;
	setParameter("SPMMO00100_param",cond_value);
	
	fLinkPopMenu("SPMMO00100", cond, send, "modal");
}
/**
 * @desc   : ???????? - ??????????(????????)
 * <pre>
 *           emr/wardcareweb/xrw/SMMNB00200_??????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNB00200(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMNB00200", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????(????????)
 * <pre>
 *           emr/prcpmngtweb/xrw/SPMMO08500_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPMMO08500(){
	cond = "";
	send = "";
	fLinkPopMenu("SPMMO08500", cond, send, "modal");
}

/**
 * @desc   : 항암제투여현황 - 항암제투여단계및투여주기
 * <pre>
 *           pam/bfjudgweb/xrw/SMPIJ02900_항암제투여현황및투여단계주기관리.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPIJ02900(pid){		
	
	cond = "/root/hidden/SMPIJ02900_cond/pid";
	send = "/root/init/srchcond/pid";	            
	
	model.makevalue("/root/hidden/SMPIJ02900_cond/pid", pid);
	
	fLinkPopMenu("SMPIJ02900", cond, send, "modal");
}

/**
 * @desc   : ???????? - ??????????????
 * <pre>
 *           emr/dschanalyweb/xrw/SMMRD00200_????????????.xrw
 * </pre>
 * @param  : pid, genrflagcd
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMRD00200(pid, genrflagcd){
	cond = "";
	send = "";
	setParameter("SMMRD00200_pid", pid);
	setParameter("SMMRD00200_genrflagcd", genrflagcd);  // ????????????
	
	fLinkPopMenu("SMMRD00200", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           emr/dschanalyweb/xrw/SPMRD00900_????????????.xrw
 * </pre>
 * @param  : pid, genrflagcd
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPMRD00900(pid, genrflagcd){
	cond = "";
	send = "";
	setParameter("SPMRD00900_pid", pid);
	setParameter("SPMRD00900_genrflagcd", genrflagcd);  // ????????????
	
	fLinkPopMenu("SPMRD00900", cond, send, "modal");
}

/**
 * @desc   : ???????? - ??????????????????
 * <pre>
 *           ast/infcmngtweb/xrw/SMASI00100_??????????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMASI00100(pid){
	send = "/root/main/hospinfcinfo/hospinfc/info/pid";
	cond = "/root/hidden/SMASI00100_cond/pid";            
	
	model.makevalue("/root/hidden/SMASI00100_cond/pid", pid);
	
	fLinkPopMenu("SMASI00100", cond, send, "modal");
}

/**
 * @desc   : ???????? - ??????????????
 * <pre>
 *           ast/dietweb/xrw/SMANC00300_??????????????.xrw
 * </pre>
 * @param  : pid, patnm, reqdd, execprcpuniqno, reqresn, h_cretno, h_orddeptcd, h_prcpgenrflag, h_orddd
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMANC00300(pid, patnm, reqdd, execprcpuniqno, reqresn, h_cretno, h_orddeptcd, h_prcpgenrflag, h_orddd){
	send = "/root/main/receivedata";
	cond = "/root/hidden/SMANC00300_cond";

	model.makevalue("/root/hidden/SMANC00300_cond/pid", pid);
	model.makevalue("/root/hidden/SMANC00300_cond/hngnm", patnm);
	model.makevalue("/root/hidden/SMANC00300_cond/reqdd", reqdd);
	model.makevalue("/root/hidden/SMANC00300_cond/execprcpuniqno", execprcpuniqno);
	model.makevalue("/root/hidden/SMANC00300_cond/reqresn", reqresn);
	model.makevalue("/root/hidden/SMANC00300_cond/h_cretno",  h_cretno);
	model.makevalue("/root/hidden/SMANC00300_cond/h_orddeptcd",  h_orddeptcd);
	model.makevalue("/root/hidden/SMANC00300_cond/h_prcpgenrflag", h_prcpgenrflag);
	model.makevalue("/root/hidden/SMANC00300_cond/h_orddd",  h_orddd);
	
	fLinkPopMenu("SMANC00300", cond, send, "modal");
}

/**
 * @desc   : ???????? - NST????????
 * <pre>
 *           ast/pharmacyweb/xrw/SMADC02600_NST????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMADC02600(pid, orddd, cretno, prcpgenrflag, formrecseq, rgstseqno, cnstdd){
	send = "/root/temp/cnstinfo";
	cond = "/root/hidden/SMADC02600_cond";
	
	model.makevalue("/root/hidden/SMADC02600_cond/pid", pid);
	model.makevalue("/root/hidden/SMADC02600_cond/orddd", orddd);
	model.makevalue("/root/hidden/SMADC02600_cond/cretno", cretno);
	model.makevalue("/root/hidden/SMADC02600_cond/prcpgenrflag", prcpgenrflag);
	model.makevalue("/root/hidden/SMADC02600_cond/formrecseq", formrecseq);
	model.makevalue("/root/hidden/SMADC02600_cond/rgstseqno", rgstseqno);
	model.makevalue("/root/hidden/SMADC02600_cond/cnstdd", cnstdd);
	
	fLinkPopMenu("SMADC02600", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????(????????)
 * <pre>
 *           emr/wardcareweb/xrw/SMMNW04700_????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNW04700(){
	send = "";
	cond = "";
	
	fLinkPopMenu("SMMNW04700", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????????(????????)
 * <pre>
 *           emr/carerecweb/xrw/SMMNW04000_????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNW04000(){
	send = "";
	cond = "";

	fLinkPopMenu("SMMNW04000", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????(????????)
 * <pre>
 *           emr/dialroomweb/xrw/SMMND00300_????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMND00300(){
	send = "";
	cond = "";
	
	fLinkPopMenu("SMMND00300", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????????
 * <pre>
 *           pam/patinfomngtweb/xrw/SMPMC01400_????????????????.xrw
 * </pre>
 * @param  : pid, srchcond
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMC01400(pid, srchcond){
	send = "/root/hidden/source";
	cond = "/root/hidden/SMPMC01400_cond";

	model.makevalue("/root/hidden/SMPMC01400_cond/pid", pid);
	model.makevalue("/root/hidden/SMPMC01400_cond/srchcond", srchcond);
	
	fLinkPopMenu("SMPMC01400", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           pam/ipatmngtweb/xrw/SMPMI00400_????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMI00400(pid){
	send = "/root/hidden/source";
	cond = "/root/hidden/SMPMI00400_cond";

	model.makevalue("/root/hidden/SMPMI00400_cond/pid", pid);
	
	fLinkPopMenu("SMPMI00400", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           pam/patinfomngtweb/xrw/SMPMC02600_????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMC02600(pid){
	cond = "";
	send = "";
	setParameter("SMPMC02600_pid", pid);
	
	fLinkPopMenu("SMPMC02600", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????????????
 * <pre>
 *           pam/patinfomngtweb/xrw/SMPMC02700_????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMC02700(pid){
	cond = "";
	send = "";
	setParameter("SMPMC02700_pid", pid);

	fLinkPopMenu("SMPMC02700", cond, send, "modal");
}

/**
 * @desc   : ???????? - ??????????????(????????)
 * <pre>
 *           pam/patinfomngtweb/xrw/SMPMC01700_??????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMC01700(){
	send = "";
	cond = "";
	
	fLinkPopMenu("SMPMC01700", cond, send, "modal");
}

/**
 * @desc   : ???????? - ??????????????(????????)
 * <pre>
 *           pam/patinfomngtweb/xrw/SMPMC06500_??????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMC06500(pid){
	model.makeValue("/root/tempchk/specchk/stat", "");
	model.makeValue("/root/tempchk/specchk/pid", pid);
	model.makeValue("/root/tempchk/specchk/hngnm", "");
	model.makeValue("/root/tempchk/specchk/rrgstno1", "");
	model.makeValue("/root/tempchk/specchk/rrgstno2", "");
	model.makeValue("/root/tempchk/specchk/choiflag", "");
	model.makeValue("/root/tempchk/specchk/ordtype", "");
	model.makeValue("/root/tempchk/specchk/orddd", "");
	model.makeValue("/root/tempchk/specchk/orddeptcd", "");
	model.makeValue("/root/tempchk/specchk/orddrid", "");
	model.makeValue("/root/tempchk/specchk/specordyn", "");
	model.makeValue("/root/tempchk/specchk/fromdd", "");
	model.makeValue("/root/tempchk/specchk/rsrvdd", "");
	
	modal("SMPMC06500", "1", "0", "0" ,"SMPMC06500", "/root/tempchk/specchk", "/root/main/patappinfo/patappinfo1");
}


/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           pam/bfjudgweb/xrw/SMPIJ01200_????????????????????????.xrw
 * </pre>
 * @param  : pid, patnm, wardcd, indd, fromdd, todd, chkflag
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPIJ01200_1(pid, patnm, wardcd, indd, fromdd, todd, chkflag){
	send = "/root/send";
	cond = "/root/hidden/SMPIJ01200_cond";

	model.makevalue("/root/hidden/SMPIJ01200_cond/pid", pid);
	model.makevalue("/root/hidden/SMPIJ01200_cond/patnm", patnm);
	model.makevalue("/root/hidden/SMPIJ01200_cond/wardcd", wardcd);
	model.makevalue("/root/hidden/SMPIJ01200_cond/indd", indd);
	model.makevalue("/root/hidden/SMPIJ01200_cond/fromdd", fromdd);
	model.makevalue("/root/hidden/SMPIJ01200_cond/todd", todd);
	model.makevalue("/root/hidden/SMPIJ01200_cond/chkflag", chkflag);
	
	fLinkPopMenu("SMPIJ01200", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????(????????)
 * <pre>
 *           pam/bfjudgweb/xrw/SMPIJ01200_????????????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPIJ01200(){
	cond = "";
	send = "";
	fLinkPopMenu("SMPIJ01200", cond, send, "modal");
}

/**
 * @desc   : ???????? - ??????????
 * <pre>
 *           ast/dietweb/xrw/SMANT01000_????????????????.xrw
 * </pre>
 * @param  : pid, patnm, patflag, ward, room, fromdd, todd
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMANT01000_1(pid, patnm, patflag, ward, room, fromdd, todd){
	send = "/root/send/searchitem/patlist";
	cond = "/root/hidden/SMANT01000_cond";

	model.makevalue("/root/hidden/SMANT01000_cond/pid", pid);
	model.makevalue("/root/hidden/SMANT01000_cond/hngnm", patnm);
	model.makevalue("/root/hidden/SMANT01000_cond/patflag", patflag);
	model.makevalue("/root/hidden/SMANT01000_cond/ward", ward);
	model.makevalue("/root/hidden/SMANT01000_cond/room", room);
	model.makevalue("/root/hidden/SMANT01000_cond/fromdd", fromdd);
	model.makevalue("/root/hidden/SMANT01000_cond/todd", todd);
	
	fLinkPopMenu("SMANT01000", cond, send, "modal");
}

/**
 * @desc   : ???????? - ??????????(????????)
 * <pre>
 *           ast/dietweb/xrw/SMANT01000_????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMANT01000(){
	cond = "";
	send = "";
	fLinkPopMenu("SMANT01000", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????
 * <pre>
 *           emr/carerecweb/xrw/SMMNR01000_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNR01000(pid, ioflag){
	cond = "";
	send = "";
	setParameter("pid",		pid);
	setParameter("ioflag",		ioflag);
	
	fLinkPopMenu("SMMNR01000", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           emr/carerecweb/xrw/SMMNR04600_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNR04600(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMNR04600", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           ast/examcureweb/xrw/SMAEA00500_???????? ????????????.xrw
 * </pre>
 * @param  : ddflag, fromdd, todd, suppdeptcd, excuroomcd, orddeptcd, rsrvflag, wardcd, pid, patnm
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMAEA00500(ddflag, fromdd, todd, suppdeptcd, excuroomcd, orddeptcd, rsrvflag, wardcd, pid, patnm){
	send = "/root/send";
	cond = "/root/hidden/SMAEA00500_cond";

	model.makevalue("/root/hidden/SMAEA00500_cond/ddflag", ddflag);
	model.makevalue("/root/hidden/SMAEA00500_cond/fromdd", fromdd);
	model.makevalue("/root/hidden/SMAEA00500_cond/todd", todd);
	model.makevalue("/root/hidden/SMAEA00500_cond/suppdeptcd", suppdeptcd);
	model.makevalue("/root/hidden/SMAEA00500_cond/excuroomcd", excuroomcd);
	model.makevalue("/root/hidden/SMAEA00500_cond/orddeptcd", orddeptcd);
	model.makevalue("/root/hidden/SMAEA00500_cond/rsrvflag", rsrvflag);
	model.makevalue("/root/hidden/SMAEA00500_cond/wardcd", wardcd);
	model.makevalue("/root/hidden/SMAEA00500_cond/pid", pid);
	model.makevalue("/root/hidden/SMAEA00500_cond/patnm", patnm);
	model.makevalue("/root/hidden/SMAEA00500_cond/globalinstance/instance1", orddeptcd);
		
	fLinkPopMenu("SMAEA00500", cond, send, "modal");
}


/**
 * @desc   : ???????? - ??????????????
 * <pre>
 *           ast/examcureweb/xrw/SMAEA00300_??????????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMAEA00300(pid){
	send = "/root/send/srchpid";
	cond = "/root/hidden/SMAEA00300_cond/srchpid";

	model.makevalue("/root/hidden/SMAEA00300_cond/srchpid", pid);
		
	fLinkPopMenu("SMAEA00300", cond, send, "modal");
}


/**
 * @desc   : ???????? - CRRT????
 * <pre>
 *           emr/wardcareweb/xrw/SMMNW09100_CRRT????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNW09100(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMNW09100", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????????????
 * <pre>
 *           pam/bfjudgweb/xrw/SMPIJ01700_????????????????????????????.xrw
 * </pre>
 * @param  : pid, patnm, insukind, fromdd, todd, chkflag
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPIJ01700(pid, patnm, insukind, fromdd, todd, chkflag){
	send = "/root/send";
	cond = "/root/hidden/SMPIJ01700_cond";

	model.makevalue("/root/hidden/SMPIJ01700_cond/pid", pid);
	model.makevalue("/root/hidden/SMPIJ01700_cond/patnm", patnm);
	model.makevalue("/root/hidden/SMPIJ01700_cond/insukind", insukind);
	model.makevalue("/root/hidden/SMPIJ01700_cond/fromdd", fromdd);
	model.makevalue("/root/hidden/SMPIJ01700_cond/todd", todd);
	model.makevalue("/root/hidden/SMPIJ01700_cond/chkflag", chkflag);

	fLinkPopMenu("SMPIJ01700", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????????????
 * <pre>
 *           pam/bfjudgweb/xrw/SMPIJ01700_????????????????????????????.xrw
 * </pre>
 * @param  : pid, patnm, insukind, fromdd, todd, chkflag
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNW10700(pid, indd, wardcd, unitflag){
	cond = "";
	send = "";
	
	setParameter("pid",			pid);
	setParameter("orddd",			indd);
	setParameter("wardcd",			wardcd);
	setParameter("unitflag",		unitflag);
	

	fLinkPopMenu("SMMNW10700", cond, send, "modal");
}


/**
 * @desc   : ???????? - ??????????????????
 * <pre>
 *           pam/bfjudgweb/xrw/SMPIJ01800_??????????????????????.xrw
 * </pre>
 * @param  : pid, patnm, indd, dschdd
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPIJ01800(pid, patnm, indd, dschdd){
	send = "/root/hidden/cond/smpij01800";
	cond = "/root/hidden/SMPIJ01800_cond";
	
	model.makevalue("/root/hidden/SMPIJ01800_cond/pid", pid);
	model.makevalue("/root/hidden/SMPIJ01800_cond/patnm", patnm);
	model.makevalue("/root/hidden/SMPIJ01800_cond/indd", indd);
	model.makevalue("/root/hidden/SMPIJ01800_cond/dschdd", dschdd);
									
	fLinkPopMenu("SMPIJ01800", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           emr/prcpmngtweb/xrw/SMMMO00200_????????.xrw
 * </pre>
 * @param  : pid, indd, cretno, instcd, ioflag, issdept
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMMO00200(pid, indd, cretno, instcd, ioflag, issdept){
	cond = "";
	send = "";
	setParameter("SMMMO00200_pid",			pid);
	setParameter("SMMMO00200_orddd",		indd);
	setParameter("SMMMO00200_cretno",		cretno);
	setParameter("SMMMO00200_instcd",		instcd);
	setParameter("SMMMO00200_ioflag",		ioflag);
	setParameter("SMMMO00200_issdept",	issdept);
									
	fLinkPopMenu("SMMMO00200", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????
 * <pre>
 *           ast/examcureweb/xrw/SMAEF00100_????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMAEF00100(pid){
	cond = "/root/hidden/SMAEF00100_cond";
	send = "/root/send/data";
		
	model.makevalue("/root/hidden/SMAEF00100_cond/pid", pid);
	model.makevalue("/root/hidden/SMAEF00100_cond/gb", "1");
	model.makevalue("/root/hidden/SMAEF00100_cond/excuexectodd", "3");
	model.makevalue("/root/hidden/SMAEF00100_cond/lendapptm", "");
	model.makevalue("/root/hidden/SMAEF00100_cond/lendgoal", "");
	model.makevalue("/root/hidden/SMAEF00100_cond/modality", "");
	model.makevalue("/root/hidden/SMAEF00100_cond/deptengabbr", "");
	model.makevalue("/root/hidden/SMAEF00100_cond/lenddeptcd", "");
	model.makevalue("/root/hidden/SMAEF00100_cond/lendrid", "");
	model.makevalue("/root/hidden/SMAEF00100_cond/srchdate1", "");
	model.makevalue("/root/hidden/SMAEF00100_cond/deptcd", "");
	model.makevalue("/root/hidden/SMAEF00100_cond/drid", "");
	model.makevalue("/root/hidden/SMAEF00100_cond/gb", "");
	model.makevalue("/root/hidden/SMAEF00100_cond/excuexectodd", "");
	
	fLinkPopMenu("SMAEF00100", cond, send, "modal");			
}

/**
 * @desc   : ???????? - ????????
 * <pre>
 *           pam/insucomweb/xrw/SPPIZ01800_????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPPIZ01800(pid, pnm, age, sex, indd){
	send = "/root/send_opener";
	cond = "/root/hidden/SPPIZ01800_cond";
		
	model.makevalue("/root/hidden/SPPIZ01800_cond/pid", pid);
	model.makevalue("/root/hidden/SPPIZ01800_cond/pnm", pnm);
	model.makevalue("/root/hidden/SPPIZ01800_cond/age", age);
	model.makevalue("/root/hidden/SPPIZ01800_cond/sex", sex);
	model.makevalue("/root/hidden/SPPIZ01800_cond/indd", indd);
	
	fLinkPopMenu("SPPIZ01800", cond, send, "modal");			
}

/**
 * @desc   : ???????? - ????????
 * <pre>
 *           pam/insucomweb/xrw/SPMMO14900_????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPMMO14900(pid, patnm){
	send = "";
	cond = "";
	
	setParameter("SPMMO14900_pid", pid);
	setParameter("SPMMO14900_hngnm", patnm);
	
	fLinkPopMenu("SPMMO14900", cond, send, "modal");			
}

/**
 * @desc   : ???????? - ????????
 * <pre>
 *           pam/insucomweb/xrw/SMADT20100_????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMADT20100(pid){
	send = "";
	cond = "";
	
	setParameter("SMADT20100_pid", pid);
	
	fLinkPopMenu("SMADT20100", cond, send, "modal");			
}



/**
 * @desc   : ???????? - ????????
 * <pre>
 *           pam/insucomweb/xrw/SMLPP00500_????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMLPP00500(pid){
	send = "";
	cond = "";
	
	setParameter("SMLPP00500_pid", pid);
	
	fLinkPopMenu("SMLPP00500", cond, send, "modal");			
}



/**
 * @desc   : ???????? - ????????
 * <pre>
 *           emr/prcpmngtweb/xrw/SPMMO02400_????????????.xrw
 * </pre>
 * @param  : pid, sex, patage, ioflag
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPMMO02400_1(pid, patnm, sex, patage, ioflag){
	cond = "";
	send = "";
	setParameter("SMMMO02400_pid", pid);
	setParameter("SMMMO02400_hngnm", patnm);
	setParameter("SMMMO02400_sex", sex);
	setParameter("SMMMO02400_age", patage);
	setParameter("SPMMO02400_ioflag", ioflag);
	
	fLinkPopMenu("SPMMO02400", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????(????????)
 * <pre>
 *           emr/prcpmngtweb/xrw/SPMMO02400_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPMMO02400(){
	cond = "";
	send = "";
	fLinkPopMenu("SPMMO02400", cond, send, "modal");
}
        

/**
 * @desc   : ???????? - ????????
 * <pre>
 *           emr/caremedirecweb/xrw/SMMNR04500_???????? ????.xrw
 * </pre>
 * @param  : wardcd, roomcd, patnm, pid, medrfromdd, medrtodd, indd, cretno, prcpkindcd, prcpcd, acpstatflag, drugstat
 * @return : 
 * @---------------------------------------------------
 */
//function fOpenSMMNR04500_1(wardcd, roomcd, patnm, pid, medrfromdd, medrtodd, indd, cretno, prcpkindcd, prcpcd, acpstatflag, drugstat){
function fOpenSMMNR04500_1(pid, indd, cretno, medrfromdd, medrtodd){
	send = "/root/hidden/cond";	
	cond = "/root/hidden/SMMNR04500_cond";

	model.makevalue("/root/hidden/SMMNR04500_cond/pid", pid);
	model.makevalue("/root/hidden/SMMNR04500_cond/indd", indd);
	model.makevalue("/root/hidden/SMMNR04500_cond/cretno", cretno);	
	model.makevalue("/root/hidden/SMMNR04500_cond/medrfromdd",  medrfromdd);
	model.makevalue("/root/hidden/SMMNR04500_cond/medrtodd", medrtodd);
	/*
	model.makevalue("/root/hidden/SMMNR04500_cond/wardcd", "");
	model.makevalue("/root/hidden/SMMNR04500_cond/roomcd", "");
	model.makevalue("/root/hidden/SMMNR04500_cond/settingrnid", "-");
	model.makevalue("/root/hidden/SMMNR04500_cond/prcpkindcd", "-");	
	model.makevalue("/root/hidden/SMMNR04500_cond/prcpcd", "");	
	model.makevalue("/root/hidden/SMMNR04500_cond/drugstat", "");	
	model.makevalue("/root/hidden/SMMNR04500_cond/acpstatflag", "");	
	model.makevalue("/root/hidden/SMMNR04500_cond/dtflag", "1");		
	*/
	fLinkPopMenu("SMMNR04500", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????(????????)
 * <pre>
 *           emr/caremedirecweb/xrw/SMMNR04500_???????? ????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNR04500(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMNR04500", cond, send, "modal");
}


/**
 * @desc   : ???????? - ??????????
 * <pre>
 *           ast/infcmngtweb/xrw/SMASI00800_??????????????????????.xrw
 * </pre>
 * @param  : termflag, fromdd, todd, prcsstat, kind, orddeptcd, pid, patnm
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMASI00800(termflag, fromdd, todd, prcsstat, kind, orddeptcd, pid, patnm){
	send = "/root/main/cond";
	cond = "/root/hidden/SMASI00800_cond";

	model.makevalue("/root/hidden/SMASI00800_cond/termflag", termflag);
	model.makevalue("/root/hidden/SMASI00800_cond/fromdd", fromdd);
	model.makevalue("/root/hidden/SMASI00800_cond/todd", todd);
	model.makevalue("/root/hidden/SMASI00800_cond/prcsstat", prcsstat);
	model.makevalue("/root/hidden/SMASI00800_cond/kind", kind);
	model.makevalue("/root/hidden/SMASI00800_cond/orddeptcd", orddeptcd);
	model.makevalue("/root/hidden/SMASI00800_cond/pid", pid);
	model.makevalue("/root/hidden/SMASI00800_cond/patnm", patnm);

	fLinkPopMenu("SMASI00800", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           ast/pharmacyweb/xrw/SMADB01020_???????????? ??????.xrw
 * </pre>
 * @param  : pid, patnm, age, sex, wardcd, roomcd, indd, cretno, orddeptcd, prcpgenrflag
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMADB01020_1(pid, patnm, age, sex, wardcd, roomcd, indd, cretno, orddeptcd, prcpgenrflag){
	cond = "";
	send = "";
	model.makevalue("/root/hidden/SMADB01020_cond_paminfo/list/pid", pid);
	model.makevalue("/root/hidden/SMADB01020_cond_paminfo/list/hngnm", patnm);
	model.makevalue("/root/hidden/SMADB01020_cond_paminfo/list/age", age);
	model.makevalue("/root/hidden/SMADB01020_cond_paminfo/list/sex", sex);
	model.makevalue("/root/hidden/SMADB01020_cond_paminfo/list/wardnm", wardcd);
	model.makevalue("/root/hidden/SMADB01020_cond_paminfo/list/roomcd",roomcd);
	model.makevalue("/root/hidden/SMADB01020_cond_paminfo/list/indd",   indd);
	model.makevalue("/root/hidden/SMADB01020_cond_paminfo/list/cretno",   cretno);
	model.makevalue("/root/hidden/SMADB01020_cond_paminfo/list/orddeptcd",  orddeptcd);
	
	var reqnode = instance1.selectNodes("/root/hidden/SMADB01020_cond_paminfo/list");
	var csv = getNodeListCSV(reqnode);
	setGlobalVariable("paminfo",csv); 
	
	model.makevalue("/root/hidden/SMADB01000_cond_patflag/list/prcpgenrflag", prcpgenrflag);
	
	reqnode = instance1.selectNodes("/root/hidden/SMADB01000_cond_patflag/list");
	csv = getNodeListCSV(reqnode);
	setGlobalVariable("patflag",csv);   
	
	fLinkPopMenu("SMADB01000", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????????(????????)
 * <pre>
 *           ast/pharmacyweb/xrw/SMADB01020_???????????? ??????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMADB01020(){
	cond = "";
	send = "";
	fLinkPopMenu("SMADB01020", cond, send, "modal");
}

/**
"
 * @desc   : ???????? - ??????????????????????(????????)
 * <pre>
 *           ast/pharmacyweb/xrw/SMADB01000_??????????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMADB01000(){
	cond = "";
	send = "";
	fLinkPopMenu("SMADB01000", cond, send, "modal");
}


/**
"
 * @desc   : ???????? - ??????????????????????(????????)
 * <pre>
 *           ast/pharmacyweb/xrw/SMADB01000_??????????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 * @JHP ????? ?????. ?? ??? ?? ??. 20090429
 */
function fOpenSMADB01000_1(pid){
	cond = "";
	send = "";
	model.makevalue("/root/hidden/SMADB01000_cond_paminfo/list/pid", pid);
	var reqnode = instance1.selectNodes("/root/hidden/SMADB01000_cond_paminfo/list");
	var csv = getNodeListCSV(reqnode);
	setGlobalVariable("paminfo",csv);
	fLinkPopMenu("SMADB01000", cond, send, "modal");
}


/**
 * @desc   : ???????? - ??????????????
 * <pre>
 *           
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNI00400_1(pid){
	cond = "";
	send = "";
	model.makevalue("/root/hidden/SMMNI00400_cond_paminfo/list/pid", pid);
	var reqnode = instance1.selectNodes("/root/hidden/SMMNI00400_cond_paminfo/list");
	var csv = getNodeListCSV(reqnode);
	setGlobalVariable("paminfo",csv);
	
	fLinkPopMenu("SMMNI00400", cond, send, "modal");
}


/**
 * @desc   : ???????? - ??????????????(????????)
 * <pre>
 *           
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNI00400(){
	cond = "";
	send = "";
	
	setParameter("SMMNI00400_PRT", "Y");

	fLinkPopMenu("SMMNI00400", cond, send, "modal");
}

/**
 * @desc   : ?????? - ????????(????)
 * <pre>
 *           pam/bfjudgweb/xrw/SPPIJ02400_????????????????.xrw
 * </pre>
 * @param  : tabflag, pid, indd, cretno, mskind, insukind, suppkind
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPPIJ02400(tabflag, pid, indd, cretno, mskind, insukind, suppkind){
	send = "/root/send/data1";
	cond = "/root/hidden/SPPIJ02400_cond";
	
	model.makevalue("/root/hidden/SPPIJ02400_cond/tabflag", tabflag);
	model.makevalue("/root/hidden/SPPIJ02400_cond/pid", pid);
	model.makevalue("/root/hidden/SPPIJ02400_cond/indd", indd);
	model.makevalue("/root/hidden/SPPIJ02400_cond/cretno", cretno);
	model.makevalue("/root/hidden/SPPIJ02400_cond/mskind", mskind);
	model.makevalue("/root/hidden/SPPIJ02400_cond/insukind", insukind);
	model.makevalue("/root/hidden/SPPIJ02400_cond/suppkind", suppkind);
	
	fLinkPopMenu("SPPIJ02400", cond, send, "modal");
}

/**
 * @desc   : ?????? - ??????????(????)
 * <pre>
 *           pam/aftjudgweb/xrw/SPPID21300_????????????????.xrw
 * </pre>
 * @param  : clamym, clamdg, pid, pidsn, insukind, suppkind, ordfromdd
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPPID21300(clamym, clamdg, pid, pidsn, insukind, suppkind, ordfromdd){
	send = "/root/send/data1";
	cond = "/root/hidden/SPPID21300_cond";
	
	model.makevalue("/root/hidden/SPPID21300_cond/clamym", clamym);
	model.makevalue("/root/hidden/SPPID21300_cond/clamdg", clamdg);
	model.makevalue("/root/hidden/SPPID21300_cond/pid", pid);
	model.makevalue("/root/hidden/SPPID21300_cond/pidsn", pidsn);
	model.makevalue("/root/hidden/SPPID21300_cond/insukind", insukind);
	model.makevalue("/root/hidden/SPPID21300_cond/suppkind", suppkind);
	model.makevalue("/root/hidden/SPPID21300_cond/ordfromdd", ordfromdd);
	
	fLinkPopMenu("SPPID21300", cond, send, "modal");
}

/**
 * @desc   : ?????? - ??????????????
 * <pre>
 *           pam/inordamtmngtweb/xrw/SMPAI00200_??????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPAI00200(pid){
	send = "/root/send/pid";
	cond = "/root/hidden/SMPAI00200_cond/pid";
	
	model.makevalue("/root/hidden/SMPAI00200_cond/pid", pid);
	
	fLinkPopMenu("SMPAI00200", cond, send, "modal");
}


/**
 * @desc   : ?????? - ????????????
 * <pre>
 *           pam/outordamtmngtweb/xrw/SMPAO00300_????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPAO00300(pid){
	send = "/root/send/pid";
	cond = "/root/hidden/SMPAO00300_cond/pid";
	
	model.makevalue("/root/hidden/SMPAO00300_cond/pid", pid);

	fLinkPopMenu("SMPAO00300", cond, send, "modal");
}


/**
 * @desc   : ?????? - ????????????????????
 * <pre>
 *           pam/opatmngtweb/xrw/SMPMOTMP00_????????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMOTMP00(pid){
	send = "/root/source/pid";
	cond = "/root/hidden/SMPMOTMP00_cond/pid";

	model.makevalue("/root/hidden/SMPMOTMP00_cond/pid", pid);

	fLinkPopMenu("SMPMOTMP00", cond, send, "modal");
}

/**
 * @desc   : ?????? - ??????????????
 * <pre>
 *           pam/inordamtmngtweb/xrw/SMPAI00400_??????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPAI00400(pid){
	cond = "";
	send = "";
	fLinkPopMenu("SMPAI00400", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????
 * <pre>
 *           ast/pharmacyweb/xrw/SMADB01900_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMADB01900(){
	cond = "";
	send = "";
	fLinkPopMenu("SMADB01900", cond, send, "modal");
}

/**
 * @desc   : ???????? - ??????????????
 * <pre>
 *           ast/pharmacyweb/xrw/SMADB00100_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMADB00100(){
	cond = "";
	send = "";
	fLinkPopMenu("SMADB00100", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????
 * <pre>
 *           pam/calcscormngtweb/xrw/SMPIC00100_????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPIC00100(){
	cond = "";
	send = "";
	fLinkPopMenu("SMPIC00100", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           pam/calcscormngtweb/xrw/SMPIC00700_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPIC00700(){
	cond = "";
	send = "";
	fLinkPopMenu("SMPIC00700", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????????
 * <pre>
 *           pam/insucomtweb/xrw/SPPIZ01600_????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPPIZ01600(){
	cond = "";
	send = "";
	fLinkPopMenu("SPPIZ01600", cond, send, "modal");
}

/**
 * @desc   : ???????? - ??????????
 * <pre>
 *           ast/infcmngtweb/xrw/SMASB02100_????????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMASB02100(pid){
	cond = "";
	send = "";
	
	setParameter("SMASB02100_param", pid);
	
	fLinkPopMenu("SMASB02100", cond, send, "modal");
}


/**
 * @desc   : ???????? - ??????????????????
 * <pre>
 *           emr/prcpmngtweb/xrw/SMMMO05100_??????????????????.xrw
 * </pre>
 * @param  : opfromdd, optodd, patnm, pid, oproomcd, perfdeptcd, oppatflagcd, opstatcd, anstmthdcd, anstdetlmthdcd, diaghngnm, ophngnm, opflagcd, diagcd, opcd
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMMO05100(opfromdd, optodd, patnm, pid, oproomcd, perfdeptcd, oppatflagcd, opstatcd, anstmthdcd, anstdetlmthdcd, diaghngnm, ophngnm, opflagcd, diagcd, opcd){
	send = "/root/main/cond";
	cond = "/root/hidden/SMMMO05100_cond";
	
	model.makevalue("/root/hidden/SMMMO05100_cond/opfromdd", opfromdd);
	model.makevalue("/root/hidden/SMMMO05100_cond/optodd", optodd);
	model.makevalue("/root/hidden/SMMMO05100_cond/hngnm", patnm);
	model.makevalue("/root/hidden/SMMMO05100_cond/pid", pid);
	model.makevalue("/root/hidden/SMMMO05100_cond/oproomcd", oproomcd);
	model.makevalue("/root/hidden/SMMMO05100_cond/perfdeptcd", perfdeptcd);
	model.makevalue("/root/hidden/SMMMO05100_cond/oppatflagcd", oppatflagcd);
	model.makevalue("/root/hidden/SMMMO05100_cond/opstatcd", opstatcd);
	model.makevalue("/root/hidden/SMMMO05100_cond/anstmthdcd", anstmthdcd);
	model.makevalue("/root/hidden/SMMMO05100_cond/anstdetlmthdcd", anstdetlmthdcd);
	model.makevalue("/root/hidden/SMMMO05100_cond/diaghngnm", diaghngnm);
	model.makevalue("/root/hidden/SMMMO05100_cond/ophngnm", ophngnm);
	model.makevalue("/root/hidden/SMMMO05100_cond/opflagcd", opflagcd);
	model.makevalue("/root/hidden/SMMMO05100_cond/diagcd", diagcd);
	model.makevalue("/root/hidden/SMMMO05100_cond/opcd", opcd);
	model.makevalue("/root/hidden/SMMMO05100_cond/opfromtmcd", "-");
	model.makevalue("/root/hidden/SMMMO05100_cond/perfdrid", "-");
	model.makevalue("/root/hidden/SMMMO05100_cond/wardcd", "-");
	model.makevalue("/root/hidden/SMMMO05100_cond/viewtype", "");

	fLinkPopMenu("SMMMO05100", cond, send, "modal");
}


/**
 * @desc   : ???????? - ??????????????????
 * <pre>
 *           emr/prcpmngtweb/xrw/SPMMO00200_????????.xrw
 * </pre>
 * @param  : ioflag, pid, patnm, age, orddeptcd, orddd, medispclid, roomcd, insukind, suppkind, fromdd, todd
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPMMO00200(ioflag, pid, patnm, age, orddeptcd, orddd, medispclid, roomcd, insukind, suppkind, fromdd, todd){
	cond = "";
	send = "";
	var cond_value = ioflag + "??"+ pid + "??"+ patnm + "??"+ age + "????"+ orddeptcd 
							+ "??"+ orddd + "??"+ medispclid + "??"+ roomcd  + "??"+ insukind 
							+ "??"+ suppkind + "??"+ fromdd + "??" + todd +  "??Y";
	   
	setParameter("SPMMO00200_param",cond_value);

	fLinkPopMenu("SPMMO00200", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????/????/???? ????
 * <pre>
 *           pam/ipatmngtweb/xrw/SMPMI00700_???? ???? ????????.xrw
 * </pre>
 * @param  : indschacptstat, srchcond, data1, fromdd, todd, sess_posinstcd
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMI00700(indschacptstat, srchcond, data1, fromdd, todd, sess_posinstcd,eryn,vipyn,tdayinexptyn,srchdateyn,srchdate,gubunexpt,hngnm){
	cond = "/root/hidden/SMPMI00700_cond";
	send = "/root/send";
	
	model.makevalue("/root/hidden/SMPMI00700_cond/indschacptstat", indschacptstat);
	model.makevalue("/root/hidden/SMPMI00700_cond/srchcond", srchcond);
	model.makevalue("/root/hidden/SMPMI00700_cond/data1", data1);
	model.makevalue("/root/hidden/SMPMI00700_cond/fromdd", fromdd);
	model.makevalue("/root/hidden/SMPMI00700_cond/todd", todd);
	model.makevalue("/root/hidden/SMPMI00700_cond/sess_posinstcd", sess_posinstcd);
	model.makevalue("/root/hidden/SMPMI00700_cond/ioflag", "I");
	
	model.makevalue("/root/hidden/SMPMI00700_cond/eryn", eryn);
	model.makevalue("/root/hidden/SMPMI00700_cond/vipyn", vipyn);
	model.makevalue("/root/hidden/SMPMI00700_cond/tdayinexptyn", tdayinexptyn);
	model.makevalue("/root/hidden/SMPMI00700_cond/srchdateyn", srchdateyn);
	model.makevalue("/root/hidden/SMPMI00700_cond/srchdate", srchdate);
	model.makevalue("/root/hidden/SMPMI00700_cond/gubunexpt", gubunexpt);
	model.makevalue("/root/hidden/SMPMI00700_cond/hngnm", hngnm);
	
	fLinkPopMenu("SMPMI00700", cond, send, "modal");	
}

/**
 * @desc   : ???????? - ????????????????
 * <pre>
 *           emr/prcpmngtweb/xrw/SMMMB00200_????????SET????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMMB00200(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMMB00200", cond, send, "modal");
}

function fOpenSMMMB08300(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMMB08300", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????????????
 * <pre>
 *           ast/pharmacyweb/xrw/SMADB00900_????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMADB00900(){
	cond = "";
	send = "";
	fLinkPopMenu("SMADB00900", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????????
 * <pre>
 *           pam/pambaseinfomngtweb/xrw/SMPMB00200_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMB00200(){
	cond = "";
	send = "";
	fLinkPopMenu("SMPMB00200", cond, send, "modal");
}

/**
 * @desc   : ???????? - CP????
 * <pre>
 *           emr/cpgweb/xrw/SPMMP01200_CP????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPMMP01200_CP(){
	cond = "";
	send = "";
	fLinkPopMenu("SPMMP01200_CP", cond, send, "modal");
}

/**
 * @desc   : EMR - ????????????????
 * <pre>
 *           emr/medirecweb/xrw/SSMMR01100_????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSSMMR01100(){
	cond = "";
	send = "";
	fLinkPopMenu("SSMMR01100", cond, send, "modal");
}

/**
 * @desc   : EMR - ????????????????
 * <pre>
 *           emr/medirecweb/xrw/SSMMR01100_????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMMR00800(pid){
	cond = "";
	send = "";
	
	var cond_value = pid + "????????????";
	
	setParameter("SMMMR05000_param_pinfo",cond_value);
	
	fLinkPopMenu("SMMMR00800", cond, send, "modal");
}

/**
 * @desc   : EMR - CONSULT
 * <pre>
 *           emr/medirecweb/xrw/SMMMR05000_CONSULT????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMMR05000_1(pid){
	cond = "";
	send = "";
	var cond_value = pid + "????????????";
	
	setParameter("SMMMR05000_param_pinfo",cond_value);

	fLinkPopMenu("SMMMR05000", cond, send, "modal");
}


/**
 * @desc   : EMR - CONSULT(????????)
 * <pre>
 *           emr/medirecweb/xrw/SMMMR05000_CONSULT????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMMR05000(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMMR05000", cond, send, "modal");
}


/**
 * @desc   : EMR - 혈당간호기록
 * <pre>
 *           emr/carerecweb/xrw/SMMNR02500_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNR02500(){
	cond = "";
	send = "";

	var dschdd="";
	var pid="";
	var wardcd=""
 
 	dschdd = model.getValue("/root/main/item1/iteminfo/dschdd");
	pid    = model.getValue("/root/main/item1/iteminfo/pid");
	wardcd    = model.getValue("/root/main/item1/iteminfo/wardcd");
 
 	if(dschdd != "99991231") {
		  setParameter("SMMNR02500_pid", pid);
		  setParameter("SMMNR02500_dschdd", dschdd);
		  setParameter("SMMNR02500_wardcd", wardcd);
	 } else {
		  clearParameter("SMMNR02500_pid");
		  clearParameter("SMMNR02500_dschdd");
		  clearParameter("SMMNR02500_wardcd");	
	}

	fLinkPopMenu("SMMNR02500", cond, send, "modal");

	

}


/**
 * @desc   : EMR - ????????
 * <pre>
 *           emr/carerecweb/xrw/SMMNR00700_????????I.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNR00700(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMNR00700", cond, send, "modal");
}

/**
 * @desc   : EMR - ????????????????
 * <pre>
 *           
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMRI00400(pid){
	cond = "";
	send = "";
	setParameter("SMMRI00400_param_pid", pid);

	fLinkPopMenu("SMMRI00400", cond, send, "modal");
}


/**
 * @desc   : ?????????? - ERcensus
 * <pre>
 *           emr/ercareweb/xrw/SMMNE01700_???????????? ????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNE01300(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMNE01300", cond, send, "modal");
}

function fOpenSMMNE01700(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMNE01700", cond, send, "modal");
}

/**
 * @desc   : ?????????? - ??????triage
 * <pre>
 *           emr/ercareweb/xrw/SPMNE04400_??????Triage.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPMNE04400_1(pid, indd, cretno, sex, age, hngnm){
	cond = "";
	send = "";
	
	var cond_value = pid + "??"+ indd + "??"+ cretno + "??"+ sex + "??"+ age + "????"+ hngnm ;
	setParameter("SPMNE04400_param",cond_value);
	
	fLinkPopMenu("SPMNE04400", cond, send, "modal");
}


/**
 * @desc   : ?????????? - ??????triage(????????)
 * <pre>
 *           emr/ercareweb/xrw/SPMNE04400_??????Triage.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPMNE04400(){
	cond = "";
	send = "";
	fLinkPopMenu("SPMNE04400", cond, send, "modal");
}


/**
 * @desc   : ?????????? - ??????????????
 * <pre>
 *           emr/prcpmngtweb/xrw/SMMMO06300_??????????????????????.xrw
 * </pre>
 * @param  : pid, patnm, orddd
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMMO06300(pid, patnm, orddd){
	send = "/root/main/cond";
	cond = "/root/hidden/SMMMO06300_cond";
	
	model.makevalue("/root/hidden/SMMMO06300_cond/orddd", orddd);
	model.makevalue("/root/hidden/SMMMO06300_cond/pid", pid);
	model.makevalue("/root/hidden/SMMMO06300_cond/hngnm", patnm);

	fLinkPopMenu("SMMMO06300", cond, send, "modal");
}

/**
 * @desc   : ?????????? - ????????????
 * <pre>
 *           emr/carerecweb/xrw/SMMNR00900_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNR00900_1(pid, indd, cretno, instcd){
	cond = "";
	send = "";
	var cond_value = pid + "??" + indd + "??" + cretno + "??" + instcd + "??";
	
	setParameter("SMMNR00900_Param",cond_value);

	fLinkPopMenu("SMMNR00900", cond, send, "modal");
}

function fOpenSMMNR00900(){
	cond = "";
	send = "";
	
	fLinkPopMenu("SMMNR00900", cond, send, "modal");
}


/**
 * @desc   : ?????????? - ????????????(????????)
 * <pre>
 *           emr/carerecweb/xrw/SMMNR00900_????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNE04300(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMNE04300", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????
 * <pre>
 *           emr/wardcareweb/xrw/SMMNW01200_???????? ?? ????????.xrw
 * </pre>
 * @param  : pid, wardcd, dschdclrdt
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNW01200_1(pid, wardcd, dschdclrdt){
	cond = "";
	send = "";
	model.makevalue("/root/hidden/SMMNW01200_cond/list/pid", pid);
	model.makevalue("/root/hidden/SMMNW01200_cond/list/wardcd", wardcd);
	model.makevalue("/root/hidden/SMMNW01200_cond/list/dschdclrdt", dschdclrdt);
	
	var reqnode = instance1.selectNodes("/root/hidden/SMMNW01200_cond/list");
	
	var csv = getNodeListCSV(reqnode);
	setGlobalVariable("paminfo",csv);

	fLinkPopMenu("SMMNW01200", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????
 * <pre>
 *           emr/wardcareweb/xrw/SMMNW01200_???????? ?? ????????.xrw
 * </pre>
 * @param  : ????????????
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMNW01200(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMNW01200", cond, send, "modal");
}


/**
 * @desc   : ???????? - HSCT????????
 * <pre>
 *           pam/patinfomngtweb/xrw/SMPMC01600_BMT????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPMC01600(){
	cond = "";
	send = "";
	fLinkPopMenu("SMPMC01600", cond, send, "modal");
}


/**
 * @desc   : ???????? - HSCT??????????
 * <pre>
 *           ast/hsctweb/xrw/SMABO00800_??????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMABO00800(){
	cond = "";
	send = "";
	fLinkPopMenu("SMABO00800", cond, send, "modal");
}


/**
 * @desc   : ???????? - HSCT????????????
 * <pre>
 *           emr/medirecweb/xrw/SMMMR02100_HSCTSchedule.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMMR02100(){
	cond = "";
	send = "";
	fLinkPopMenu("SMMMR02100", cond, send, "modal");
}


/**
 * @desc   : ???????? - ??????????????
 * <pre>
 *           ast/hsctstemcellweb/xrw/SMABC00900_????????????????????????????.xrw
 * </pre>
 * @param  : pid, hngnm, main
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMABC00900(pid, hngnm, main){
	cond = "";
	send = "";
	
	var cond_value = pid + "??"+ hngnm + "??"+ main;
	   
	setParameter("opener_parameter_id",pid);
	
	fLinkPopMenu("SMABC00900", cond, send, "modal");
}


/**
 * @desc   : ???????? - HSCT????????
 * <pre>
 *           ast/hsctweb/xrw/SMABO00100_BMT????????.xrw
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMABO00100(pid){
	cond = "";
	send = "";
	
	var cond_value = pid;
	   
	setParameter("opener_parameter_id",cond_value);
	
	fLinkPopMenu("SMABO00100", cond, send, "modal");
}


/**
 * @desc   : ???????? - ??????????????????
 * <pre>
 *           ast/hsctstemcellweb/xrw/SMABC00300_??????????????????.xrw
 * </pre>
 * @param  : pid, prcpdd, execprcpuniqno, prcphopedd, fstrgstdt
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMABC00300(pid, prcpdd, execprcpuniqno, prcphopedd, fstrgstdt){
	cond = "";
	send = "";
	
	var cond_value = pid + "??" + prcpdd + "??" + execprcpuniqno + "??" + prcphopedd + "??" + fstrgstdt;
	   
	setParameter("opener_parameter_id",pid);
	
	fLinkPopMenu("SMABC00300", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????
 * <pre>
 *           pam/insubasecdmngtweb/xrw/SMPIB02400_???????????? ?? ????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPIB02400(){
	cond = "";
	send = "";
	fLinkPopMenu("SMPIB02400", cond, send, "modal");
}





/**
"
 * @desc   : ???????? - ??????????????????????(????????)
 * <pre>
 *           ast/pharmacyweb/xrw/SMADB01020_??????????????????????.xrw
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 * @JHP ??. 20090429 (???? ???? ????? ?????? ??) 
 */
function fOpenSMADB01020_2(pid){
	send = "/root/hidden/antisch";
	cond = "/root/hidden/SMADB01020_cond";


    model.makevalue("/root/hidden/SMADB01020_cond/pid", model.getValue("/root/main/prtlhislist/item/pid"));
	model.makevalue("/root/hidden/SMADB01020_cond/cpgappno", model.getValue("/root/main/prtlhislist/item/cpgappno"));
									
	fLinkPopMenu("SMADB01020", cond, send, "modal");
}

/**
 * @desc   : ???????? - ????????????(????????)
 * <pre>
 *         
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMRD02000(pid){
	send = "";
	cond = "";
	setParameter("SMMRD02000_pid", pid);
	
	fLinkPopMenu("SMMRD02000", cond, send, "modal");
}


/**
 * @desc   : ???????? - ????????????(????????)
 * <pre>
 *         
 * </pre>
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSPMRD02100(pid){
	send = "";
	cond = "";
	setParameter("SPMRD02100_pid", pid);
	
	fLinkPopMenu("SPMRD02100", cond, send, "modal");
}



/**
 * @desc   : ???????? - ??????????????
 * <pre>
 *           
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMMRD01100(pid, genrflagcd){
	cond = "";
	send = "";
	
	fLinkPopMenu("SMMRD01100", cond, send, "modal");
}



/**
 * @desc   : ???????? - ??????????????
 * <pre>
 *           
 * </pre>
 * @param  : pid
 * @return : 
 * @---------------------------------------------------
 */
function fOpenSMPAI03600(pid){
	cond = "";
	send = "";
	//setParameter("SMMRD02000_pid", pid);
	
	fLinkPopMenu("SMPAI03600", cond, send, "modal");
}