斷點

1、http://www.jar114.com/site.html
該網站可以提供我們項目中經常需要的jar包，如果缺少包，就可以在這里查找。

流程定義文件*.jpdl.xml中如果有中文亂碼，肯定是task中有中文。

需要在eclipse安裝軟件下，即E:\eclipse\eclipse.ini增加
-Dfile.encoding=UTF-8
然后重啟eclipse即可解決。

配置jbpm4工程的運行環境：
1、添加依賴庫。
E:\JBPM\jbpm-4.3\jbpm.jar
E:\JBPM\jbpm-4.3\lib下的jar包。

2、添加配置文件。
E:\JBPM\jbpm-4.3\examples\src下的配置文件拷貝到自己java工程的src下。

---------------------------------------------------------------
管理流程定義：發布流程定義、查看流程定義、刪除流程定義。
RepositoryService repositoryService = processEngine.getRepositoryService();

String deploymentId = repositoryService.createDeployment().addResourceFromClasspath

("helloworld.jpdl.xml").deploy();
List<ProcessDefinition> list = repositoryService.createProcessDefinitionQuery().list();  
repositoryService.deleteDeploymentCascade(deploymentId);
---------------------------------------------------------------

管理流程實例：發起新流程、執行等待的流程、查看流程實例、終止流程實例、刪除流程實例。
ExecutionService executionService = processEngine.getExecutionService();

ProcessInstance pi = executionService.startProcessInstanceByKey("helloworld");
ProcessInstance pi = executionService.signalExecutionById(pi.getId()); //執行等待的流程.
List<ProcessInstance> list = executionService.createProcessInstanceQuery().list();
executionService.endProcessInstance(pi.getId(), "cancel");
executionService.deleteProcessInstanceCascade(pi.getId());

TaskService taskService = processEngine.getTaskService();
taskService.completeTask(taskId, map);

控制流程的活動：Start、End、Decision、Fork、Join、Sub-process、State、task.
原子活動：java、script、sql、hql、email。

配置開發環境：
1、jbpm4：http://sourceforge.net/projects/jbpm/files/ 下選擇jbpm-4.3.zip  137.9M

2、eclipse3.5版本以上 : http://www.eclipse.org/downloads/ 下選擇 Eclipse IDE for Java EE  190M

3、GPD (Graphical Process Designer)插件，路徑：E:\jbpm-4.3\install\src\gpd\jbpm-gpd-site.zip。
通過Eclipse-->help-->Install New Software-->Add-->Archive到插件所在路徑。

 

java.lang.NullPointerException
 at jxl.read.biff.File.<init>(File.java:77)
 at jxl.Workbook.getWorkbook(Workbook.java:250)
 at jxl.Workbook.getWorkbook(Workbook.java:235)
 at org.drools.decisiontable.parser.xls.ExcelParser.parseFile(ExcelParser.java:76)
 at org.drools.decisiontable.SpreadsheetCompiler.compile(SpreadsheetCompiler.java:89)
 at org.drools.decisiontable.SpreadsheetCompiler.compile(SpreadsheetCompiler.java:68)
 at com.sample.DecisionTableTest.readDecisionTable(DecisionTableTest.java:59)
 at com.sample.DecisionTableTest.main(DecisionTableTest.java:36)

Drools調用readDecisionTable()方法里面一處為：
InputStream is = DecisionTableTest.class.getResourceAsStream("rules\\Sample.xls");
final String drl = converter.compile( is, InputType.XLS );       
需改為如下，取的class即錯誤解決。
InputStream is = DecisionTableTest.class.getClassLoader().getResourceAsStream("rules\\Sample.xls");
final String drl = converter.compile( is, InputType.XLS );

org.mvel.CompileException: can not resolve identifier: 'declr'
 at org.mvel.ASTNode.getReducedValue(ASTNode.java:315)
 at org.mvel.ast.PropertyASTNode.getReducedValue(PropertyASTNode.java:29)
 at org.mvel.MVELInterpretedRuntime.parseAndExecuteInterpreted(MVELInterpretedRuntime.java:103)
 at org.mvel.MVELInterpretedRuntime.parse(MVELInterpretedRuntime.java:51)
 at org.mvel.TemplateInterpreter.execute(TemplateInterpreter.java:428)
 at org.mvel.TemplateInterpreter.parse(TemplateInterpreter.java:320)
 at org.drools.rule.builder.dialect.java.AbstractJavaBuilder.generatTemplates(AbstractJavaBuilder.java:113)
 at org.drools.rule.builder.dialect.java.JavaConsequenceBuilder.build(JavaConsequenceBuilder.java:95)
 at org.drools.rule.builder.RuleBuilder.build(RuleBuilder.java:67)
 at org.drools.compiler.PackageBuilder.addRule(PackageBuilder.java:446)
 at org.drools.compiler.PackageBuilder.addPackage(PackageBuilder.java:304)
 at org.drools.compiler.PackageBuilder.addPackageFromDrl(PackageBuilder.java:167)
 at com.sample.DecisionTableTest.readDecisionTable(DecisionTableTest.java:63)
 at com.sample.DecisionTableTest.main(DecisionTableTest.java:36)

替換mvel.jar為mvel14-1.2.10.jar后不再報錯，好像是jar包的問題。
看了下jar包里面的org.mvel.ASTNode.getReducedValue方法已經注釋掉了。

