搜索
主机操作系统（DITTO操作VSAM数据集实验）高珍gaozhen2005@gmail.com实验1－查看VSAM数据集ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssISPFPrimaryOptionMenu0SettingsTerminalanduserparametersUserID.:SPSMS01ViewDisplaysourcedataorlistingsTime...:07:482EditCreateorchangesourcedataTerminal.:32783UtilitiesPerformutilityfunctionsScreen..:14ForegroundInteractivelanguageprocessingLanguage.:ENGLISH5BatchSubmitjobforlanguageprocessingApplID.:ISR6CommandEnterTSOorWorkstationcommandsTSOlogon:ISPFPROC7DialogTestPerformdialogtestingTSOprefix:SPSMS09IBMProductsIBMprogramdevelopmentproductsSystemID:P39010SCLMSWConfigurationLibraryManagerMVSacct.:ACCT#11WorkplaceISPFObject/ActionWorkplaceRelease.:ISPF5.5MMoreAdditionalIBMProductsEnterXtoTerminateusinglog/listdefaultsOption===m.7F1=HelpF2=SplitF3=ExitF7=BackwardF8=ForwardF9=SwapF10=ActionsF12=Cancel步骤一：输入“m.7”，回车ProcessViewOptionsHelpssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssDITTO/ESAforMVSTaskSelectionMenuSelectthedesiredtaskorenteraDITTOfunctioncode,thenpressEnter.PressF2(Menu)todisplaythemenupanelwithDITTOfunctiongroups.11.Browsedata2.Editorupdatedata3.WorkwithVTOC4.Workwithcatalogentries5.WorkwithOAMobjects6.Printdata7.Copydata8.Locatedata9.Changedata10.Createdata11.Positionatape12.Tapespecificfunctions13.SetprocessingoptionsCommand===F1=HelpF2=MenuF3=ExitF10=ActionsF11=CRetrieveF12=Cancel步骤二：进入DITTO后，先选择1。（如果不是该界面，请按“F2”，调整到该界面）ProcessViewOptionsHelp•sssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss•DITTO/ESAforMVSTaskSelectionMenu••SelectthedesiredtaskorenteraDITTOfunctioncode,thenpressEnter.•PressF2(Menu)todisplaythemenupanelwithDITTOfunctiongroups.••11.EsssssssssBrowseFunctionsssssssssssN•2.ee•3.eSelectthetypeofdatatobrowse:e•4.ee•5.e31.Tapedatae•6.e2.Physicaldiskdatae•7.e3.VSAMdatae•8.e4.OAMobjecte•9.ee•10.e5.DITTOprintoute•11.e6.AFPdatae•12.ee•13.e7.Userstoragee•ee•eF1=HelpF3=ExitF12=Cancele•DsssssssssssssssssssssssssssssssssssssM••Command===•F1=HelpF2=MenuF3=ExitF10=ActionsF11=CRetrieveF12=Cancel步骤三：再选择3，进行查看VSAM数据集。步骤四：在Datasetname中输入VSAM数据集名ProcessViewOptionsHelpssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssDITTO/ESAforMVSVB-VSAMBrowseCATALOGRBA0KeyAUDCol1FormatCHARVOLSERUSER03TypeKSDSDSNAMESTTJ.LPRJ.BANK.TJKFXPBORBALen=.5...10....5...20....5...30....5...40....5...50....5...60060AUD0000001333000{0000001353000{C00000000SHCHB200610306060CAD0000001114700{0000001134700{C00000000SHCHB2006103012060CHF0000001250000{0000001270000{C00000000SHCHB2006103018060CNY0000008220000{0000008420000{C00000000SHCHB2006103024060GBP0000000530500{0000000540500{C00000000SHCHB2006103030060HKD0000007714000{0000007864000{C00000000SHCHB2006103036060JPY0000118070000{0000120270000{C00000000SHCHB2006103042060LKR0000093600000{0000095600000{U00000000SHCHB2006103048060SGD0000001575700{0000001603700{C00000000SHCHB2006103054060TWD0000032735000{0000033435000{C00000000SHCHB20061030****Endofdata****Command===ScrollPAGEF1=HelpF2=ZoomF3=ExitF4=LeftF5=RightF6=RFindF7=BkwdF8=FwdF10=ActionsF11=CRetrieveF12=Cancel进入后显示如下图所示，该数据集为一个KSDS数据集，键值为1－3列，逻辑记录长度为60。ProcessViewOptionsHelpssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssDITTO/ESAforMVSVB-VSAMBrowseCATALOGRBA360KeyJPYCol1FormatCHARVOLSERUSER03TypeKSDSDSNAMESTTJ.LPRJ.BANK.TJKFXPBORBALen=.5...10....5...20....5...30....5...40....5...50....5...6036060JPY0000118070000{0000120270000{C00000000SHCHB2006103042060LKR0000093600000{0000095600000{U00000000SHCHB2006103048060SGD0000001575700{0000001603700{C00000000SHCHB2006103054060TWD0000032735000{0000033435000{C00000000SHCHB20061030****Endofdata****Command===ScrollPAGEF1=HelpF2=ZoomF3=ExitF4=LeftF5=RightF6=RFindF7=BkwdF8=FwdF10=ActionsF11=CRetrieveF12=Cancel步骤五：在Key中输入“JPY”，VSAM会自动被定位到键为JPY的记录；也可以试着修改一下RBA以及Col域，这里就不演示了。ProcessViewOptionsHelpssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssDITTO/ESAforMVSVB-VSAMBrowseCATALOGRBA0KeyX'C1E4C4'Col1FormatHEXVOLSERUSER03TypeKSDSDSNAMESTTJ.LPRJ.BANK.TJKFXPBORBALen=.5....10....5....20....5....30060C1E4C4F0F0F0F0F0F0F1F3F3F3F0F0F0C0F0F0F0F0F0F0F1F3F5F3F0F0F06060C3C1C4F0F0F0F0F0F0F1F1F1F4F7F0F0C0F0F0F0F0F0F0F1F1F3F4F7F0F012060C3C8C6F0F0F0F0F0F0F1F2F5F0F0F0F0C0F0F0F0F0F0F0F1F2F7F0F0F0F018060C3D5E8F0F0F0F0F0F0F8F2F2F0F0F0F0C0F0F0F0F0F0F0F8F4F2F0F0F0F024060C7C2D7F0F0F0F0F0F0F0F5F3F0F5F0F0C0F0F0F0F0F0F0F0F5F4F0F5F0F030060C8D2C4F0F0F0F0F0F0F7F7F1F4F0F0F0C0F0F0F0F0F0F0F7F8F6F4F0F0F036060D1D7E8F0F0F0F0F1F1F8F0F7F0F0F0F0C0F0F0F0F0F1F2F0F2F7F0F0F0F042060D3D2D9F0F0F0F0F0F9F3F6F0F0F0F0F0C0F0F0F0F0F0F9F5F6F0F0F0F0F048060E2C7C4F0F0F0F0F0F0F1F5F7F5F7F0F0C0F0F0F0F0F0F0F1F6F0F3F7F0F054060E3E6C4F0F0F0F0F0F3F2F7F3F5F0F0F0C0F0F0F0F0F0F3F3F4F3F5F0F0F0****Endofdata****Command===ScrollPAGEF1=HelpF2=ZoomF3=ExitF4=LeftF5=RightF6=RFindF7=BkwdF8=FwdF10=ActionsF11=CRetrieveF12=Cancel步骤六：在Format中输入“HEX”，VSAM中的数据就会以16进制的格式进行显示。实验2－理解CI步骤一：同样进入VB后，在CIaccess中输入YESProcessViewOptionsHelpssssssssssssssssssssssssssssssssssssss