UNSTRING AAA [DELIMITED BY [ALL] B [OR [ALL] C] ...] INTO { C [DELIMITER IN D] [COUNT IN E] } ...[WITH POINTER F] [TALLYING IN G] [ON OVERFLOW PROC1] [NOT ON OVERFLOW PROC2] [END-UNSTRING] 将AAA中的字符放入C,如果还有其他变量,如C2,则等C放满后放入C2。 DELIMITED BY和...
● TALLYING IN:每个UNSTRING命令只能使用一个TALLYING短语。 ✧ DestCounter:保存受UNSTRING操作影响的目的字符串的个数。 ● ON OVERFLOW:是否溢出。UNSTRING命令在下列情况下程序会出现溢出的状况。 ✧ UNSTRING命令执行时,指针(变量POINTER)没有指向源字符串中的字符位置。 ✧ 所有的目的字符串已经处理完了...
Below are the different examples on different cases and syntax which are very useful while coding a cobol program. Given the result for each case for better understanding. Example 1:Capturing the count of any character in a string It gives count of a specific character in a string. As in t...
3.可通过ActiveXServerComponents(ActiveX服务器组件)来扩充功能,而ActiveXServerComponent可使用VisualBasic、Java、VisualC++、COBOL等语言来实现,有了它就可随意扩展功能。更令人兴奋的是,现在网上有很多第三方组件可以随意下载,想要什么尽可去Search、去Download,然后放在你的ASP代码中调用就OK啦。 4.ASP与任何ActiveXScr...
The same character must not appear more than once in either literal-4 or identifier-6. identifier-7 or literal-5 Specifies the replacing character string. The replacing character string (identifier-7 or literal-5) must be the same size as the replaced character string (identifier-6 or lite...
The same character must not appear more than once in either literal-4 or identifier-6. identifier-7 or literal-5 Specifies the replacing character string. The replacing character string (identifier-7 or literal-5) must be the same size as the replaced character string (identifier-6 or lite...