控制语言CL介绍

1、控制语言CL介绍1控制语言CL介绍一、CL简介CL：CONTROL LANGUAGE2控制语言CL介绍一、CL简介 二、OS/400系统中的目标3控制语言CL介绍 二、OS/400系统中的目标 常用的目标类型有：*LIB *FILE *PGM *DTAARA *DTAQ *OUTQ *MSGQ*JOBD *MODULE*SRVPGM1.目标的分类4控制语言CL介绍 二、OS/400系统中的目标 常用的目标类型有：*LIB *FILE *PGM *DTAARA *DTAQ *OUTQ *MSGQ*JOBD *MODULE*SRVPGM1.目标的分类*FILE类型的目标属性可以是：DSPF ICF

2、F PRTF PF LF PFSRC*PGM类型的目标，属性可以是：RPGLE CLLECBLLE5控制语言CL介绍 二、OS/400系统中的目标 2.目标的建立 1.目标的分类例CRTLIB *LIBCRTSRCPF*FILEPF SRCCRTPF*FILEPFCRTDSPF*FILEDSPFCRTRPGMOD*MODULERPGLECRTDTAARA*DTAARA6控制语言CL介绍 二、OS/400系统中的目标 2.目标的建立 1.目标的分类3.目标的限定 7控制语言CL介绍 二、OS/400系统中的目标 2.目标的建立 1.目标的分类3.目标的限定 4.显示目标的相关信息DSPOBJD

3、OBJ（库/目标名） OBJTYPE（ ）8控制语言CL介绍 二、OS/400系统中的目标 2.目标的建立 1.目标的分类3.目标的限定 4.显示目标的相关信息5.目标的查找 库列表由四部分组成：系统库：QSYS，QHLPSYS，QUSRSYS产品库：QRPG，QCBL当前库：MYLIB用户库：QGPL，QTEMP，PAYLIB，CUSTLIB9控制语言CL介绍 二、OS/400系统中的目标 5.目标的查找 库列表由四部分组成：系统库：QSYS，QHLPSYS，QUSRSYS产品库：QRPG，QCBL当前库：MYLIB用户库：QGPL，QTEMP，PAYLIB，CUSTLIB例：CALL PA

4、Y02与CALL PAYLIB/PAY02 相关命令：ADDLIBLEDSPLIBL CHGLIBLEDTLIBLCHGCURLIB RMVLIBLE10控制语言CL介绍一、CL简介 二、OS/400系统中的目标三、CL命令的结构 11控制语言CL介绍三、CL命令的结构 命令的结构：DSPLIBLIB(PAYLIB)命令名参数(参数值)命令输入形式： 参数形式 位置形式12控制语言CL介绍三、CL命令的结构 1.参数形式例：DSPLIBLIB(PAYLIB)OUTPUT(*PRINT)DSPLIBOUTPUT(*PRINT) LIB(PAYLIB)13控制语言CL介绍三、CL命令的结构 2.位

5、置形式例：DSPLIBPAYLIB*PRINT14控制语言CL介绍三、CL命令的结构 2.位置形式例：DSPLIBPAYLIB*PRINT得到命令的参数：命令 ？命令例： DSPOBJ ?DSPOBJ15控制语言CL介绍一、CL简介 二、OS/400系统中的目标三、CL命令的结构 四、CL程序 16控制语言CL介绍四、CL程序 1.程序结构PGMDCLDCLFCL处理命令；逻辑控制命令；函数；程序控制命令ENDPGM17控制语言CL介绍/*/，“ +”或“-”变量以“&”开头，第一个字符必须为字母或、$、#之一CL程序可用的目标： 显示文件 数据文件 其它程序18控制语言CL介绍四、CL程序

6、1.程序结构2.程序中常用命令及程序设计PGMDCLF命令DCL命令(4)IF.ELSE CALL(5)ENDPGM编码规则： 变量名 & A-Z 冒号 命令与标号的分隔符 空格 参数的分隔符 括号 分隔键字与参数 斜线 限定名分隔符 引号 文本需用引号括起来 注释 /* */ 19控制语言CL介绍四、CL程序 1.程序结构2.程序中常用命令及程序设计PGM PARM(变量1 变量2变量n)DCLF命令格式：DCLF FILEDCL命令格式：DCL VAR TYPE LEN VALUE 变量类型：*DEC*CHAR*LGL例：DCL &A *DEC(5 2) 543.21 DCL &B *CH

7、AR 5 ABCDDCL &C *LGL 1 120控制语言CL介绍四、CL程序 1.程序结构2.程序中常用命令及程序设计条件执行命令 格式：IF COND(条件) THEN(CL命令)ELSECMD(CL命令) 关系运算符：,*LT,*EQ,*GT,*LE,*NL,*NG,*GE,*NE例：IFCOND(&KESP*EQ5)THEN(CALL PGM1)IF(&AMT0)THEN(CALL ARCQW)IF(&AMT*GT1000) SNDBRKMSG MSG( )ELSECMD(GOTOLABELS)IF(&A*NE&B)RETURNIF(&A = &B)ELSERETURNIF(&LN9

8、9)GOTOENDLABEL21控制语言CL介绍四、CL程序 1.程序结构2.程序中常用命令及程序设计条件执行命令 DO命令组:例：IF(&A *GT100)THEN(DO) CALLPGM1 CALLPGM2ENDDOELSECMD(DO) CALLPGM3 CALLPGM4ENDDO22控制语言CL介绍四、CL程序 1.程序结构2.程序中常用命令及程序设计GOTO命令格式：GOTOCMDLBL（标号名）例1： PGM MENU：SNDRCVFRCDFMT(MENU1) : : IF(&OPTION = 12)GOTOEND : :GOTO MENU END: ENDPGM23控制语言CL介

