命令行输入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
Copyright © OneZos all right reserved,powered by Gitbook本书发布时间: 2021-06-09 10:59:10

results matching ""

    No results matching ""