控制语言CL介绍.ppt

《控制语言CL介绍.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

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

2、SPFICFFPRTFPFLFPFSRC*PGM类型的目标，属性可以是：RPGLECLLECBLLE控制语言CL介绍二、OS/400系统中的目标2.目标的建立1.目标的分类例CRTLIB*LIBCRTSRCPF*FILEPF–SRCCRTPF*FILEPFCRTDSPF*FILEDSPFCRTRPGMOD*MODULERPGLECRTDTAARA*DTAARA控制语言CL介绍二、OS/400系统中的目标2.目标的建立1.目标的分类3.目标的限定控制语言CL介绍二、OS/400系统中的目标2.目标的建立1.目标的分类3.目标的限定4.

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

4、：QGPL，QTEMP，PAYLIB，CUSTLIB例：CALLPAY02与CALLPAYLIB/PAY02相关命令：ADDLIBLEDSPLIBLCHGLIBLEDTLIBLCHGCURLIBRMVLIBLE控制语言CL介绍一、CL简介二、OS/400系统中的目标三、CL命令的结构控制语言CL介绍三、CL命令的结构命令的结构：DSPLIBLIB(PAYLIB)命令名参数(参数值)命令输入形式：参数形式位置形式控制语言CL介绍三、CL命令的结构1.参数形式例：DSPLIBLIB(PAYLIB)OUTPUT(*PRINT)DSPLIB

5、OUTPUT(*PRINT)LIB(PAYLIB)控制语言CL介绍三、CL命令的结构2.位置形式例：DSPLIBPAYLIB*PRINT控制语言CL介绍三、CL命令的结构2.位置形式例：DSPLIBPAYLIB*PRINT得到命令的参数：①命令②？命令例：DSPOBJ?DSPOBJ控制语言CL介绍一、CL简介二、OS/400系统中的目标三、CL命令的结构四、CL程序控制语言CL介绍四、CL程序1.程序结构PGMDCLDCLFCL处理命令；逻辑控制命令；函数；程序控制命令ENDPGM控制语言CL介绍/*……*/，“+”

6、或“-”变量以“&”开头，第一个字符必须为字母或@、$、#之一CL程序可用的目标：－显示文件－数据文件－其它程序控制语言CL介绍四、CL程序1.程序结构2.程序中常用命令及程序设计⑴PGM⑵DCLF命令⑶DCL命令(4)IF..ELSECALL…(5)ENDPGM编码规则：变量名&A--Z冒号命令与标号的分隔符空格参数的分隔符括号分隔键字与参数斜线限定名分隔符引号文本需用引号括起来注释/**/控制语言CL介绍四、CL程序1.程序结构2.程序中常用命令及程序设计⑴PGMPARM(变量1变量2…变量n)⑵DCLF命令格式：DCLFFIL

7、E⑶DCL命令格式：DCLVARTYPELENVALUE变量类型：*DEC*CHAR*LGL例：DCL&A*DEC(52)543.21DCL&B*CHAR5‘ABCD’DCL&C*LGL1‘1’控制语言CL介绍四、CL程序1.程序结构2.程序中常用命令及程序设计⑷条件执行命令格式：IFCOND(条件)THEN(CL命令)ELSECMD(CL命令)关系运算符：＜,＝,＞,≤,≥,*LT,*EQ,*GT,*LE,*NL,*NG,*GE,*NE例：①IFCOND(&KESP*EQ5)THEN(CALLPGM1)②IF(&AMT＞0)THE

8、N(CALLARCQW)③IF(&AMT*GT1000)SNDBRKMSGMSG(‘’)ELSECMD(GOTOLABELS)④IF(&A*NE&B)RETURN⑤IF(&A=&B)ELSERETURN⑥IF(&LN99)GOTOEN