9、绍四、CL程序 1.程序结构2.程序中常用命令及程序设计GOTO命令例2：PGMDCLFMENFILEBEGIN：SNDRCVFRCDFMT(MENU1)IF(&OPT*EQ1)CALLINQCUS ELSEIF(&OPT*EQ2)CALLINQITM ELSEIF(&OPT*EQ3)CALLINQSUP ELSEIF(*OPT*EQ29)SIGNOFF GOTOBEGINENDPGM 24CL 控制语言表达式：表达式类型：算术、字符串、关系、逻辑算术操作 +;-;*;/字符串 *BCAT;*TCAT;*CAT关系操作 *EQ;*GT;*LT;*GE;*LE;*NE *NG;*NL逻辑操作 *

10、AND;*OR;*NOT表达式的操作数：常量、变量、函数、另一表达 式25控制语言CL介绍四、CL程序 1.程序结构2.程序中常用命令及程序设计CHGVAR 连接串*CAT *TCAT *BCATCHGVAR&AA(&CC*CAT&BB)SNDMSGMSG(Customer *BCAT&CSTNAME*CATORDERBY *TCAT &DAYS)TOMSGQ(ARDEPTQ)26CL 控制语言CHGVAR 修改变量 CHGVAR VAR(变量名) VALUE(值) 值：常量、变量、表达式、函数27控制语言CL介绍四、CL程序 1.程序结构2.程序中常用命令及程序设计与数据区相关命令CRTDT

11、AARACHGDTAARA DSPDTAARADLTDTAARA可设初值，字符变量值用引号。取系统值命令（取系统时间）RTVSYSVALQTIME&TIM为一字符型6位长的字段。函数 %SST取子串，格式 %SST（源串 起始位置 长度）可用在CHGVAR等许多语句中。例：CHGVARVAR(%SST(&LIB 6 1) VALUE(%SST(&TEAM &X1)28控制语言CL介绍四、CL程序 1.程序结构2.程序中常用命令及程序设计CALL与TFRCTL命令CALL调用程序，返回到发出CALL命令的程序的下一句，TFRCTL则返回到发出TFRCTL的语句的程序的上一程序，但ILE CL中T

12、FRCTL无效。CPYF命令CPYFFROMFILE( / ) TOFILE( / ) FROMMBR( ) TOMBR( )MBROPT(*ADD*REPLACE )29控制语言CL介绍四、CL程序 1.程序结构2.程序中常用命令及程序设计参数传递a.调用程序格式：CALLPGM( )PARM(变量1变量2变量n)b.被调用程序格式：PGMPARM(变量1变量2变量n)SNDRCVF格式： SNDRCVF DEV(设备名）RCDFMT(格式名）30控制语言CL介绍四、CL程序 1.程序结构2.程序中常用命令及程序设计MONMSG命令监视信息，分为程序级、命令级，其中程序级是在命令前定义。MO

13、NMSGMSGID( )CMPDTA( )EXEC( )例1.CRTLIBPFLIBMONMSGCPF2111EXEC（DO）:ENDDO31控制语言CL介绍四、CL程序 1.程序结构2.程序中常用命令及程序设计MONMSG命令例2.PGMDCL: DCLMONMSG( ) :命令MONMSG( ):ENDPGM信息文件：QCPFMSG，查看可用MSGID： WRKMSGF(QSYS/QCPFMSG)32控制语言CL介绍一、CL简介 二、OS/400系统中的目标三、CL命令的结构 四、CL程序 五、菜 单 33控制语言CL介绍五、菜 单 1.菜单名 GO 2.菜单任选项3.选择或命令行4.功能

14、键 相关命令：CHGMNU，CRTMNU，DLTMNU，DSPMNUA，GO，STRPGMMNU，WRKMNU34控制语言CL介绍一、CL简介 二、OS/400系统中的目标三、CL命令的结构 四、CL程序 五、菜 单 六、控制程序间的通讯和流程35控制语言CL介绍六、控制程序间的通讯和流程 1.CALL命令格式：CALL PGM（库名/程序名） PARM（参数值）2.RETURN命令3.程序间传递参数36控制语言CL介绍一、CL简介 二、OS/400系统中的目标三、CL命令的结构 四、CL程序 五、菜 单 六、控制程序间的通讯和流程七、程序的编译 37控制语言CL介绍七、程序的编译 ILE：1. 生成MODULE CRTCLMOD 生成MODULE后可以连接到程序中。2.生成PGM CRTPGM 可将已有的MODULE连接成程序3.生成只有一个MODULE的程序 CRTBNDCL命令，它将1与2合并成一步完成。非ILE： CRTCLPGM38控制语言CL介绍一、CL简介 二、OS/400系统中的目标三、CL命令的结构 四、CL程序 五、菜 单 六、控制程序间的通讯和流程 七、程序的编译 八、程序调试39控制语言CL介绍八、调试程序1.DEBUG命令ATTR 提供变量的属性，包括类型、长度、小