新手入门之如何创建DATA SET
-
命令行输入3.2
Menu Utilities Compilers Options Status Help ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss ISPF Primary Option Menu 0 Settings Terminal and user parameters User ID . : KOK 1 View Display source data or listings Time. . . : 08:25 2 Edit Create or change source data Terminal. : 3278 3 Utilities Perform utility functions Screen. . : 1 4 Foreground Interactive language processing Language. : ENGLISH 5 Batch Submit job for language processing Appl ID . : ISP 6 Command Enter TSO or Workstation commands TSO logon : SYSUSER 7 Dialog Test Perform dialog testing TSO prefix: KOK 9 IBM Products IBM program development products System ID : ADCD EssssssssssssssssssssssssssssssssssssssssssssssN r MVS acct. : 12345678 e Licensed Materials - Property of IBM e Release . : ISPF 5.6 e 5694-A01 (C) Copyright IBM Corp. 1980, 2004. e e All rights reserved. e ands e US Government Users Restricted Rights - e e Use, duplication or disclosure restricted e e by GSA ADP Schedule Contract with IBM Corp. e DssssssssssssssssssssssssssssssssssssssssssssssM s Option ===> 3.2 F1=Help F2=Split F3=Exit F7=Backward F8=Forward F9=Swap F10=Actions F12=Cancel
命令上输入A Allocate new data set
Menu RefList Utilities Help ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss Data Set Utility A Allocate new data set C Catalog data set R Rename entire data set U Uncatalog data set D Delete entire data set S Short data set information blank Data set information V VSAM Utilities ISPF Library: Project . . KOK Enter "/" to select option Group . . . COBOL / Confirm Data Set Delete Type . . . . LIB Other Partitioned, Sequential or VSAM Data Set: Data Set Name . . . Volume Serial . . . (If not cataloged, required for option "C") Data Set Password . . (If password protected) Option ===> A F1=Help F2=Split F3=Exit F7=Backward F8=Forward F9=Swap F10=Actions F12=Cancel
分配空间
Menu RefList Utilities Help ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss Allocate New Data Set More: + Data Set Name . . . : KOK.COBOL.LIB Management class . . . (Blank for default management class) Storage class . . . . (Blank for default storage class) Volume serial . . . . (Blank for system default volume) ** Device type . . . . . (Generic unit or device address) ** Data class . . . . . . (Blank for default data class) Space units . . . . . (BLKS, TRKS, CYLS, KB, MB, BYTES or RECORDS) Average record unit (M, K, or U) Primary quantity . . 10 (In above units) Secondary quantity 10 (In above units) Directory blocks . . 5 (Zero for sequential data set) * Record format . . . . FB Record length . . . . 80 Block size . . . . . 8000 Data set name type : (LIBRARY, HFS, PDS, or blank) * Command ===> F1=Help F2=Split F3=Exit F7=Backward F8=Forward F9=Swap F10=Actions F12=Cancel
按下回车后右上角出现Data set allocated
Menu RefList Utilities Help ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss Data Set Utility Data set allocated A Allocate new data set C Catalog data set R Rename entire data set U Uncatalog data set D Delete entire data set S Short data set information blank Data set information V VSAM Utilities ISPF Library: Project . . KOK Enter "/" to select option Group . . . COBOL / Confirm Data Set Delete Type . . . . LIB Other Partitioned, Sequential or VSAM Data Set: Data Set Name . . . Volume Serial . . . (If not cataloged, required for option "C") Data Set Password . . (If password protected) Option ===> F1=Help F2=Split F3=Exit F7=Backward F8=Forward F9=Swap F10=Actions F12=Cancel
F3退回到上一菜单,命令行输入3.4
Menu Utilities Compilers Options Status Help ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss ISPF Primary Option Menu 0 Settings Terminal and user parameters User ID . : KOK 1 View Display source data or listings Time. . . : 08:43 2 Edit Create or change source data Terminal. : 3278 3 Utilities Perform utility functions Screen. . : 1 4 Foreground Interactive language processing Language. : ENGLISH 5 Batch Submit job for language processing Appl ID . : ISP 6 Command Enter TSO or Workstation commands TSO logon : SYSUSER 7 Dialog Test Perform dialog testing TSO prefix: KOK 9 IBM Products IBM program development products System ID : ADCD 10 SCLM SW Configuration Library Manager MVS acct. : 12345678 11 Workplace ISPF Object/Action Workplace Release . : ISPF 5.6 S SDSF SDSF Panels D DB2 DB2 Product, SPUFI and DB2 Commands A DB2ADM DB2 Administration Tools M More Additional IBM Products Enter X to Terminate using log/list defaults Option ===> 3.4 F1=Help F2=Split F3=Exit F7=Backward F8=Forward F9=Swap F10=Actions F12=Cancel
DSNAME LEVEL上输入你的ID
Menu RefList RefMode Utilities Help ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss Data Set List Utility More: + blank Display data set list P Print data set list V Display VTOC information PV Print VTOC information Enter one or both of the parameters below: Dsname Level . . . kok Volume serial . . Data set list options Initial View . . . 1 1. Volume Enter "/" to select option 2. Space / Confirm Data Set Delete 3. Attrib / Confirm Member Delete 4. Total / Include Additional Qualifiers / Display Catalog Name When the data set list is displayed, enter either: "/" on the data set list command field for the command prompt pop-up, an ISPF line command, the name of a TSO command, CLIST, or REXX exec, or Option ===> F1=Help F2=Split F3=Exit F7=Backward F8=Forward F9=Swap F10=Actions F12=Cancel
你的DATA SET已经建立好了
Menu Options View Utilities Compilers Help ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss DSLIST - Data Sets Matching KOK Row 1 of 5 Command - Enter "/" to select action Message Volume ------------------------------------------------------------------------------- KOK *ALIAS KOK.COBOL.LIB USR002 KOK.ISPF.ISPPROF USR005 KOK.JCL.CNTL USR004 KOK.SPFLOG1.LIST USR004 ***************************** End of Data Set list **************************** Command ===> Scroll ===> PAGE F1=Help F2=Split F3=Exit F5=Rfind F7=Up F8=Down F9=Swap F10=Left F11=Right F12=Cancel
因为建立的是一个分区文件,所以我们需要在里面创建MEMBER,类似WIN里面先建立一个文件夹,然后在建立一个记事本文件,在命令行输入START 2 另开一个分屏
Menu Options View Utilities Compilers Help ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss DSLIST - Data Sets Matching KOK Row 1 of 5 Command - Enter "/" to select action Message Volume ------------------------------------------------------------------------------- KOK *ALIAS KOK.COBOL.LIB USR002 KOK.ISPF.ISPPROF USR005 KOK.JCL.CNTL USR004 KOK.SPFLOG1.LIST USR004 ***************************** End of Data Set list **************************** Command ===> start 2 Scroll ===> PAGE F1=Help F2=Split F3=Exit F5=Rfind F7=Up F8=Down F9=Swap F10=Left F11=Right F12=Cancel
你刚刚建立的DATA SET名字,起个member名
Menu RefList RefMode Utilities Workstation Help ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss Edit Entry Panel ISPF Library: Project . . . kok Group . . . . cobol . . . . . . . . . Type . . . . lib Member . . . hellw (Blank or pattern for member selection list) Other Partitioned, Sequential or VSAM Data Set: Data Set Name . . . Volume Serial . . . (If not cataloged) Workstation File: File Name . . . . . Options Initial Macro . . . . Confirm Cancel/Move/Replace Profile Name . . . . . Mixed Mode Format Name . . . . . Edit on Workstation Data Set Password . . Preserve VB record length Command ===> F1=Help F2=Split F3=Exit F7=Backward F8=Forward F9=Swap F10=Actions F12=Cancel
OK,成功,以后的程序都在这里写了
File Edit Edit_Settings Menu Utilities Compilers Test Help sssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss EDIT KOK.COBOL.LIB(HELLW) - 01.00 Columns 00001 00072 ****** ***************************** Top of Data ****************************** ==MSG> -Warning- The UNDO command is not available until you change ==MSG> your edit profile using the command RECOVERY ON. '''''' '''''' '''''' '''''' '''''' '''''' '''''' '''''' '''''' '''''' '''''' '''''' '''''' '''''' '''''' Command ===> Scroll ===> PAGE F1=Help F2=Split F3=Exit F5=Rfind F6=Rchange F7=Up F8=Down F9=Swap F10=Left F11=Right F12=Cancel