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

AS/400供了一些代碼示例。要連接到AS/400JavaAS400AS/400務(wù)器類型，AS400AS/400AS/400上的數(shù)據(jù)的接口。著重：假若是在建立“企業(yè)JavaBean”，則需要遵從EJB允許AS/400ToolboxforJava線程。AS/400持下列各項：JDBC程序調(diào)用和命令調(diào)用集成文件系統(tǒng)網(wǎng)絡(luò)打印數(shù)據(jù)隊列記錄級存取著重：假若應(yīng)用程序不嘗試同時執(zhí)行兩個都需要網(wǎng)絡(luò)打印服務(wù)器的任務(wù)，則打印類著重：假若應(yīng)用程序不嘗試同時執(zhí)行兩個都需要網(wǎng)絡(luò)打印服務(wù)器的任務(wù)，則打印類AS/400打印服務(wù)器的多個附加套接字連接。在5分鐘之內(nèi)未使用的額外會話將斷開。Java程序可控制與AS/400的連接數(shù)目。為了優(yōu)化通信性能，Java程序可AS/400AS4001AS/400的多個套接字連接。1.為同一個AS/400系統(tǒng)建立多個AS400Java程序AS/400AS4002了連接的數(shù)目，從而削減了在AS/400系統(tǒng)上使用的資源量。2.為同一個AS/400系統(tǒng)建立單個AS400Java程序下列示例顯示如何建立和使用AS400類：1：在下列示例中，將建立兩個CommandCall對象，它們向同一個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：在下列示例中，將建立兩個CommandCall對象，它們向同一個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)過使用同一個AS400對象，建立一個CommandCallIFSFileInputStreamCommandCallIFSFileInputStream對象使用AS/400系統(tǒng)上的不同服務(wù)，所以建立了兩個連接。//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程序可控制連接的啟動時間和結(jié)束時間。缺省情況下AS/400上的信息，就會啟動一個連接。經(jīng)過對AS400對象調(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：一個連接一旦啟動，便由Java程序負(fù)責(zé)斷開其連接，此操作由AS400Java程序顯式完成。經(jīng)過對AS400對象調(diào)用disconnectService()JavaJavaJava自服務(wù)的數(shù)據(jù)時，AS400對象將重新連接（假若有可能重新連接的話）。3AS400的單個實例，而不是結(jié)束所有集成文件系統(tǒng)對象連接。3.對AS400對象實例使用自已的服務(wù)的單個對象被斷開該示例顯示Java程序如何斷開一個連接：//CreateanAS400object.AS400system1=new//CreateanAS400object.AS400system1=newAS400("mySystem.myC");//...useCommandcalltosendseveralCommands//totheAS/400.SinceconnectService()wasnot//called,theAS400objectautomatically//connectswhenthefirstcommandisrun.//Alldonesendingcommandssodisconnectthe//connection.system1.disconnectService(AS400.COMMAND);3：AS400AS400對象的每個實例使用同一服務(wù)的所有對象的鏈接，如圖4所示。4.對AS400對象使用同一服務(wù)的所有對象都被斷開例如，兩個CommandCall對象使用同一個AS400對象。當(dāng)調(diào)用disconnectService()CommandCallCommandCallrun()方式時，AS400對象必需重新與該服務(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類都會自動重新連接。由于文件可能已更改，所以集成文件系統(tǒng)類中的某些方式調(diào)用不會重新連接。文件斷開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