就是INSPECT REPLACING的缩写。INSPECT CS CONVERTING "EE" TO "00". 也可以加上BEFORE，AFTER。COBOL的课没上过，这是从网页上找到的，应该对你的问题有些用处，字面上理解就是对字符串CS里面，进行 字符替换 操作的一个语句，INSPECT A1 CONVERTING ' ' TO '%' AFTER '%'这个应该是...
cobol知识点集锦COBOL数据类型 计息是银行的一项重要业务，包括日常代理客户收、付计算客户利息和年度计息等。目前，这些工作大多数是在IBM ES9000主机的SAFE应用系统平台上进行，该系统联机程序和联机计息程序是用IBM370汇编语言实现的。为方便汇编语言读写，在VSAM文件存储的数据中，数据存放格式进行了特殊的定义。如日期...
INSPECTCSCONVERTING"EE"TO"00".也可以加上BEFORE，AFTER。STRING 将几个字符串合并成一个字符串。 STRINGADELIMITEDBYSPACE，"！"DELIMITEDBYSIZEINTOC.假设A中的内容是"HELLO",则结果是"HELLO!". DELIMITEDBYSPACE意思是碰到空格，或到A...
INSPECT CS REPLACING FIRST "E" BY "I". 结果"RIELWHEEL" INSPECT CS REPLACING FIRST "EE" BY "00",ALL "WH" BY "TH",CHARACTERS BY SPACE. 结果" 00 TH " INSPECT CONVERTING 就是INSPECT REPLACING的缩写。 INSPECT CS CONVERTING "EE" TO "00". 也可以加上BEFORE,AFTER。 STRING 将几个字符串合...
INSPECT CONVERTING 就是INSPECT REPLACING的缩写。 INSPECT CS CONVERTING "EE" TO "00". 也可以加上BEFORE,AFTER。 实例: 更多例子 IF判断 IF语句 IF CONDITION THEN STATEMENTS1/NEXT SENTENCE ELSE STATEMENTS2 END-IF/NEXT SENTENCE/ENDIF NEXT SENTENCE将跳出IF操作语句执行下一条语句。
结果RIELWHEEL INSPECT CS REPLACING FIRST EE BY 00,ALL WH BY TH,CHARACTERS BY SPACE. 结果 00 TH INSPECT CONVERTING 就是INSPECT REPLACING的缩写。 INSPECT CS CONVERTING EE TO 00. 也可以加上BEFORE,AFTER。 STRING 将几个字符串合并成一个字符串。 STRING A DELIMITED BY SPACE, ! DELIMITED BY SIZE...
INSPECT CONVERTING 就是INSPECT REPLACING的缩写。 INSPECT CS CONVERTING "EE" TO "00". 也可以加上BEFORE,AFTER。 STRING 将几个字符串合并成一个字符串。 STRING A DELIMITED BY SPACE," !" DELIMITED BY SIZE INTO C.假设A中的内容是"HELLO",则结果是"HELLO !". ...
"INSPECTCONVERTING就是INSPECTREPLACING的缩写。INSPECTCSCONVERTING"EE"TO"00".也可以加上BEFORE,AFTER。STRING将几个字符串合并成一个字符串。STRINGADELIMITEDBYSPACE,"!"DELIMITEDBYSIZEINTOC.假设A中的内容是"HELLO",则结果是"HELLO!".DELIMITEDBYSPACE意思是碰到空格,或到A的结尾或C的结尾,则合并A字符串结束。
66 INSPECT RECV-STRING CONVERTING 67 "abcdefghijklmnopqrstuvwxyz" TO 68 "ABCDEFGHIJKLMNOPQRSTUVWXYZ". 69 MOVE "Success" TO LOGMSG-TEXT. 70 PERFORM DO-USERLOG. 71 SET TPSUCCESS TO TRUE. 72 COPY TPRETURN REPLACING 73 DATA-REC BY RECV-STRING. ...
INSPECTCSCONVERTING"EE"TO"00".也可以加上BEFORE,AFTER。 STRING 将几个字符串合并成一个字符串。 STRINGADELIMITEDBYSPACE,"!"DELIMITEDBYSIZEINTOC.假设A中的内容是"HELLO",则结果是"HELLO!". DELIMITEDBYSPACE意思是碰到空格,或到A的结尾或C的结尾,则合并A字符串结束。 DELIMITEDBYSIZE意思是到"!"的结尾或...