IBM大型机论坛索引
 
登录
 
IBM大型机论坛索引 大型机:搜索 IBM Mainframe论坛:常见问题解答 寄存器
 

接收多发事件的ADSO存储过程


IBM大型机论坛 -> IDMS / ADSO
发表新话题   回复主题
查看上一个主题 :: 查看下一个主题  
作者 信息
瑜伽士47eie

新的用户


已加入:2006年8月16日
帖子:40
地点:印度

发布发表于:星期五八月21,2015 7:14下午
引用回复

嗨,团队,
我们正在开发一种存储过程,以接收来自
外部接口(在大型机外部)。

例如:

创建过程PP.ADDRESS
(
空字符(10)
ADDRESSLINE1字符(20)
ADDRESSLINE2字符(20)
ADDRESSLINE3字符(20)
)
外部名称ADDRESS
协议广告;

定义的字段将使用empID和地址行填充,并使用ADSO对话框进行处理。

可以在此定义中引入OCCURS子句吗?
方案是,此EMPID可以有多个地址&我应该能够收到
一次有多个地址。

注意:我尝试将ADDRESSLINES作为单个字符串CHARACTER(600)接收,并且通过该程序,我能够通过读取地址的第一个出现的前60个字符,第二个出现的后60个字符来处理10组地址。
例如:

创建过程PP.ADDRESS
(
空字符(10)
地址行字符(600)
)
外部名称ADDRESS
协议广告;

非常感谢CA ADSO存储过程专家的任何帮助。
回到顶部
查看用户资料 发送私信
罗希特·乌马尔吉卡(Rohit Umarjikar)

全球主持人


已加入:2010年9月21日
帖子:2582
地点:美国纽约

发布发表:2015年8月21日星期五8:49下午
引用回复

您好,

引用:
可以在此定义中引入OCCURS子句吗?


谁在您的位置创建存储过程?您自己尝试一下,然后您可以尝试看看,否则请向支持团队询问。因为这更像是手动问题。

引用:

我试图通过单个字符串CHARACTER(600)来接收ADDRESSLINES,并通过该程序,通过读取地址的第一个出现的前60个字符,第二个出现的后60个字符等,我能够处理10组地址。


构建一个Cobol数组并使用下标。所以我认为这是解决方案。
回到顶部
查看用户资料 发送私信
瑜伽士47eie

新的用户


已加入:2006年8月16日
帖子:40
地点:印度

发布发表于:星期五八月28,2015 12:10下午
引用回复

感谢Rohit的建议,...是的,我们是定义过程的人。我们尝试了可能性,并得出结论,存储过程中不可能有数组概念。

是的,我们尝试在IDMS工作记录中开发阵列概念,并尝试了最初尝试的工作原理。


谢谢
瑜伽士
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
发表新话题   回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> IDMS / ADSO

 


类似主题
话题 论坛 回覆
没有新帖 FSET无法在我的收据上使用 CICS 3
没有新帖 在JCL Procedure中我们如何执行R ... 清单和REXX 7
没有新帖 从字符串'...获取下5个数字 COBOL程式设计 4
没有新帖 需要一个宏来比较数据集并... 所有其他大型机主题 2
没有新帖 预处理器语句在P ... PL / I和组装商 1
搜索我们的论坛:


回到顶部