WARNING: Wasn't able to correctly close stream for decision table. nulljava.lang.NullPointerException
 at jxl.read.biff.File.<init>(File.java:77)
 at jxl.Workbook.getWorkbook(Workbook.java:250)
 at jxl.Workbook.getWorkbook(Workbook.java:235)
 at org.drools.decisiontable.parser.xls.ExcelParser.parseFile(ExcelParser.java:76)
 at org.drools.decisiontable.SpreadsheetCompiler.compile(SpreadsheetCompiler.java:89)
 at org.drools.decisiontable.SpreadsheetCompiler.compile(SpreadsheetCompiler.java:68)
 at org.drools.decisiontable.SpreadsheetCompiler.compile(SpreadsheetCompiler.java:110)
 at com.sample.DecisionTableTest.readDecisionTable(DecisionTableTest.java:57)
 at com.sample.DecisionTableTest.main(DecisionTableTest.java:35)

在web項目中的原先的寫法為：
final String drl = converter.compile( "rules\\Sample.xls", InputType.XLS );

參考了下別人的寫法，改為下面的方式進行處理：  
InputStream is = DecisionTableTest.class.getClassLoader().getResourceAsStream("rules\\Sample.xls");
final String drl = converter.compile( is, InputType.XLS );

由于drools有新版本了，所以與MyEclipse整合進行了解下。
整合步驟如下：
1、下載MyEclipse 8.5；
2、在http://www.jboss.org/drools/downloads.html下載Drools Eclipse 3.5 Workbench 5.1 插件；
3、在E:\MyEclipse8.5下新建2個文件：links、myplugins。
E:\MyEclipse 8.5\links：放drools.link配置文件，內容為path=E:\\MyEclipse 8.5\\myplugins\\drools\\
E:\MyEclipse 8.5\myplugins：放drools文件，該E:\MyEclipse 8.5\myplugins\drools\eclipse下放置從網上下載的drools插件的features和plugins。
4、重啟MyEclipse 8.5即可看見drools圖標。
5、安裝Jboss：下載jboss-5.0.0.GA，解壓即可。
打開MyEclipse->window->Preference->MyEclipse->Servers->JBoss->JBoss 5.x進行jre及相關配置。

在命令行下運行java程序，出現如上異常Exception in thread "main" java.lang.UnsupportedClassVersionError。

主要是jdk的版本被oracle給換成低版本了。
可以在命令行下輸入：javac -version 查看版本，最后把%JAVA_HOME%\bin;添加到Oracle之前，再重開啟電腦，編譯，運行即可。

可以查考：http://hi.baidu.com/tianxingacer/blog/item/e628b947ffc54f016a63e5ac.html/cmtid/1fe1e9ae1dc5b9f6faed50d9

我的機器以前裝的是offices2003自帶的js調試工具，昨天按照上IE8后，js調試工具有時候是ie8的調試界面，有時是ie6的調試界面，經網上查找已找到原因。

主要是我把IE8的‘腳本’下的“啟動調試”給關了，所以最后只出現ie6的調試界面。

解決方法：打開IE8后，點擊"工具"->"開發人員工具",或者快捷鍵F12，會打開頁面調試窗口。

    今天用反編譯工具查看java源代碼，發現反編譯的java文件有錯誤，在網上了解了下，是原先開發人員對代碼做了一下加密處理。下面介紹一下java的混淆器Proguard。
    ProGuard 是一個免費的 Java類文件的壓縮，優化，混肴器。它刪除沒有用的類，字段，方法與屬性。使字節碼最大程度地優化，使用簡短且無意義的名字來重命名類、字段和方法 。eclipse已經把Proguard集成在一起了。

其他地方也有介紹，如下：http://blog.csdn.net/alex197963/archive/2008/07/07/2620603.aspx

1、當處理多個訪問相同數據的用戶時，通常可能出現三種問題:
臟讀
當應用程序使用了被另一個應用程序修改過的數據，而這個數據處于未提交狀態時，就會發生臟讀。第二個應用程序隨后會請求回滾被其修改的數據。第一個事務使用的數據就會被損壞，或者“變臟”。

不可重復的讀
當一個事務獲得了數據，而該數據隨后被一個單獨的事務所更改時，若第一個事務再次讀取更改后的數據，就會發生不可重復的讀。這樣，第一個事務進行了一個不可重復的讀。

虛讀
當事務通過某種查詢獲取了數據，另一個事務修改了部分該數據，原來的事務第二次獲取該數據時，就會發生虛讀。第一個事務現在會有不同的結果集，它可能包含虛讀。

 

2、Java.sql.Connection接口定義的隔離級別
TRANSACTION_NONE 說明不支持事務
TRANSACTION_READ_UNCOMMITTED 說明在提交前一個事務可以看到另一個事務的變化。這樣臟讀、不可重復的讀和虛讀都是允許的。
TRANSACTION_READ_COMMITTED 說明讀取未提交的數據是不允許的。這個級別仍然允許不可重復的讀和虛讀產生。
TRANSACTION_REPEATABLE_READ 說明事務保證能夠再次讀取相同的數據而不會失敗，但虛讀仍然會出現。
TRANSACTION_SERIALIZABLE 是最高的事務級別，它防止臟讀、不可重復的讀和虛讀。

