简单的分享，如果有不一样的见解可以一起讨论

1）AS400上安装对应的577ODG1 这个软件

如果你不知道有没有装，你可以通过

GO LICPGM 这个命令，10 去看到哪些安装的软件

怎么安装具体如下：

1. To install the libraries, run the command go licpgm

2. Select option 11 to install a Licensed Program and install option 39

如果发现有IBM HTTP Server For I

2）启动 HTTP 服务，这是基本要求。

STRTCPSVR *HTTP HTTPSVR(*ADMIN)

192.168.88.249 是AS400 的IP 地址

http://192.168.88.249:2001/HTTPAdmin

如果说你的User没有权限去登录Admin，需要给User profile *ALLOBJ and *IOSYSCFG的权限去创建服务器

因为Web服务是需要指定对应的user profile但是如果是个人的user profile是有密码过期的这样就会导致你的user 密码过期后面API 服务不能用了。所有要create 一个永久不过期的用户：

CRTUSRPRF USRPRF(IWSREST02) PASSWORD(*NONE)

3）服务器create 成功后接下来就是部署rest API 服务

部署服务的时候可以选择SRVPGM 和 PGM

Produce的形式：

h nomain PGMINFO(∗PCML:∗MODULE)
d ConvertTemp pr
d tempIn 10 const
d tempOut 10
p ConvertTemp b export
d ConvertTemp pi
d tempIn 10 const
d tempOut 10
d tempI s 8P 2
d tempO s 8P 2
d value S 50A
/free
value = %STR(%ADDR(tempIn));
tempI=%DEC(value:7:2);
tempO = (5/9)∗(tempI - 32);
value = %CHAR(tempO);
tempOut = value;
%STR(%ADDR(tempOut):10)=tempOut;
/end-free
p ConvertTemp e

PGM 的形式：

/freectl-opt *debug(yes) PGMINFO(∗PCML:*DCLCASE:∗MODULE);dcl-f custpf usage(*update) keyed                        rename(TESTPFR:NEWNAME) USROPN ;dcl-s k1cust like(CUBK)  INZ(1);dcl-ds w1request INZ qualified;customer  char(10);customername char(10);end-ds W1reqeust;dcl-pi *n;// requestcustomerds  likeds(w1request);//responsestatuscode int(5);end-pi;exsr sr100;eval *INLR = *ON;return;'// ================================================== begsr SR100; OPEN NEWNAME;eval k1cust = w1request.customer;  Chain  k1cust   NEWNAME;If %found(NEWNAME);eval custname =w1request.customername;update NEWNAME;eval statuscode = 200;else;eval statuscode = 400;endif;Close NEWNAME;endsr;   // ==================================================
/end-free

但是记得如果说要让IWS 识别到对应的SRVPGM或者PGM

是需要在 H Spec 定义，不然识别不到

H PGMINFO(∗PCML:∗MODULE)

API服务给到名字

[外链图片转存失败,源站可能有防盗链机制,建议将图片保存下来直接上传(img-nKNKCH1T-1656494130334)(https://mmbiz.qpic.cn/mmbiz_png/WxKgPiboJnT3CMr74DI8WmNj5DDvcQHnQxwsCAdwevG10PbOdLmcnfDTcsREWcajaX0ic41R7zmibv2Ck1M8bibGdg/640?wx_fmt=png)]

选择对应的方法

加好library list

部署成功

属性显示基本资源 URL:

http://192.168.88.249:10021/web/services/fto

停 WEB 服务

ENDTCPSVR SERVER(*HTTP) HTTPSVR(IWSREST02)

需要Debug API Job

Subsystem QUSRWRK

Job QZRCSRVS

STRSRVJOB 去然后STRDBG debug 到对应的API 后台QZRCSRVS job，记得SRVPGM 是不可以Debug的，只要部署的时候是Program的时候才可以

GET、POST、PUT、DELETE

GET 和Delete 是只能用Path_Parm 或者query_Parm 是不可以用Body的

说完了部署API 的服务，接下来就是需要对API服务进行SSL 的配置

配置SSL/TLS设置

配置机器使用SSL/TLS可以启用加密通信。这样做有助于防止数据在传输过程中被截获、破解或篡改。

使用自签证书时的配置流程

创建和安装设备证书：

IBM 主要是通过 iKeyman
启用SSL/TLS：

配置SSL
重启服务器

SSL的IBM 的SSL 主要是用iKeyman 生成密钥：

How do I extract certificates from key databases using the iKeyman utility?

https://www.youtube.com/watch?v=aFUF8KAaMIQ

How do I receive a signed certificate from a certificate authority using the iKeyman utility?

https://www.youtube.com/watch?v=Wq1ftCAow9Y

AS400 API 从零到一的整个历程相关推荐

机械转行前端，半年零基础自学的心路历程
机械转行前端,半年零基础自学的心路历程标签: 转行自学原创:Michael.Lu 277133779@qq .com 转载注明出处这是初级群(西安初级前端群:4983126)里边的一次分享,然 ...
Unreal Python API 从零到入门
目录前言 Unreal Python API的使用 - 运行环境 UE4 Python插件安装UE4 Python脚本插件运行脚本打开output log 输入运行路径编写脚本在编写Pyt ...
trident API指南
trident API指南 @(STORM)[storm] trident API指南零概述 1 本地分区操作 2 重新分区操作 3 聚合操作 4 流分组操作 5合并与连接一本地分区操作一 ...
HDFS Java API 操作
文章目录 HDFS Java API操作零.启动hadoop 一.HDFS常见类接口与方法 1.hdfs 常见类与接口 2.FileSystem 的常用方法二.Java 创建Hadoop项目 1. ...
类似零基础学python的小说_零基础小白十分钟用Python搭建小说网站！Python真的强！...
零基础小白十分钟用Python搭建小说网站!Python真的强!-1.jpg (128.29 KB, 下载次数: 0) 2018-10-8 18:51 上传 Python 和放大镜的二进制代码人生苦 ...
[RKNN] 3. 零拷贝接口推理
系列文章目录 [RKNN] 1. 入门介绍 [RKNN] 2. 模型转换和推理–API介绍&以yolox为例文章目录系列文章目录前言一.零拷贝推理yolox 1.1 零拷贝和通用对比 ...
港股第四家“造车新势力“，零跑汽车通过IPO聆讯
港交所即将迎来第四家"造车新势力"!8月29日,零跑汽车通过港交所聆讯. 其预计于本周启动IPO前预路演,最快将在9月招股,预期募资或达15亿美元.这也是"造车新势力&q ...
蓝桥杯单片机零基础到国二经验分享
我参加的是第十三届蓝桥杯大赛,从最开始的零基础,毫无头绪,到拿下国二,颇有体会,在这里将我的备赛经验分享给大家,希望可以帮到一些正在备赛的蓝桥杯er 目录一. 蓝桥杯-单片机组介绍二 . 零基础到 ...
非科班零基础转行学计算机的分享
零基础学计算机心里历程疯狂的想法为什么是疯狂的想法? 疯狂吗? 我的奥德赛时期疯狂的想法大家好,今天开始决定写技术博客,感谢遇见!写博客为了什么呢?反复问自己, 培养写作习惯. 分享知识,分享 ...

AS400 API 从零到一的整个历程

配置SSL/TLS设置

How do I extract certificates from key databases using the iKeyman utility?

How do I receive a signed certificate from a certificate authority using the iKeyman utility?

AS400 API 从零到一的整个历程相关推荐

最新文章

热门文章