1、2023-8-22精选PPT1REXX语言概览 REXX学习小组2023-8-22精选PPT2主要内容 REXX语言简介 REXX基本语法 REXX命令 函数与子例程 数据处理 REXX与子系统的交互2023-8-22精选PPT3主要内容 REXX语言简介 REXX基本语法 REXX命令 函数与子例程 数据处理 REXX与子系统的交互2023-8-22精选PPT4REXX语言简介*什么是脚本语言？*REXX：REstructured eXtended eXecutor 1979-1982 IBM Mike Cowlishaw为简化编程而设计*主要应用于大型主机平台*其他平台：Windows，L
2、inux，Unix，AIX，DOS*主要应用：执行日常例行任务，例如输入TSO/E命令 调用其他REXX程序 编写ISPF应用 对问题的一次性快速解决 系统编程2023-8-22精选PPT5*特点：用途多样 可读易用 书写自由 单一数据类型 强大的内置函数 跟踪调试方便 解释型语言*缺点：难以维护，执行效率不高2023-8-22精选PPT6*组成指令：关键字，赋值，标签，空子句，命令调用内置函数：由编译器直接支持TSO/E外部函数：由TSO/E环境支持数据栈函数eg:/*REXX*/SAY WHATS YOUR NAME?PULL NAMESAY HELLO WORLD!THIS IS NAM
3、E2023-8-22精选PPT7执行方法：1.2.3.已放在系统库中，可以直接在命令栏里指定执行4.批处理方式，使用JCL提交作业执行 PGM=IKJEFT012023-8-22精选PPT8调试方式：Trace指令调试Trace C：所有的命令调用均被追踪Trace E：只追踪返回码非零的错误RC和SIGLRC：返回码无错时为0，有错误时置为该错误的返回码SIGL：控制流发生转变时的代码行号SIGNAL ON ERROR 定位错误发生位置交互式调试：TRACE?R2023-8-22精选PPT9主要内容 REXX语言简介 REXX基本语法 REXX命令 函数与子例程 数据处理 REXX与子系统的
4、交互2023-8-22精选PPT10REXX语法指令概览 *语法规则：指令可为大写，小写，大小写混合，编译执行过程中自动转化成大写（引号中的除外）SAY hello SAY hello *指令格式：指令格式自由，系统自动忽略多余的空格和空行 续行：加入空格，不加入空格 SAY THIS IS AN EXTENDED,INSTRUCTION.SAY THIS IS A STRING CONT|,ENT.指令结束可用；作为结尾，一行只有一条命令，可以不加结尾 SAY hello；SAY hello；SAY GO ON2023-8-22精选PPT11 指令类型 *关键字：SAY,IF,THEN,EL
5、SE,EXIT,END,DO *赋值：Variable=9；Variable=Variable+3 *标签：后面紧跟冒号的名称符，出现在指令开始处 *空子句：注释或者空行，作用是增加可读性 *命令调用2023-8-22精选PPT12 变量和表达式 *变量命名：大小写字母，#，$，？，.,！，_等 双字符 X41（程序中指定ETMODE）双字符变量要用括起来 eg：OPTIONS ETMODE =10 约束：第一个字符不能是数字，也不能是点，长度不超过250字节，不能取保留字 *变量的取值：整型，浮点型，有符号数，字符串，其他变量值或表达式 变量没有初始化，则默认值为变量名的大写字母表示 变量赋
6、值可通过PARSE指令，VALUE内置函数，赋值表达式及其他编程语言2023-8-22精选PPT13 变量类型：*简单变量：不带.变量，没有对其赋值，默认值为对应的大写表示。大小写不敏感 *复合变量：带.的变量，由词干和词尾组成，遵循简单变量命名规则，不超过255个字符，对应其他语言中的数组，但下标不一定为数字 eg：TIME=3 REXX.TIME 值为 REXX.3 *复合词干：复合变量的第一个词干和.组成，用于将复合变量所表示的整个变量集赋初值 eg：room.=empty room.mine=full SAY room.1 room.mine /*empty full */2023-8
7、-22精选PPT14 表达式的使用：*常量表达式：数字常量，字符串常量（通常写在引号中，避免混淆）*算数表达式：+-*/%（取商）/（取余）*（乘方），+/-正负 优先级：()圆括号 +,-前缀符号 *指数运算符号 *,/,%,/乘法和除法 +,-加法和减法 *比较表达式：数值比较，字符串比较 eg：HELLO =hello 普通比较,返回1 HELLO =hello 严格比较，返回0 比较符：=，（=，=,=,）（,），（=，=），2023-8-22精选PPT15 *逻辑表达式：&|&（异或）*连接表达式 空格：连接两项，并在中间加入空格，默认设置为加入一个空格 SAY X YZ /*X Y
8、Z*/“|”直接连接两端，中间不加空格 8|(3*3)/*89 */直接相邻 eg：percent=60 percent%/*60%*/2023-8-22精选PPT16关键字指令 *SAY 向终端输出字符 *PULL 从键盘读取 *(PARSE)ARG 读取用户提供的参数 （用户提供的参数为（hello，2）ARG string,num /*string=hello,num=2*/（用户提供的参数为“hello world”）ARG str1,str2 /*str1=hello ,str2=world */*NOP 空子句，表示不执行操作 *UPPER 将变量值转化成大写 eg：A=hello
9、 UPPER A SAY A /*HELLO */*ADDRESS,PROCEDURE,CALL,DROP,NUMERIC,OPTIONS,SIGNAL.2023-8-22精选PPT17条件控制语句 *IF-THEN-ELSE IF expr THEN instructions ELSE instructions eg：IF weather=fine THEN DO SAY lovely day!IF gym=free THEN SAY lets play basketball!ELSE NOP END ELSE SAY bad weather!2023-8-22精选PPT18 *SELECT
10、/WHEN/OTHER/END SELECT WEHN expr1 THEN instruction WEHN expr2 THEN instruction .OTHERWISE instructions END2023-8-22精选PPT19eg：SELECTWHEN weather =fine THEN SAY lovely dayWHEN gym=free THEN SAY lets play basketballOTHERWISESAY bad weather END2023-8-22精选PPT20 循环控制语句 循环指令分为两类：重复循环和条件循环 循环语句写在DO-END 结构内，
11、循环可以嵌套，DO和END 要匹配 基本用法：Do repetitorClause Instructions End2023-8-22精选PPT21*重复循环语句 默认情况每次变量加1，可以通过BY来更改每次的增量，FOR来控制最大循环次数eg：Do i=1 to 10 BY 2 FOR 2 SAY HELLO END /*结果输出两行HELLO*/2023-8-22精选PPT22*条件循环语句 DO WHILE：第一次进入循环体前先检测条件，当条件为真时继续循环 DO UNTIL：在语句执行后进行条件检测，条件为假时继续循环 eg：QUANTITY=20 DO NUMBER=1 TO 10
12、WHILE QUANTITY =50*/QUANTITY=QUANTITY+NUMBER SAY QUANTITY=QUANTITY END2023-8-22精选PPT23*DO FOREVER 无限循环死循环处理 按中断键，用户收到IRX0920I 的消息，回复 HI 若没有停止，再次按中断键，回复HE*LEAVE 和 ITERATE 指令 LEAVE：立刻终止循环 ITERATE：终止当次循环eg：DO i=1 TO 5 IF i=3 THEN ITERATE ELSE SAY i END /*输出1 2 4 52023-8-22精选PPT24eg：DO outer=1 TO 2 DO i
13、nner=1 TO 2 IF inner 1 THEN LEAVE inner ELSE SAY INNER END SAY OUTER END /*INNER OUTER INNER OUTER */2023-8-22精选PPT25 中断语句 *EXIT：无条件终止并且返回到程序调用处 *CALL：通过调用内部或者外部子例程来中断现有程序 *RETURN：调用程序结束后返回原调用处，继续执行原程序 *SIGNAL：跳转到目标标签处，通常用于程序的测试或特殊情况的处理，无法返回2023-8-22精选PPT26主要内容 REXX语言简介 REXX基本语法 REXX命令 函数与子例程 数据处理 R
14、EXX与子系统的交互2023-8-22精选PPT27REXX命令 TSO/E REXX 命令 TSO环境下提供给REXX使用的系统命令 此种命令只能用于REXX程序，在CLIST和TSO READY模式下不能使用 可提供的服务：I/O控制 操作数据栈 检查宿主命令环境 改变程序执行2023-8-22精选PPT28 常用命令 *数据栈相关命令（TSO/E和非TSO/E下均可使用）：*NEWSTACK 创建一个数据栈 DELSTACK删除最新建的数据栈及里面的全部数据 NEWSTACK /*创建新的数据栈*/PUSH elem1 PUSH elem2 .DELSTACK /*删除之前创建的数据栈*
15、/2023-8-22精选PPT29 *MAKEBUF 在数据栈上创建一个新的缓冲区，并返回编号，保存在RC中 DROPBUF 删除最新创建的缓冲区并清空数据 *QSTACK 返回程序中存在的数据栈数量（包括buffer0），如果未使用MAKESTACK命令，返回值为1 *QBUF 就算新创建的数据栈上建立的缓冲区数量，为使用过MAKEBUF命令，QBUF命令返回0 *QELEM 计算新创建的数据栈缓冲区中的元素数量，未使用过MAKEBUF返回值为0，与当前数据栈中元素的数量无关2023-8-22精选PPT30 *EXECIO 命令 用于处理数据集的输入输出，对数据集进行增，删，改，查等操作 可
16、以执行I/O操作的数据集是PS,PDS/PDSE的成员 该命令不具备分配数据集的功能 *EXECUTIL 命令 -设置系统运行库在程序载入后是否关闭 -控制TRACE指令的开启和关闭 -终止程序的翻译过程 -禁止和回府程序对终端的输出 -修改程序包目录中的项目 -设置出了SYSPROC之外的其他运行库2023-8-22精选PPT31 *立即命令 -TS（TraceStart）启动Trace TE（TraceEnd）结束Trace -HI 停止对所有REXX和CLIST程序的翻译，包括调用该命令本身的程序 -HT 常规的输出被挂起，如SAY输出指令，但REXX运行正常，错误信息仍然可以显示 RT
17、 恢复之前挂起的输出 -HE 终止REXX程序的执行*SUBCOM 通过设置RC的值检测某个宿主环境是否可用 SUBCOM ISPEXEC IF RC=0 THEN ADDRESS ISPEXEC ELSE NOP2023-8-22精选PPT32eg：/*REXX */MAINRTN:.CALL SUBRTN EXECUTIL TE .EXIT SUBRTN:EXECUTIL TS .RETURN2023-8-22精选PPT33主要内容 REXX语言简介 REXX基本语法 REXX命令 函数与子例程 数据处理 REXX与子系统的交互2023-8-22精选PPT34函数与子例程 什么是函数 接受
18、数据，处理数据并返回值，已完成特定功能的代码片段 REXX中的函数种类 内置函数：丰富的内置函数几大地方便用户编程 用户函数：内部函数，外部函数 函数包：将函数以打包的形式发布 函数调用 ReturnValue=functionName(expr,expr,.)函数名与左括号中间不能有空格 2023-8-22精选PPT35 子例程与函数的区别 *函数必须有返回值，子例程不必要 *函数的返回值要替代调用的位置，而子例程的返回值保存在特殊变量result中 *调用方式不同 子例程的调用 eg：CALL SUBSTR verylongword,1,8 x=RESULT 为什么要用函数和子例程 结构化
19、程序所必须的 将程序分为多个模块 代码的重复利用 函数和子程序可以是内部或外部的 2023-8-22精选PPT36/*REXX*/CALL subroutine ab,cd,ef SAY result /*输出结果abcdef*/SAY subfunc(ab,cd,ef)/*输出结果efcdab*/RETURN 0/*subroutine 子例程实现*/subroutine：PROCEDURE PARSE ARG string1,string2,string3 RETURN string1|string2|string3/*subfunc()子函数实现*/subfunc：PROCEDURE P
20、ARSE ARG str1,str2,str3 RETURN str3|str2|str12023-8-22精选PPT37 函数和例程的搜索顺序 该调用是否是内部函数或例程 是否是内置函数 是否是外部函数或例程FUNCSOFL：标记位，判断是否：标记位，判断是否在搜索在搜索REXX程序前先搜索运行库程序前先搜索运行库2023-8-22精选PPT38 参数传递 *共享变量 /*REXX*/number1=10 CALL subroutine SAY number1 number2 EXIT subroutine:PROCEDURE number1=7 number2=5 SAY number1
21、number2 RETURN2023-8-22精选PPT39 使用EXPOSE共享变量 eg：/*REXX*/J=1;Z.1=A CALL TOFT SAY J K M EXIT /*子例程*/TOFT:PROCEDURE EXPOSE J K Z.J SAY J K Z.J K=7;M=3 RETURN 2023-8-22精选PPT40*参数传递 /*REXX*/PARSE ARG LONG WIDE CALL PERIMETER LONG,WIDE SAY RESULT IS RESULT EXIT PERIMETER:PROCEDURE ARG LENGTH,WIDTH PERIM=2*
22、LENGTH+2*WIDTH RETURN PERIM2023-8-22精选PPT41 内置函数 算数函数：执行对数值的运算 比较函数：比较字符串和数值是否相同或判断类型 转换函数：进行数据类型的转换 格式函数：设置字符串中字符和空格的格式 字符串操作函数：设置字符串中字符和空格的显示方式 其他函数2023-8-22精选PPT42*算数函数 ABS：求绝对值 MAX：最大值 MIN：最小值 RANDOM：产生随机数 SIGN：返回数值符号(-1，0，1)FORM FUZZ TRUNC*比较函数 COMPARE 比较两个字符串，相同返回0，不同返回第一个不同字母的位置 DATATYPE SYMB
23、OL*转换函数 B2X C2D C2X D2C D2X X2B X2C X2D2023-8-22精选PPT43*格式函数 FORMAT(number,before,after,expp,expt)before,after表示小数点前后的位数 expp 设置指数的位数，设置为0则不使用指数 expt 设置何时使用指数，当整数或小数部分的位数分别超过了expt的一倍或两倍，那么就用指数表示；若expt为0，则在有小数部分的时候就使用指数表示若expp为0，则expt自动设为0 CENTER/CENTRE COPIES JUSTIFY LEFT RIGHT SPACE2023-8-22精选PPT44
24、*字符串操作函数 DELWORD FIND INDEX INSERT LASTPOS LENGTH OVERLAY POS REVERSE STRIP SUBSTR SUBWORD TRANSLATE VERIFY WORD WORDINDEX WORDLENGTH*其他内置函数ADDRESS：返回当前命令提交执行的环境ARG：返回传给子例程的参数信息CONDITION：返回当前捕捉到的特殊情况的信息DATE：按照指定格式返回当前系统信息EXTERNALS：返回中断输入缓冲区的字符数LINESIZE：返回终端的行宽减1TIME：返回指定格式的系统时间2023-8-22精选PPT45 TSO/E
25、外部函数 *OUTTRAP函数 将命令的输出放在一组变量中，REXX可以处理这些变量中的输出内容 调用格式 OUTTRAP(off),varname,max,concat)参数：off：关闭错误跟踪 varname：可以是复合变量或者数字变量的前缀，max：设置捕捉的最大行数 concat：设置输出方式 CONCAT：设置命令被捕捉的最大值 NOCONCAT：设置每次变量的输出从变量1开 始存储2023-8-22精选PPT46eg1：x=OUTTRAP(ABC,4,CONCAT)ABC0 =3ABC1 =第一行输出ABC2 =第二行输出ABC3 =第三行输出/*若此时又有一条命令有两行输出，那
26、么第二行不被跟踪*/ABC4 =第四行输出 /*ABC0到ABC3不变*/2023-8-22精选PPT47eg2：/*REXX*/call outtrap line.listds te02.rexx.labcall outrap offsay lines:line.0do i=1 to line.0say line.iend/*运行结果*/lines:5TE02.REXX.LAB-RECFM-LRECL-BLKSIZE-DSORG FB 80 32720 PO-VOLUMES-USER022023-8-22精选PPT48*SYSDSN函数 判断指定的数据集名称是否存在或该数据集是否可用，指定的
27、数据集是顺序数据集还是分区数据集的成员，检查是否有访问权限eg：X=SYSDSN(PRO.REXX(MEM)IF X=OK THEN CALL ROUTINE1 ELSE CALL ROUTINE22023-8-22精选PPT49主要内容 REXX语言简介 REXX基本语法 REXX命令 函数与子例程 数据处理 REXX与子系统的交互2023-8-22精选PPT50REXX数据处理 数据解析 数据栈操作 文件读写2023-8-22精选PPT51 数据解析 *常用解析命令 PULL、ARG、PARSE VAR、PARSE VALUE-WITH 等 指令 *templatelist详解2023-8
28、-22精选PPT52-PULL指令 Pull:交互式的读入，等待用户输入 Eg:say please enter your name pull name (会将小写转换成大写字母)parse pull name(不进行转换)-ARG指令 ARG:取执行或调用时传递的参数 arg name&parse arg name Eg：exec REXX(ARG)dong exec2023-8-22精选PPT53-PARSE(upper)VAR 指令 sentence=I love rexx very much Parse var sentence str1 str2 str3 Say str1 /*输出
29、变量 I*/Say str2 /*love*/Say str3 /*rexx very much*/-PARSE VERSION 指令 Parse version ver Say ver /*输出版本号*/2023-8-22精选PPT54*PARSE VALUE-WITH 指令-语法：parse value expression with-将一个表达式解析为一个或多个变量-Eg：Parse value rexx is good with str1 str2 str3 str4 /*str1 将输出 rexx*/*str2 is*/*str3 good*/*str4 为空*/2023-8-22精
30、选PPT55*Template_list详解-数据解析式通过对比源数据和模板把源数据解析成单独的数据数据解析分两步：1、将源数据解析为模板格式指定的子串2、将各子串放入对应的变量中。2023-8-22精选PPT561、空格分隔符 Eg：Parse value value with blanks.with a b /*a 取得 value */*b 取得 with blank*/2、占位符分隔符 Parse value value with periods in it.with a.b./*a 取得 value*/*b 取得 periods*/2023-8-22精选PPT573、字符（变量）分隔
31、符 Sentence=you here,or not here Parse var sentence str1,str2 /*用逗号表示该处 分隔*/Str1=you here Str2=or not here P=,Parse var sentence str1(p)str2 2023-8-22精选PPT584、位置分隔符(a)列的绝对位置 String=tomorrow will be better.Parse var string str1 6 str2 9 str3 Parse var string str1 =6 str2 9 str3 Str1=tomor Str2=row Str
32、3=will be better Parse var string str1 6 str2 1 str3 Str2=row will be better Str3=tomorrow will be better2023-8-22精选PPT59(b)列的相对位置(+右移 左移)String=tomorrow waiting for u Parse var string str1 +8 str2+8 str3 /*str1=tomorrow*/*str2=waiting*/*str3=for u*/Parse var string str1+8 str2-8 str3 Str1=tomorrow
33、Str2=waiting for u Str3=tomorrow waiting for u2023-8-22精选PPT60数据栈操作数据栈操作指令：1、添加数据栈元素 Push：在数据栈顶部增加数据 Queue：在数据部底部增加数据 A=5 b=10 Push A Queue b2023-8-22精选PPT612、删除数据栈元素 Pull：从数据栈取数据，当数据栈为空时，pull指令从终端取数据。Pull stackitem Parse pull stackitem3、数据栈元素数量 内置函数 queued 返回数据栈中元素数量 Number=queued（）Do number pull e
34、lement say element end2023-8-22精选PPT62文件读写1、什么时候使用EXECIO命令 a 从一个数据集中读取数据 b 向一个数据集中写入数据 c 打开一个数据集，并不进行任何读写操作 d 清空一个数据集 e 从一个数据集中拷贝数据到另一个数据集中 f 从一个复合变量列表中读取数据存入数据集中 g 向一个顺序数据集末尾增加数据 h 一次更新数据集中的一行数据2023-8-22精选PPT63EXECIO命令语法*格式：EXECIO Lines/*diskr/diskru/diskw ddname lineNUM read/writeParms Lines/*:lin
35、es 代表处理的记录数，*表示整个数据集 Diskr 只读方式处理文件 Disku 表示读取记录允许更新文件 Diskw 表示写文件 lineNum 开始读记录的起始位置 Read/writeParms 读写参数2023-8-22精选PPT64*文件读取 a)“execio*diskr myindd(finis”Finis 表示读完之后关闭数据集 b)“execio 1 diskru myindd(open”“execio 1 diskw myindd (finis”2023-8-22精选PPT65*Diskr&diskru 参数选项1、Open 打开数据集 “execio 0 diskr m
36、yindd(open”2、Finis 读完之后关闭数据集3、Stem 读取信息到一个可被索引的复合变量中 “execio*diskr myindd(stem newvar.”newvar.0 表示复合变量中元素的数量 使用 drop newvar.清除所有变量4、skip 跳过数据集中特定行，不写入数据栈 “execio 6 diskr myindd(skip”2023-8-22精选PPT66LIFO:rexx使用push指令将信息放到数据栈中FIFO：使用queue指令将信息放到数据战中默认使用FIFO输入数据集：一个I/O数据集必须首先定义成DDNAME才能通过execio进行操作。“al
37、loc da(ur535.rexx.data)f(myindd)shr reuse”“execio*diskr myindd(finis”2023-8-22精选PPT67文件读取示例“EXECIO 0 DISKR myindd(open”“EXECIO 0 diskr myindd 100 (open”“EXECIO 25 diskr myindd (open”“EXECIO *diskr myindd (open”“EXECIO 5 diskr myindd 100 (finis”2023-8-22精选PPT68文件写入 “EXECIO *DISKW myoutdd (finis”1、dis
38、kw参数选项 （a）Open、finis、stem “execio*diskw myoutdd (stem newvar.”将复合变量内容写入到myoutdd中 （b）输出数据集 同文件读取类似，输出数据集必须首先分配一个ddname “alloc da(ur535.rexx.data)f(myoutdd)old reuse”“execio *diskw myoutdd (finis”2023-8-22精选PPT69主要内容 REXX语言简介 REXX基本语法 REXX命令 函数与子例程 数据处理 REXX与子系统的交互2023-8-22精选PPT70REXX与子系统的交互目标：目标：1）执行
39、宿主命令。2）REXX与与TSO环境的交互环境的交互3）REXX与与JES的交互的交互4）REXX与与SDSF的交互的交互2023-8-22精选PPT71执行宿主命令1.REXX命令 指REXX语言实现本身所提供的程序操作的命令：eg：I/O控制数据集的读写(EXECIO)和数据栈的操作等。2.宿主命令 指REXX程序执行的宿主环境所能识别的命令。即识别并 执行特定命令的运行环境eg：rexx默认环境是TSO/E环境2023-8-22精选PPT72TSO/E REXX可用的宿主环境1、TSO:可执行TSO/E 和REXX命令2、MVS：在非TSO/E地址空间中执行rexx命令3、LINK:可连
40、接相同级别的模块4、ATTACH:可将不同级别的模块连接到一起5、ISPEXEC:可执行ISPF命令6、ISREDIT:可以执行ISPF/PDF EDIT 命令，即可查找、修改、插入、删除数据等2023-8-22精选PPT73ADDRESS命令用来指定或切换当前命令执行的宿主环境格式：Address environment Address environment commandExpressionEg：ADDRESS ISPEXEC“EDIT DATASET(“DSNAME”)”只有当前命令在ispf宿主环境中执行ADDRESS ISPF所有命令都将在ispf宿主环境中执行2023-8-22精
41、选PPT741、查看当前所处宿主环境：CurEnvName=Address()2、检测某宿主环境是否可用 Subcom Environment Eg:Arg dsname Subcom ispexec If rc=0 then Address ispexec“select pgm=(isredit)”Else “edit”dsname2023-8-22精选PPT75REXX与TSO环境交互 REXX的默认宿主环境是tso，所以可用rexx编写脚本来进行系统的日常维护工作。REXX可直接调用RACF TSO命令，可以帮助管理员进行大批量的操作，如账号分配等。2023-8-22精选PPT76Do
42、I=1 to 9 au user000I dfltgroup(group)owner(group)password(pass)addsd user000I.*generic owner(group)uacc(none)EndDo i=10 to 40 au user00I.end2023-8-22精选PPT77REXX与JES的交互*一个最简单的通过rexx提交jcl作业的示例：/*rexx*/“submit(ur535.rexx.test(hello)”也可以在rexx中构建jcl作业代码并通过运行提交命令完成jcl作业的提交 Address tso“submit”2023-8-22精选PP
43、T781、如果要查看作业的执行结果，可以使用 Tso status命令 /*rexx*/“status jobname(jobid)”2、查看部分信息 /*rexx*/“output ur535a class(a)”2023-8-22精选PPT79REXX与SDSF的交互1、用subcom sdsf 命令查看sdsf宿主环境是否在系统宿主环境表中。2、若不在，加入：Rc=isfcalls(on)3、通过address sdsf“isfexec st”调用sdsf的状态（st）面板。2023-8-22精选PPT80REXX与IDCAMS的交互 IDCAMS可以用来维护VSAM数据集以及管理编目，
44、同时也可以对非VSAM数据集进行操作 IDCAMS主要命令：DEFINE定义编目、别名、数据集、次索引数据集和路径等。DELETE、ALTER、BLDINDEX、LISTCAT、PRINT REPRO EXPORT IMPORT2023-8-22精选PPT81 编写rexx脚本可以为VSAM数据集及编目的管理带来便利。通过rexx执行listcat命令查看数据集编目名 Eg：/*REXX*/X=OUTTRAP(OUTPUT.)“LISTCAT ENTRIES(UR535.REXX.TEST)Do I=1 TO OUTPUT.0 SAY OUTPUT.I END2023-8-22精选PPT82在通常情况下，提交作业的方式来调用IDCAMS的程序比较常用。/*REXX*/QUEUE“/UR535A JOB NOTIFY=UR535QUEUE“/STEP EXEC PGM=IDCAMS”QUEUE“LISTCAT ENTRIES(DSNAME)”X=OUTTRAP(OUTPUT.)ADDRESS TSO“SUBMIT*”DO I=1 TO OUTPUT.0 .2023-8-22精选PPT83 REXX上机实践 2023-8-22精选PPT84此课件下载可自行编辑修改，供参考！感谢您的支持，我们努力做得更好！
