login.jsp 您的应用部署成功了！
系统语言选择: language.action
tch ejb+struts2 示例: mypsn-t_mypsn-list.action
tch ejb+struts2+xml 示例: SEMAR
tch ejb+jsp 示例: t_mypsn_list.jsp
tch jsquery+jsp (Ajax) 示例: t_mypsn_jslist.jsp
其数据库示例脚本：
Create Table tc_bqs.T_MYPSN /*特殊工作人员*/ ( nId Number(8,0) NOT NULL, /*编号*/ sUserNameCn varchar2(20) not null, /*姓名*/ sPID varchar2(18) , /*身份号码*/ sNation varchar(10) , /*民族*/ dDob Date , /* 出生日期*/ sJob varchar2(30) , /*工作*/ sDetail varchar2(500) , /*表现*/ sZzBack varchar2(500), /*政治背景*/ dLogDate Date , /*物建时间*/ sLogMan varchar2(16), /*物建推荐人*/ sLogOrg varchar2(30), /*物建单位*/ Primary key(nId) ) / CREATE SEQUENCE TC_BQS.SEQ_T_MYPSN_NID /*序列*/ INCREMENT BY 1 START WITH 100 MAXVALUE 100000000 MINVALUE 100 NOCYCLE NOCACHE NOORDER / CREATE Or Replace PROCEDURE tc_bqs.PROC_t_mypsn /*T_MYPSN*/ ( lvnid IN OUT NUMBER, --编　　号 lvsusernamecn VARCHAR2, --姓　　名 lvspid VARCHAR2, --身份号码 lvsnation VARCHAR2, --民　　族 lvddob DATE, -- 出生日期 lvsjob VARCHAR2, --工　　作 lvsdetail VARCHAR2, --表　　现 lvszzback VARCHAR2, --政治背景 lvdlogdate DATE, --物建时间 lvslogman VARCHAR2, --物建推荐人 lvslogorg VARCHAR2, --物建单位 lv_ProcMode Varchar2 /* 存储模式 PMINSERT,PMUPDATE,PMCANCEL,PMDELETE*/ ) AS BEGIN --begin TRAN IF lv_procMode='PMINSERT' THEN /*登记*/ Select TC_BQS.SEQ_T_MYPSN_NID.Nextval into lvnid From dual; /*编　　号序列*/ INSERT into tc_bqs.t_mypsn ( nid, --编　　号 susernamecn, --姓　　名 spid, --身份号码 snation, --民　　族 ddob, -- 出生日期 sjob, --工　　作 sdetail, --表　　现 szzback, --政治背景 dlogdate, --物建时间 slogman, --物建推荐人 slogorg --物建单位 )values( lvnid, --编　　号 lvsusernamecn, --姓　　名 lvspid, --身份号码 lvsnation, --民　　族 lvddob, -- 出生日期 lvsjob, --工　　作 lvsdetail, --表　　现 lvszzback, --政治背景 lvdlogdate, --物建时间 lvslogman, --物建推荐人 lvslogorg --物建单位 ); -- 返回值 END IF; IF lv_procMode='PMUPDATE' THEN /*更新*/ UPDATE tc_bqs.t_mypsn Set nid=lvnid, --编　　号 susernamecn=lvsusernamecn, --姓　　名 spid=lvspid, --身份号码 snation=lvsnation, --民　　族 ddob=lvddob, -- 出生日期 sjob=lvsjob, --工　　作 sdetail=lvsdetail, --表　　现 szzback=lvszzback, --政治背景 dlogdate=lvdlogdate, --物建时间 slogman=lvslogman, --物建推荐人 slogorg=lvslogorg --物建单位 Where 1=1 and nid=lvnid --编　　号 ; END IF; IF lv_procMode='PMCANCEL' THEN /*注销*/ UPDATE tc_bqs.t_mypsn Set nid=lvnid, --编　　号 susernamecn=lvsusernamecn, --姓　　名 spid=lvspid, --身份号码 snation=lvsnation, --民　　族 ddob=lvddob, -- 出生日期 sjob=lvsjob, --工　　作 sdetail=lvsdetail, --表　　现 szzback=lvszzback, --政治背景 dlogdate=lvdlogdate, --物建时间 slogman=lvslogman, --物建推荐人 slogorg=lvslogorg --物建单位 Where 1=1 and nid=lvnid --编　　号 ; END IF; IF lv_procMode='PMDELETE' THEN /*删除*/ DElETE FROM tc_bqs.t_mypsn Where 1=1 and nid=lvnid --编　　号 ; END IF; Commit; END; /*存储过程结束*/ /