Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1061815
  • 博文数量: 106
  • 博客积分: 9093
  • 博客等级: 中将
  • 技术积分: 2770
  • 用 户 组: 普通用户
  • 注册时间: 2006-06-01 17:22
文章分类

全部博文(106)

文章存档

2014年(1)

2012年(29)

2011年(32)

2010年(20)

2008年(24)

分类: 系统运维

2012-01-11 21:59:39

EDTF是一个简单的文本编辑器,它可以编辑IFS下的stream files。当然你可以不用EDTF,可以使用别的文本编辑器在你的pc上,然后ftp到AS/400上。

启动EDTF

使用CL命令EDTF来启动文本编辑器。此命令有三个参数。如图

参数 描述
STMF 在IFS下的stream files名字,如果没有会产生。名字应该包括路径。如/home/c210408/case.qsh
FILE 数据文件名,qualified格式为lib/file
MBR 数据文件的member名

此命令只能从CL命令行运行,不能在Qshell命令行下运行。你可以在Qshell下按F21进入CL命令行。。

Qshel的脚本可以存在数据文件中(与rpgle一样),但是当存在IFS下的话会运行的比较快些。

图1是进入EDTF的画面,和SEU有点类似,但比SEU要少些功能。。

Edit File: /home/c210408/case01.qsh                                                           
Record :        1   of       2 by 10                      Column :    1     59 by 126         
Control :                                                                                     
CMD ....+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8..
     ************Beginning of data**************              
     #!/bin/qsh                                                             
     print "Hello Qshell!"                                                

     ************End of Data********************                             

 

stream files练习
  • 首先要有自己的Directory,可以使用命令CRTDIR, MKDIR或者MD来创建自己的Directory。如mkdir '/home/java'。 其实你已经有自己的Home directory了,你可以使用命令DSPUSRPRF查看,在显示的最后。
  • 创建stream file,你可以先设定当前的Directory,然后在创建stream file;如cd ‘/home/c210408’        edtf ‘case01.qsh’;或者直接用EDTF ‘/home/c210408/case01.qsh’
  • 然后输入经典的hello world脚本。如上图1
  • 运行。进入Qshell。在shell命令行上执行./case01.qsh。你会发现没有权限执行。你可用chmod  u+x  case01.qsh修改执行权限。

                                                        QSH Command Entry    
  $                                                                          
> pwd                                                                        
  /home/C210408                                                              
  $                                                                          
> ls                                                                         
  Java            ch2_test.dat    helloworld      perl                       
  MBFSRR10        hello.pdf       littlepgm.com   zip                        
  case01.qsh      hello.qsh       mfgapps                                    
  $                                                                          
> chmod  u+x  case01.qsh                                                     
  $                                                                          
> ./case01.qsh                                                               
  Hello Qshell!                                                              
  $                                                                          
===>                                                                         

阅读(2718) | 评论(0) | 转发(1) |
给主人留下些什么吧!~~