java調(diào)用AS400中對(duì)連接的管理

AS/400供了一些代碼示例。要連接到AS/400JavaAS400AS/400務(wù)器類型，AS400AS/400AS/400上的數(shù)據(jù)的接口。著重：假若是在建立“企業(yè)JavaBean”，則需要遵從EJB允許AS/400ToolboxforJava線程。AS/400持下列各項(xiàng)：JDBC程序調(diào)用和命令調(diào)用集成文件系統(tǒng)網(wǎng)絡(luò)打印數(shù)據(jù)隊(duì)列記錄級(jí)存取著重：假若應(yīng)用程序不嘗試同時(shí)執(zhí)行兩個(gè)都需要網(wǎng)絡(luò)打印服務(wù)器的任務(wù)，則打印類著重：假若應(yīng)用程序不嘗試同時(shí)執(zhí)行兩個(gè)都需要網(wǎng)絡(luò)打印服務(wù)器的任務(wù)，則打印類AS/400打印服務(wù)器的多個(gè)附加套接字連接。在5分鐘之內(nèi)未使用的額外會(huì)話將斷開。Java程序可控制與AS/400的連接數(shù)目。為了優(yōu)化通信性能，Java程序可AS/400AS4001AS/400的多個(gè)套接字連接。1.為同一個(gè)AS/400系統(tǒng)建立多個(gè)AS400Java程序AS/400AS4002了連接的數(shù)目，從而削減了在AS/400系統(tǒng)上使用的資源量。2.為同一個(gè)AS/400系統(tǒng)建立單個(gè)AS400Java程序下列示例顯示如何建立和使用AS400類：1：在下列示例中，將建立兩個(gè)CommandCall對(duì)象，它們向同一個(gè)AS/400CommandCallAS400AS/400系統(tǒng)的連接。//CreateanAS400object.AS400sys=new//CreateanAS400object.AS400sys=newAS400("mySystem.myC");//CreatetwoCommandcallobjectsthatuse//thesameAS400object.CommandCallcmd1=newCommandCall(sys,"myCommand1");CommandCallcmd2=newCommandCall(sys,"myCommand2");//Runthecommands.Aconnectionismadewhenthe//firstcommandisrun.Sincetheyusethesame//AS400objectthesecondcommandobjectwilluse//theconnectionestablishedbythefirstcommand.cmd1.run();cmd2.run();示例2：在下列示例中，將建立兩個(gè)CommandCall對(duì)象，它們向同一個(gè)AS/400CommandCallAS400AS/400系統(tǒng)的連接。//CreatetwoAS400objectstothesameAS/400system.AS400sys1=new//CreatetwoAS400objectstothesameAS/400system.AS400sys1=newAS400("mySystem.myC");AS400sys2=newAS400("mySystem.myC");//Createtwocommandcallobjects.Theyuse//differentAS400objects.CommandCallcmd1=newCommandCall(sys1,"myCommand1");CommandCallcmd2=newCommandCall(sys2,"myCommand2");//Runthecommands.Aconnectionismadewhenthe//firstcommandisrun.Sincethesecondcommand//objectusesadifferentAS400object,asecond//connectionismadewhenthesecondcommandisrun.cmd1.run();cmd2.run();示例3：在下列示例中，經(jīng)過使用同一個(gè)AS400對(duì)象，建立一個(gè)CommandCallIFSFileInputStreamCommandCallIFSFileInputStream對(duì)象使用AS/400系統(tǒng)上的不同服務(wù)，所以建立了兩個(gè)連接。//CreateanAS400object.AS400sys=new//CreateanAS400object.AS400sys=newAS400("mySystem.myC");//CreateaCommandcallobject.CommandCallcmd=newCommandCall(sys,"myCommand1");//CreatetheFileobject.Creatingitcausesthe//AS400objecttoconnecttotheFileService.IFSFileInputStreamfile=newIFSFileInputStream(sys,"/myfile");//Runthecommand.Aconnectionismadetothe//commandServicewhenthecommandisrun.cmd.run();Java程序可控制連接的啟動(dòng)時(shí)間和結(jié)束時(shí)間。缺省情況下AS/400上的信息，就會(huì)啟動(dòng)一個(gè)連接。經(jīng)過對(duì)AS400對(duì)象調(diào)用connectService()AS/400連接。AS/400AS/400Java1：此示例顯示如何預(yù)先與AS/400連接：//CreateanAS400object.AS400system1=new//CreateanAS400object.AS400system1=newAS400("mySystem.myC");//Connecttothecommandservice.Doitnow//insteadofwhendataisfirstsenttothe//commandservice.Thisisoptionalsincethe//AS400objectwillconnectwhennecessary.system1.connectService(AS400.COMMAND);示例2：一個(gè)連接一旦啟動(dòng)，便由Java程序負(fù)責(zé)斷開其連接，此操作由AS400Java程序顯式完成。經(jīng)過對(duì)AS400對(duì)象調(diào)用disconnectService()JavaJavaJava自服務(wù)的數(shù)據(jù)時(shí)，AS400對(duì)象將重新連接（假若有可能重新連接的話）。3AS400的單個(gè)實(shí)例，而不是結(jié)束所有集成文件系統(tǒng)對(duì)象連接。3.對(duì)AS400對(duì)象實(shí)例使用自已的服務(wù)的單個(gè)對(duì)象被斷開該示例顯示Java程序如何斷開一個(gè)連接：//CreateanAS400object.AS400system1=new//CreateanAS400object.AS400system1=newAS400("mySystem.myC");//...useCommandcalltosendseveralCommands//totheAS/400.SinceconnectService()wasnot//called,theAS400objectautomatically//connectswhenthefirstcommandisrun.//Alldonesendingcommandssodisconnectthe//connection.system1.disconnectService(AS400.COMMAND);3：AS400AS400對(duì)象的每個(gè)實(shí)例使用同一服務(wù)的所有對(duì)象的鏈接，如圖4所示。4.對(duì)AS400對(duì)象使用同一服務(wù)的所有對(duì)象都被斷開例如，兩個(gè)CommandCall對(duì)象使用同一個(gè)AS400對(duì)象。當(dāng)調(diào)用disconnectService()CommandCallCommandCallrun()方式時(shí)，AS400對(duì)象必需重新與該服務(wù)連接：//CreateanAS400object.AS400sys=new//CreateanAS400object.AS400sys=newAS400("mySystem.myC");//CreatetwoCommandcallobjects.CommandCallcmd1=newCommandCall(sys,"myCommand1");CommandCallcmd2=newCommandCall(sys,"myCommand2");//Runthefirstcommandcmd1.run();//DisconnectfromthecommandService.sys.disconnectService(AS400.COMMAND);//Runthesecondcommand.TheAS400object//mustreconnecttotheAS/400.cmd2.run();//Disconnectfromthecommandservice.This//isthecorrectplacetodisconnect.sys.disconnectService(AS400.COMMAND);示例4：并非所有AS/400ToolboxforJava類都會(huì)自動(dòng)重新連接。由于文件可能已更改，所以集成文件系統(tǒng)類中的某些方式調(diào)用不會(huì)重新連接。文件斷開AS400disconnectService()IFSFileInputStreamAS/400read()失敗。//CreateanAS400object.AS400sys=newAS400("mySystem.myC");//CreatetwoFileobjects.Aconnectiontothe//AS/400iscreatedwhenthefirstobjectis//created.Thesecondobjectusestheconnection//createdbythefirstobject.IFSFileInputStreamfile1=newIFSFileInputStream(sys,"/file1");IFSFileInputStreamfile2=newIFSFileInputStream(sys,"/file2");//Readfromthefirstfile,thenclosei1=file1.read();file1.close();//DisconnectfromthefileService.sys.disconnectService(AS400.FILE);//Attempttoreadfromthesecondfile.This//failsbecausetheconnectiontothefileservice//nolongerexists.Theprogrammusteither//disconnectlaterorhavetheseco