从Cobol 6.3以JSON格式调用REST API HTTPS端点

mkh04yzy  于 2023-08-08  发布在  其他
关注(0)|答案(1)|浏览(153)

我正在尝试执行下面的EXEC CICS WEB匡威命令,并与HTTPS端点在JSON格式从Cobol进行通信,同时执行,我得到了套接字错误。响应代码分别为17和42。

EXEC CICS WEB CONVERSE                   
          PATH(PATH-NAME)                
          PATHLENGTH(PATH-LENGTH)        
          GET                            
          QUERYSTRING(DATA-BODY)         
          QUERYSTRLEN(DATA-BODY-LENGTH)  
          TOCONTAINER('DFHJSON-JSON')    
          TOCHANNEL(CHANNEL-NAME)        
          MEDIATYPE(CONTENT-TYPE)        
          STATUSCODE(HTTPS-RESP)         
          STATUSTEXT(HTTPS-STAT)         
          STATUSLEN(HTTPS-STAT-LEN)      
          SESSTOKEN(TOKEN)               
          CHARACTERSET('UTF-8')          
          RESP(CICS-RESP)                
          RESP2(CICS-RESP2)              
          END-EXEC

字符串
你能帮我解决这个问题吗?
如果你知道任何参考资料也让我知道。
我期望执行此命令并从API端点接收响应

mzmfm0qo

mzmfm0qo1#

这些错误代码- RESP=17,RESP 2 =42 -表示套接字错误。您没有显示WEB OPEN命令,但我从您的字段名称猜测您正在尝试使用HTTPS连接到服务器。您是否收到对WEB OPEN命令的正常响应?我首先要检查的是您的CICS区域是否支持HTTPS。该区域必须已使用包含至少一个证书的密钥环进行初始化。如果在初始化时未指定密钥环,则应用程序只能使用HTTP而不能使用HTTPS。
红皮书SG 24 -8161的第11章中有一个示例CICS WEB客户端程序,可以从https://www.redbooks.ibm.com/abstracts/sg248161.html下载。你可能会发现它有帮助。

相关问题