3、事務的隔離級別
在J2EE中，通過java.sql.Connection接口設置事務隔離級別，這一接口為連接的隔離級別提供了getter()和setter()
Int getTransactionIsolation() throws SQLException
void setTransactionIsolation() throws SQLException
Connection對象負責事務，一旦收到事務請求，事務將自動提交，因為Connection對象已定義為自動提交方式，可通過setAutoCommit(false)禁用自動提交模式
另外java.sql.DatabaseMetaData接口為數據存儲提供支持的隔離級別查找方法：getTransactionIsolation(),supportsTransactionIsolationLevel()
對多個庫操作的分布式事務必須在所有庫中執行同一個隔離級別，否則會出現意想不到的結果

4、事務提交和回滾
為了完成提交事務和回滾事務，JDBC API包括了兩個方法作為 Connection 接口的一部分。若將 Connection 對象名稱指定為 con，通過調用 con.commit(); 可以保存程序狀態；

通過調用 con.rollback(); 可以返回到以前保存的狀態。如果數據庫實際運行操作時有錯誤發生，這兩個方法都會拋出 SQLExceptions，所以您需要在 try ... catch 塊中包裝它們。

5、批處理和事務
缺省情況下，JDBC 驅動程序運行在被稱為自動提交的模式下,可禁用自動提交模式
con.setAutoCommit(false);
批處理操作中通過在一次單獨的操作（或批處理）中執行多個數據庫更新操作
{con.setAutoCommit(false) ;
Statement stmt = connection.createStatement() ; stmt.addBatch("INSERT INTO people VALUES('Joe Jackson', 0.325, 25, 105) ; stmt.addBatch("INSERT INTO people

VALUES('Jim Jackson', 0.349, 18, 99) ; stmt.addBatch("INSERT INTO people VALUES('Jack Jackson', 0.295, 15, 84) ;
int[] updateCounts = stmt.executeBatch() ; con.commit() ;

Initial Capacity：池的連接數量，在啟動時創建
Maximun Capacity：這是池可以打開的連接的最大數量
Capacity Increment：成組地打開增量連接
Login Delay Seconds：池驅動程序在啟動時打開每一個新的連接需要等待的時間
Refresh Period(刷新周期)
Supports Local Transaction：只用于XA連接池
Allow Shrinking and Shrink Period(允許收縮和收縮期)：如果池的數量太大，超過了初始，且如果任何一個連接在收縮期內空閑，那么空閑的連接將在收縮期末關閉

監控JDBC連接池：
Waiters Hight字段指明了最多有多少客戶等待數據庫連接
Waiters字段告訴你當前有多少客戶正在等待連接
Connections Hight字段給出最大的并發連接數。
Wait Seconds Hight字段顯示了客戶等待數據庫連接的最長時間

1、連接：
直接連接(direct connection)
池連接(pooled connection)
連接復用 ,避免了數據庫連接頻繁建立、關閉的開銷 ；
對JDBC中的原始連接進行了封裝 ,隔離了應用的本身的處理邏輯和具體數據庫訪問邏輯 。

2、什么是連接池？
連接池是在Weblogic啟動時候預先建立的數據庫連接，由Weblogic在運行時負責維護。
可以減少程序每次數據庫請求都要新創建數據庫物理連接的時間及資源。
對數據庫屬性的更改只需通過控制臺進行，不需改動客戶端代碼

MultiPool
可以使用MultiPool為高用戶訪問量提供數據庫負載均衡，它使用簡單的循環算法將連接請求平衡分配MultiPool中的每一個池。

多池的作用：為防數據庫連接失敗提供冗余,備份或高有效池；為高用戶訪問量提供數據庫負載均衡，負載均衡池。
備份池：一個備份池由一個有順序的連接池列表組成。
負載均衡池：使用簡單的循環算法將連接請求平衡地分到在列表中的每一個池。

3、DataSource
數據源對應一個數據庫連接池。客戶程序可以通過數據源綁定的JNDI名字得到該數據源的引用，并通過數據源對象得到數據庫連接。

JDBC的API：
java.sql.DriverManager 
java.sql.Connection 
java.sql.ResultSet 
Javax.sql.RowSet:
javax.sql.Statement 　
java.sql.PreparedStatement:用于執行預編譯的SQL語句
java.sql.CallableStatement:用于執行在數據庫中定義的存儲過程 　　
Javax.sql.DataSource是java.sql.Connectioin對象的工廠并使用一個JNDI服務注冊它.

1、Type 1類型驅動，JDBC-ODBC橋
通常運行Windows平臺，需要在客戶端安裝ODBC驅動，早期Java訪問數據庫的主要方式，效率較低。

適用于快速的原型系統，沒有提供JDBC驅動的數據庫如Access ,由于包含多個驅動程序層，其性能一般不適合生產系統
Java-->JDBC-ODBC Bridge---->JDBC-ODBC Library--->ODBC Driver-->Database
驅動程序的類名稱是 sun.jdbc.odbc.JdbcOdbcDriver
JDBC URL 的形式為 jdbc:odbc:dsn(dsn 是使用 ODBC 管理員注冊數據庫的數據源名稱)
不是100%JAVA程序，與ODBC之間的接口采用非JAVA方式調用，因此不能在APPLET中使用
{
String url = "jdbc:odbc:jdbc" ;
Class.forName("sun.jdbc.odbc.JdbcOdbcDriver");
Connection con = DriverManager.getConnection(url, "java", "sun");
}

2、Type 2類型驅動，需要在客戶端安裝數據庫的本地驅動，JDBC請求會轉換為對數據庫本地API的調用。

利用開發商提供的本地庫來直接與數據庫通信。
Java-->JDBC-Driver-->DB Client Library-->Database
繞過了ODBC層，性能優于Type1
也稱為部分 Java 驅動程序，因為它們直接將 JDBC API 翻譯成具體數據庫的API
使用第二種模型將開發者限制在數據庫廠商的客戶機庫支持的客戶機平臺和操作系統
Oracle的OCI驅動就屬于Type2

3、Type 3類型驅動，DBC請求通過網絡服務器層實現，在網絡服務器層可以實現負載均衡，連接池管理等。

第三種驅動程序是純 Java 驅動程序，它將 JDBC API 轉換成獨立于數據庫的協議。JDBC 驅動程序并沒有直接和數據庫進行通訊；它和一個中間件服務器通訊，然后這個中間件服務器和數據庫進行通訊。這種額外的中間層次提供了靈活性：可以用相同的代碼訪問不同的數據庫，因為中間件服務器隱藏了 Java 應用程序的細節。要轉到不同的數據庫，您只需在中間件服務器上改變參數。（有一點需要注意：中間件服務器必須支持您訪問的數據庫格式。）
第三種驅動程序的缺點是，額外的中間層次可能有損整體系統性能。另一方面，如果應用程序需要和不同的數據庫格式進行交互，第三種驅動程序是個有效的方法，因為不管底層的數據庫是什么，都使用同樣的 JDBC 驅動程序。另外，因為中間件服務器可以安裝在專門的硬件平臺上，可以利用總的結果進行一些優化。
Java--->Jdbc Driver(Type3 jdbc driver)----->java middleware--->JDBC Driver---->Database
Weblogic的Pool驅動程序就是一個Type3的JDBC驅動程序。

4、Type 4類型驅動，為純Java實現，不需要任何客戶端設置。
OCI驅動程序利用Java本地化接口（JNI），通過Oracle客戶端軟件與數據庫進行通訊。Thin驅動程序是純Java驅動程序，它直接與數據庫進行通訊。

JDBC應用的兩種架構
兩層架構：客戶程序直接對數據庫發起JDBC請求，Type1、2、4支持兩層架構。
多層架構：客戶程序將JDBC請求發送到中間層，中間層再將請求發送到數據庫。

通常應用系統會根據用戶數、并發數、用戶的行為等等來確定具體的性能目標，如果確定應用程序不能滿足性能目標，那么就需要優化、重構程序并調整JVM、應用服務器、數據庫、OS 或者改變硬件配置等等。

影響Java 性能的主要因素：
硬件，如CPU、內存、體系結構等等
操作系統
數據庫系統
JVM
應用服務器
數據庫服務器
網絡環境
應用架構及程序編寫水平

性能調整的步驟：
1、 使用工具測試系統是否滿足性能目標
2、 發現性能瓶頸
3、 假設瓶頸的原因
4、 測試你的假設
5、 如果假設成立，更改這一部分
6、 測試確定更改是否可以提高性能，衡量性能提高的程度
7、重復以上步驟，直到獲得可以接受的性能。

J2EE性能不好時的現象，主要表現在對客戶端的請求響應很慢：
一向很慢：應用的響應總是很慢，改變環境(如應用負載、數據庫的連接池數量等等)，對響應時間的影響不大。

越來越慢：在相同的負載情況下，隨著系統運行的時間的增長，系統越來越慢，這可能是系統已到達極限或是系統死鎖和錯誤引起的。

低于負載時會越來越慢(Slower and slower under load):.

偶爾的掛起或異常錯誤(Sporadic hangs or aberrant errors):有時這可能是由于負載的變化或其他情況引起的可以預測的死鎖(Foreseeable lock ups): 掛起或最初只有少量錯誤，但隨著時間的推移整個系統都鎖上了，典型地這可能是為的適應"management by restarts.“

突發性的混亂(Sudden chaos): 系統已運行了一段時間(如一個小時或可能是三、四天)，性能穩定并可以接受, 突然沒有任何理由，開始出錯或死鎖了。

監控工具：
WebLogic Server的控制臺
cpu
內存
JDBC
輔助的工具
Jprobe
Optimizit
Vtune
TowerJ Performance

WebLogic Server 10的下載地址：
http://www.oracle.com/technology/software/products/ias/htdocs/wls_main.html

1、域（Domains）
域是管理的單元或邊界；
作為一個單元來管理的，并相互關聯的一組Weblogic 服務器資源被稱為域；
域由單一的管理服務器來管理。

2、機器（Machines）
可以對應到服務器所在的物理硬件；
可以是Unix或non-Unix類型；
可以用來遠程管理和監控；

3、服務器（Servers）
服務器是執行在單一Java虛擬機 （JVM）中weblogic.Server類的實例。
服務器：最多和一個WLS機器關聯；占用一定數量的RAM ；是多線程的。

4、管理服務器(Administration server)
對整個域的集中控制
XML配置存儲庫的保存者
日志信息的集中保存

5、被管理服務器(Managed Server)
WebLogicServer的一個實例；
從管理服務器遠程加載配置信息‘；
可以是也可以不是集群的一部分。

6、集群 （Clustering）
WebLogic集群技術指通過一組服務器共同 工作，在多臺機器間復制應用表示層和應用邏輯層的能力，實現關鍵業務系統的負載分布，消除個別故障點；集群用來實現負載均衡和容錯。

1、J2EE應用開發的核心組件。
Servlet： 處理HTTP請求，產生響應。
JSP：Java Server Pages ，同Servlet。其中包含了HTML和JSP標簽、Java代碼和其他信息。
EJB：EJB服務端組件模型簡化了具有交互性、擴展性和移植性中間組件的開發。EJB一般用于實現系統的業務邏輯。

2、J2EE的相關技術
核心：Servlet 、JSP、EJB
數據庫：JDBC
命名和目錄服務：JNDI
消息服務：JMS( Java Message Service )
Email：Java Mail
分布式計算：RMI、RMI-IIOP
事務：JTA（Java Transaction API）
數據格式化：XML、HTML、XSL
協議：TCP/IP、HTTP(S)、IIOP、SSL
安全：JAAS

3、J2EE的4層結構
客戶層（瀏覽器）
Web層（HTML、Servlet、JSP）
業務層（EJB）
EIS層（關系數據庫）

4、J2EE的Application Server：
Tomcat
BEA Weblogic
IBM Websphere
Oracle Application Server
Sun Java System
Jboss
Borland AppServer
Sybase Application Server
HP Application Server
Apusic

5、集成開發工具：
Borland：JBuilder
Oracle ：JDeveloper
Bea ：WebLogic Workshop
IBM：Websphere Studio
Sun：NetBeans
MyEclipse

在小型的應用系統或者有特殊需要的系統中，可以使用一個免費的Web服務器Tomcat，該服務器支持全部JSP以及Servlet規范，但是目前還不支持EJB。

在Java相關的開發領域中，常用的是3種數據庫：Oracle、DB2和MySQL。有時候也使用微軟公司的SQL Server數據庫服務器 。

DateUtils.compareYear(regDate, base.getTInsrncBgnTm()) // 新舊車標志【保險起期 - 初登年月】 單位：年

//顯示輸入框錄入的字符位數。 ztf 10.07.19
function displayLength(obj) {
 var lenSpan = document.getElementById("lenSpan");
 if (lenSpan == null) {
  lenSpan = document.createElement("SPAN");
  lenSpan.id = "lenSpan";
  obj.parentNode.appendChild(lenSpan);
 }
 lenSpan.innerText = "已輸入" + obj.value.length + "位";
}

onkeyup="displayLength(this)"進行js調用。

--情況1：多個參數的傳遞，由于多個文件編碼不一致，可能出現亂碼。

window.open(base+"/policy/universal/pop/flat_vhl_inf_query.jsp?

cLcnNo="+objPlateNo.value+"&cEngNo="+objEngNo.value+"&cVhlFrm="+objFrmNo.value+"&cPlateTy

p="+objPlateTyp+"&cProdNo="+objCProdNo+"&cDptCde="+objCDptCde+"&cNewMrk="+objNewMrk.value

+"&cEcdemicMrk="+objEcdemicMrk.value,"","scrollbars=yes,left=100,top=150,Toolbar=no,Locat

ion=no,Direction=no,Resizeable=no,Width="+800+" ,Height="+400);

--相應的jsp獲得參數
<% 
 String CProdNo = request.getParameter("prodNo");
 String CDptCde = request.getParameter("dptCde");

 String CPlateNo = request.getParameter("plateNo");

 String CFrmNo = request.getParameter("frmNo");
 
 if("".equals(CPlateNo)&&"".equals(CFrmNo)){
  return;
 }
     
 String dwName = "policy.pub.flat_vhl_inf_DW";
%>

--情況2：解決亂碼的問題。
function tool_uploadFile(clmNo,billType,maxFileNum,fileType,singleLimit,totalLimit) {//解決亂碼的問題，增加變量paramObj。ztf 10.06.01
 var paramObj = {
  "clmNo" : clmNo,
  "billType" : billType,
  "maxFileNum" : maxFileNum,
  "fileType" : fileType,
  "singleLimit" : singleLimit,
  "totalLimit" : totalLimit
 };
 var r = window.showModalDialog(global.WEB_APP_NAME+"/core/jsp/common/uploadFile.jsp",paramObj,"dialogHeight:610px;dialogWidth:530px;center:1;help: 0; status: 0;");
 return r;
}

--在相應的jsp頁面通過js獲得參數：
<html>
  <head>
    <title>文件上傳</title>
  </head>
  <script type="text/javascript" src="<%=webApp%>/core/js/core/Tool.js"></script>
  <body bgcolor="#85b7ec">
 
  <script>
 var paramObj = window.dialogArguments;
 var clmNo = paramObj.clmNo;
 var billType = paramObj.billType;
 var maxFileNum = paramObj.maxFileNum;
 var fileType = paramObj.fileType;
 var singleLimit = paramObj.singleLimit;
 var totalLimit = paramObj.totalLimit;
 tool.loadApplet('<%=agentIp%>','<%=agentPort%>','<%=orgId%>',clmNo,billType,maxFileNum,fileType,singleLimit,totalLimit);
  </script>

</body>
</html>

vReturnValue = window.showModalDialog(sURL [, vArguments] [, sFeatures])

1、具體業務中用到的sql，這個是查找最近標志為1，且有多條記錄的數據。 (這個sql查找錯誤比較有用。)
select a.c_ply_no ,count(1) from web_ply_base a
where  a.c_latest_mrk='1'
group by  a.c_ply_no
having count(1)>1

 

背景count(*)   count(1)   兩者比較，主要還是要count(1)所相對應的數據字段：
  如果你的數據表沒有主鍵，那么count(1)比count(*)快  
  如果有主鍵的話，那主鍵（聯合主鍵）作為count的條件也比count(*)要快  
  如果你的表只有一個字段的話那count(*)就是最快的啦
  如果count(1)是聚索引,id,那肯定是count(1)快。但是差的很小的。  
  因為count(*),自動會優化指定到那一個字段。所以沒必要去count(?)，用count(*),sql會幫你完成優化的.
其他語句：select * from 表名 where 條件 order by 字段名 asc\desc     // asc 升序    desc  降序

2、C_Nme_En匹配多個 like 查詢。
select distinct C_Spec_No
  from WEB_Prd_Fix_Spec
 WHERE C_Spec_No in (SELECT C_Spec_No
                       FROM web_Prd_Prod_Spec_Rel
                      WHERE C_Prod_No = '0326'
                        and C_Spec_No like '89%')
   and (C_Nme_En like '%000000%' or C_Nme_En like '%030006%' or
       C_Nme_En like '%030061%')

--遞歸，樹狀結構的存儲與展示
drop table article;
create table article
(
id number primary key,
count varchar2(4000),
pid number,
isleaf number(1), --0 代表非葉子節點，1代表葉子節點
alevel number(2)
);

insert into article values(1,'螞蟻大戰大象',0,0,0);
insert into article values(2,'大象被打趴下',1,0,1);
insert into article values(3,'螞蟻也不好過',2,1,2);
insert into article values(4,'瞎說',2,0,2);
insert into article values(5,'沒有瞎說',4,1,3);
insert into article values(6,'怎么可能',1,0,1);
insert into article values(7,'怎么沒有可能',6,1,2);
insert into article values(8,'可能性是很大的',6,1,2);
insert into article values(9,'大象進醫院了',2,0,2);
insert into article values(10,'護士是螞蟻',9,1,3);
commit;

螞蟻大戰大象
    大象被打趴下了
        螞蟻也不好過
        瞎說
            沒有瞎說
        大象進醫院了
            護士是螞蟻
    怎么可能
        怎么沒有可能
        可能性是很大的
 

--用存儲過程展現樹狀結構。
create or replace procedure p(v_pid article.pid%type,v_level binary_integer) is
  cursor c is select * from article where pid = v_pid;
  v_preStr varchar2(1024) := '';
begin
  for i in 0..v_level loop
    v_preStr := v_preStr || '****';
  end loop;

  for v_article in c loop
    dbms_output.put_line(v_preStr ||v_article.cont);
    if(v_article.isleaf=0) then
       p(v_artile.id,v_levle +1);
    end if;
  end loop;
end;

--觸發器
create table emp2_log
(
uname varchar2(20);
action varchar2(10);
atime date
);

create or replace trigger trig
  after insert or delete or update on emp2 for each row
begin
  if inserting then
     insert into emp2_log values (USER,'insert',sysdate); --USER關鍵字，用戶。
  elsif updating then
     insert into emp2_log values (USER,'update',sysdate);
  elsif deleting then
     insert into emp2_log values (USER,'delete',sysdate);
  end if;
end;

update emp2 set sal = sal*2 where deptno = 30;
select * from emp2_log;

drop trigger trig;

--直接執行時，出現違反完整約束條件，已找到子記錄。
update dept set deptno = 99 where deptno = 10;

--使用下面的，把子表一起更新。
create or replace trigger trig
  after update on dept for each row
begin
  update emp set deptno =:NEW.deptno where deptno =:OLD.deptno;
end;

update dept set deptno = 99 where deptno = 10;

select * from emp;
rollback;

--函數
create or replace function sal_tax
   (v_sal number)
   return number
is
begin
  if(v_sal < 2000) then
    return 0.10;
  elsif(v_sal < 2750) then
    return 0.15;
  else
    return 0.20;
  end if;
end;

數據庫定義的函數money_to_chinese ，把數字轉換正中文輸出。
create or replace function money_to_chinese(money in VARCHAR2)
   return varchar2 is
     c_money   VARCHAR2(12);
     m_string VARCHAR2(60) := '分角圓拾佰仟萬拾佰仟億';
     n_string VARCHAR2(40) := '壹貳叁肆伍陸柒捌玖';
     b_string VARCHAR2(80);
     n         CHAR;
     len       NUMBER(3);
     i         NUMBER(3);
     tmp       NUMBER(12);
     is_zero   BOOLEAN;
     z_count   NUMBER(3);
     l_money   NUMBER;
     l_sign    VARCHAR2(10);

   BEGIN
     l_money := abs(money);
     IF money < 0 THEN
       l_sign := '負' ;
     ELSE
       l_sign := '';
     END IF;
     tmp      := round(l_money, 2) * 100;
     c_money := rtrim(ltrim(to_char(tmp, '999999999999')));
     len      := length(c_money);
     is_zero := TRUE;
     z_count := 0;
     i        := 0;
     WHILE i < len LOOP
       i := i + 1;
       n := substr(c_money, i, 1);
       IF n = '0' THEN
         IF len - i = 6 OR len - i = 2 OR len = i THEN
           IF is_zero THEN
             b_string := substr(b_string, 1, length(b_string) - 1);
             is_zero   := FALSE;
           END IF;
           IF len - i = 6 THEN
             b_string := b_string || '萬';
           END IF;
           IF len - i = 2 THEN
             b_string := b_string || '圓';
           END IF;
           IF len = i THEN
              IF (len = 1) THEN
                 b_string := '零圓整';
              ELSE
                 b_string := b_string || '整';
              END IF;
           END IF;
           z_count := 0;
         ELSE
           IF z_count = 0 THEN
             b_string := b_string || '零';
             is_zero   := TRUE;
           END IF;
           z_count := z_count + 1;
         END IF;
       ELSE
         b_string := b_string || substr(n_string, to_number(n), 1) ||
                     substr(m_string, len - i + 1, 1);
         z_count   := 0;
         is_zero   := FALSE;
       END IF;
     END LOOP;
     b_string := l_sign || b_string ;
     RETURN b_string;
exception
   --異常處理
    WHEN OTHERS THEN
       RETURN(SQLERRM);
END;

--創建存儲過程：
create or replace procedure p
is
  cursor c is
  select * from emp2 for update;
begin
  for v_temp in c loop 
    if(v_temp.deptno = 10) then
      update emp2 set sal = sal+10 where current of c;
    elsif(v_temp.deptno = 20) then
      update emp2 set sal = sal+20 where current of c;
    else
       update emp2 set sal = sal+50 where current of c;
    end if;
  end loop;
  commit;
end;

--執行：
exec p;

begin
p;
end;

--帶參數的存儲過程，in傳入參數，默認為傳入，out傳出。
create or replace procedure p
   (v_a in number,v_b number,v_ret out number,v_temp in out number)
is
begin
  if(v_a >v_b) then
    v_ret := v_a;
  else
    v_ret := v_b;
  end if;
  v_temp :=v_temp +1;
end;

declare
  v_a number := 3;
  v_b number := 4;
  v_ret number;
  v_temp number := 5;
begin
  p(v_a,v_b,v_ret,v_temp);
  dbms_output.put_line(v_ret);
  dbms_output.put_line(v_temp);
end;

--游標
declare
  cursor c is
    select * from emp;
  v_emp c%rowtype;
begin
  open c;
  loop
    fetch c into v_emp;
    exit when(c%notfound);
    dbms_output.put_line(v_emp.ename);
  end loop;
  close c;
end;

declare
  cursor c is
    select * from emp;
  v_emp emp%rowtype;
begin
  open c;
  fetch c into v_emp;
    while(c%found) loop
      dbms_output.put_line(v_emp.ename);
      fetch c into v_emp;
      --fetch c into v_emp; 導致第一條沒有打印，最后一條打印2遍。
      --dbms_output.put_line(v_emp.ename);
  end loop;
  close c;
end;

declare
  cursor c is
    select * from emp;
begin
  for v_emp in c loop
    dbms_output.put_line(v_emp.ename);
  end loop;
end;

--帶參數的游標
declare
  cursor c(v_deptno emp.deptno%type,v_job emp.job%type)
  is
    select ename,sal from emp where deptno =v_deptno and job= v_job;
    --v_temp c%rowtype;
begin
  for v_temp in c(30,'CLERK') loop  --for自動打開游標。
    dbms_output.put_line(v_temp.ename);
  end loop;
end;

--可更新的游標
declare
  cursor c
  is
    select * from emp2 for update;
    --v_temp c%rowtype;
begin
  for v_temp in c loop 
    if(v_temp.sal <2000) then
      update emp2 set sal = sal*2 where current of c;
    elsif(v_temp.sal = 5000) then
      delete from emp2 where current of c;
    end if;
  end loop;
  commit;
end;

PLSql是SQL的補充，PL過程語言procedure language，SQL：Structured Query Language。
PLSql    帶有分支、循環的語言，SQL沒有分支、循環的語言。

set serveroutput on;

-- 簡單的PL/SQL語句塊
declare
 v_name varchar2(20);
begin
  v_name :='myname';
  dbms_output.put_line(v_name);
end;
/

--語句塊的組成
declare
 v_num number := 0 ;
begin
  v_num := 2/v_num;
  dbms_output.put_line(v_num);
exception
  when others then
     dbms_output.put_line('error');
end;
/

--變量聲明的規則
1、變量名不能夠使用保留字，如from、select等
2、第一個字符必須是字母
3、變量名最多包含30個字符
4、不要與數據庫的表或者列同名
5、每一行只能聲明一個變量

--常用變量類型
1、binary_integer：整數，主要用來計數而不是用來表示字段類型
2、number：數字類型
3、char：定長字符串
4、varchar2：變長字符串
5、date：日期
6、long：長字符串，最長2GB
7、boolean：布爾類型，可以取值true、false和null值

--變量聲明
declare
  v_temp number(1);
  v_count binary_integer :=0;
  v_sal number(7,2):= 4000.00;
  v_date date:= sysdate;
  v_pi constant number(3,2) := 3.14;  --constant相當java的final常量
  v_valid boolean := false;
  v_name varchar2(20) not null :='MyName';
begin
  dbms_output.put_line('v_temp value:'|| v_temp);
end;
 

--變量聲明，使用%type屬性
declare
  v_empno number(4);
  v_empno2 emp.empno%type;
  v_empno3 v_empno2%type;
begin
  dbms_output.put_line('Test');
end;

--簡單變量賦值
declare
  v_name varchar2(20);
  v_sal number(7,2);
  v_sal2 number(7,2);
  v_valid boolean :=false;
  v_date date;
begin
  va_name :='MyName';
  v_sal :=23.77;
  v_sal2 :=23.77;
  v_valid:=(v_sal = v_sal2);
  v_date:=to_date('1999-08-12 12:23:38','YYYY-MM-DD HH24:MI:SS');  
end;

--Table變量類型，定義一種新的類型，是數組。
declare
  type type_table_emp_empno is table of emp.empno%type index by binary_integer;
  v_empno type_table_emp_empno;
begin
  v_empnos(0) := 7369;
  v_empnos(2) := 7839;
  v_empnos(-1) := 9999;
  dbms_output.put_line(v_empnos(-1));
end;

--Record變量類型,類似java的類的概念。
declare
  type type_record_dept is record
  (
    deptno dept.deptno%type,
    dname dept.dname%type,
    loc dept.loc%type
  );
  v_tmp type_record_dept;
begin
  v_tmp.deptno := 50;
  v_tmp.dname := 'aaaa';
  v_tmp.loc := 'bj';
  dbms_output.put_line(v_temp.deptno||''||v_temp.dname);
end;

--使用%rowtype聲明Record變量
declare
  v_temp dept%rowtype;
begin
  v_tmp.deptno := 50;
  v_tmp.dname := 'aaaa';
  v_tmp.loc := 'bj';
  dbms_output.put_line(v_temp.deptno||''||v_temp.dname);
end;

--SQL語句的運用，返回數據有且只有一條記錄。
declare
  v_ename emp.ename%type;
  v_sal emp.sal%type;
begin
  select ename,sal into v_ename,v_sal from emp where empno = 7369;
  dbms_output.put_line(v_ename||''||v_sal);
end;

declare
  v_emp emp%rowtype;
begin
  select * into v_emp from emp where empno = 7369;
  dbms_output.put_line(v_emp.ename);
end;

declare
   v_deptno dept.deptno%type := 50;
   v_dname dept.dname%type := 'aaaa';
   v_loc dept.loc%type := 'bj';
begin
  insert into dept2 values (v_deptno,v_dname,v_loc);
  commit;
end;

declare
  v_deptno emp2.deptno%type := 10;
  v_count number ;
begin
  --update emp2 set sal = sal/2 where deptno = v_deptno;
  --select deptno into v_deptno from emp2 where empno = 7369;
  select count(*) into v_count from emp2;
  dbms_output.put_line(sql%rowcount||'條記錄被影響');
  commit;
end;

DDL語句：
begin
  execute immediate 'create table T(nnn varchar2(20) default ''aaa'')';
end;

--if語句：取出7369的薪水，如果<1200，則輸出'low'，如果<2000則輸出'middle'，否則'high'
declare
  v_sal emp.sal%type;
begin
  select sal into v_sal from emp where empno = 7369;
  if(v_sal < 1200) then
    dbms_output.put_line('low');
  elsif(v_sal < 2000) then
    dbms_output.put_line('middle');
  else
    dbms_output.put_line('high');
  end if;
end;

--循環
declare
  i binary_integer := 1;
begin
  loop
    dbms_output.put_line(i);
    i := i+ 1;
    exit when (i >= 11);
  end loop;
end;

declare
  j binary_integer := 1;
begin
  while j< 11 loop
    dbms_output.put_line(j);
    j := j+ 1;
  end loop;
end;

begin
  for k in 1..10 loop
    dbms_output.put_line(k);
  end loop;

  for k in reverse 1..10 loop
    dbms_output.put_line(k);
  end loop;
end;

--錯誤處理
declare
  v_temp number(4);
begin
  select empno into v_temp from emp where deptno = 10;
exception
  when too_many_rows then
    dbms_output.put_line('太多記錄了');
  when others then
    dbms_output.put_line('error');
end;

declare
  v_temp number(4);
begin
  select empno into v_temp from emp where empno = 2222;
exception
  when no_data_found then
    dbms_output.put_line('沒數據');
end;

create table errorlog
(
id number primary key,
errcode number,
errmsg varchar2(1024),
errdate date
);

create sequence seq_errorlog_id start with 1 increment by 1;

declare
  v_deptno dept.deptno%type := 10;
  v_errmsg varchar2(1024);
begin
  delete from dept where deptno = v_deptno;
  commit;
exception
  when others then
  rollback;
  v_errcode := SQLCODE;  --關鍵字，代表出錯的代碼。
  v_errmsg := SQLERRM;
  insert into errorlog values (seq_errorlog_id.nextval,v_errcode,v_errmsg,sysdate);
  commit;
end;