Re: External Re: IWS Setup

I have a doc with a screen shot of every screen and how it was filled out.
I can send that to see if we can find an error.

This was my second attempt. The first did exactly the same so something
basic that I do not understand must be happening.

-----Original Message-----
From: WEB400 <web400-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Marco
Facchinetti
Sent: Friday, January 17, 2025 7:08 AM
To: Web Enabling the IBM i (AS/400 and iSeries) <web400@xxxxxxxxxxxxxxxxxx

Subject: Re: [WEB400] External Re: IWS Setup

When you publish the service the wizard shows the list of input fields (I
guess only if GET) and you can associate a different name than the PCML
one. Maybe you choose twice the same name from the list box?

Anyway I usually remove and publish again the service (on our system we
have a simple program to stop the service, delete it and add as new service
via QSH).

HTH
--
Marco Facchinetti

Mr S.r.l.

Tel. 035 962885
Cel. 393 9620498

Skype: facchinettimarco


Il giorno ven 17 gen 2025 alle ore 13:49 (WalzCraft) Jerry Forss <
JForss@xxxxxxxxxxxxx> ha scritto:

Based on my parameter list in the RPG, the way I defined the parameter
usage in the service, (EntEnvir as Input, EntCustNo as Input/Output),
I would agree that something doesn't look right.

But why?

Why is the EntEnvir defined twice at the bottom, both as char and

numeric?

From Service Properties - General

URI path template:/{entenvir:\w+}/{entcustno:\d+}

Swagger from service
{
"swagger": "2.0",
"info": {
"title": "ADRBAL APIs",
"description": "APIs available for ADRBAL",
"version": "1.0.0"
},
"host": "192.168.1.11:10021",
"schemes": [
"http"
],
"basePath": "/web/services/ADRBAL",
"tags": [
{
"name": "ADRBAL APIs",
"description": "APIs available for ADRBAL"
}
],
"definitions": {
"WOMADRBALRResult": {
"type": "object",
"properties": {
"ENTCUSTNO": {
"type": "number"
},
"ENTBILLNAME": {
"type": "string",
"maxLength": 35
},
"ENTBILLALTNAME": {
"type": "string",
"maxLength": 35
},
"ENTBILLADDR1": {
"type": "string",
"maxLength": 35
},
"ENTBILLADDR2": {
"type": "string",
"maxLength": 35
},
"ENTBILLADDR3": {
"type": "string",
"maxLength": 35
},
"ENTBILLCITY": {
"type": "string",
"maxLength": 35
},
"ENTBILLSTATE": {
"type": "string",
"maxLength": 2
},
"ENTBILLZIP": {
"type": "string",
"maxLength": 10
},
"ENTBILLCOUNTRY": {
"type": "string",
"maxLength": 2
},
"ENTSHIPADDR1": {
"type": "string",
"maxLength": 35
},
"ENTSHIPADDR2": {
"type": "string",
"maxLength": 35
},
"ENTSHIPADDR3": {
"type": "string",
"maxLength": 35
},
"ENTSHIPCITY": {
"type": "string",
"maxLength": 35
},
"ENTSHIPSTATE": {
"type": "string",
"maxLength": 2
},
"ENTSHIPZIP": {
"type": "string",
"maxLength": 10
},
"ENTSHIPCOUNTRY": {
"type": "string",
"maxLength": 2
},
"ENTCURRENTBALANCE": {
"type": "number"
},
"ENTPASTDUE": {
"type": "number"
},
"ENTFAIL": {
"type": "string",
"maxLength": 100
}
}
}
},
"paths": {
"/{entenvir}/{entcustno}": {
"get": {
"tags": [
"ADRBAL APIs"
],
"operationId": "WOMADRBALR",
"consumes": [
"*/*"
],
"produces": [
"application/json"
],
"parameters": [
{
"name": "entenvir",
"in": "path",
"required": true,
"type": "string",
"pattern": "\\w+",
"maxLength": 2
},
{
"name": "entenvir",
"in": "path",
"required": true,
"type": "number",
"pattern": "\\w+"
},
{
"name": "entcustno",
"in": "path",
"required": true,
"type": "string",
"pattern": "\\d+"
}
],
"responses": {
"200": {
"description": "Successful operation",
"schema": {
"$ref": "#/definitions/WOMADRBALRResult"
}
},
"500": {
"description": "Unexpected exception"
}
}
}
}
}
}

-----Original Message-----
From: WEB400 <web400-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Marco
Facchinetti
Sent: Thursday, January 16, 2025 4:29 PM
To: Web Enabling the IBM i (AS/400 and iSeries)
<web400@xxxxxxxxxxxxxxxxxx

Subject: Re: [WEB400] External Re: IWS Setup

This one seems wrong:

<data length="8" name="ENTCUSTNO" precision="0"

restInPathParam="entenvir"

type="packed" usage="inputoutput"/>

The association between the RPG name and the parameter is wrong.

This is a short sample (2 parameters + a single field response):

<pcml restUriPathTemplate="/{type:\w+}/{code:\w+}" version="7.0">
<program errormessage="" httpheaders="*NONE"

httpstatusonfailure="500"

httpstatusonsuccess="200"
inputWrapperIdentifier="TSTIWSInput" name="TSTIWS"
outputWrapperIdentifier="TSTIWSResult" parseorder="CUSTADDR"
path="/QSYS.LIB/MULTEST.LIB/TSTIWS.PGM"
restConsumes="application/json" restHttpRequestMethod="GET"
restProduces="application/json" threadsafe="false"
trimmode="*TRAILING" wrapInputParams="false" wrapOutputParam="true">
<data length="2" name="CUSTTYPE" restInPathParam="type"

type="char"

usage="input"/>
<data length="5" name="CUSTCODE" restInPathParam="code"

type="char"

usage="input"/>
<data length="100" name="CUSTADDR" type="char" usage="output"/>
</program>
</pcml>

{
"swagger": "2.0",
"info": {
"title": "TSTIWS APIs",
"description": "APIs available for TSTIWS",
"version": "1.0.0"
},
"basePath": "/web/services/TSTIWS",
"tags": [
{
"name": "TSTIWS APIs",
"description": "APIs available for TSTIWS"
}
],
"definitions": {
"TSTIWSResult": {
"type": "object",
"properties": {
"CUSTADDR": {
"type": "string",
"maxLength": 100
}
}
}
},
"paths": {
"/{type}/{code}": {
"get": {
"tags": [
"TSTIWS APIs"
],
"operationId": "TSTIWS",
"consumes": [
"application/json"
],
"produces": [
"application/json"
],
"parameters": [
{
"name": "type",
"in": "path",
"required": true,
"type": "string",
"pattern": "\\w+",
"maxLength": 2
},
{
"name": "code",
"in": "path",
"required": true,
"type": "string",
"pattern": "\\w+",
"maxLength": 5
}
],
"responses": {
"200": {
"description": "Successful operation",
"schema": {
"$ref": "#/definitions/TSTIWSResult"
}
},
"500": {
"description": "Unexpected exception"
}
}
}
}
}
}

--
Marco Facchinetti

Mr S.r.l.

Tel. 035 962885
Cel. 393 9620498

Skype: facchinettimarco


Il giorno gio 16 gen 2025 alle ore 21:49 (WalzCraft) Jerry Forss <
JForss@xxxxxxxxxxxxx> ha scritto:

Sorry.

Brain thing today.

<pcml restUriPathTemplate="/{entenvir:\w+}/{entcustno:\d+}"

version="7.0">

<program errormessage="" httpheaders="*NONE"

httpstatusonfailure="500"

httpstatusonsuccess="200"
inputWrapperIdentifier="WOMADRBALRInput" name="WOMADRBALR"
outputWrapperIdentifier="WOMADRBALRResult"
parseorder="ENTCUSTNO ENTBILLNAME ENTBILLALTNAME
ENTBILLADDR1
ENTBILLADDR2 ENTBILLADDR3 ENTBILLCITY ENTBILLSTATE ENTBILLZIP
ENTBILLCOUNTRY ENTSHIPADDR1 ENTSHIPADDR2 ENTSHIPADDR3 ENTSHIPCITY
ENTSHIPSTATE ENTSHIPZIP ENTSHIPCOUNTRY ENTCURRENTBALANCE ENTPASTDUE

ENTFAIL"

path="/QSYS.LIB/UTILITIES.LIB/WOMADRBALR.PGM"

restConsumes="*/*"

restHttpRequestMethod="GET"
restProduces="application/json" threadsafe="false"
trimmode="*TRAILING" wrapInputParams="false" wrapOutputParam="true">
<data length="2" name="ENTENVIR" restInPathParam="entenvir"
type="char" usage="input"/>
<data length="8" name="ENTCUSTNO" precision="0"
restInPathParam="entenvir" type="packed" usage="inputoutput"/>
<data length="35" name="ENTBILLNAME" type="char"

usage="output"/>

<data length="35" name="ENTBILLALTNAME" type="char"
usage="output"/>
<data length="35" name="ENTBILLADDR1" type="char"

usage="output"/>

<data length="35" name="ENTBILLADDR2" type="char"

usage="output"/>

<data length="35" name="ENTBILLADDR3" type="char"

usage="output"/>

<data length="35" name="ENTBILLCITY" type="char"

usage="output"/>

<data length="2" name="ENTBILLSTATE" type="char"

usage="output"/>

<data length="10" name="ENTBILLZIP" type="char"

usage="output"/>

<data length="2" name="ENTBILLCOUNTRY" type="char"

usage="output"/>

<data length="35" name="ENTSHIPADDR1" type="char"

usage="output"/>

<data length="35" name="ENTSHIPADDR2" type="char"

usage="output"/>

<data length="35" name="ENTSHIPADDR3" type="char"

usage="output"/>

<data length="35" name="ENTSHIPCITY" type="char"

usage="output"/>

<data length="2" name="ENTSHIPSTATE" type="char"

usage="output"/>

<data length="10" name="ENTSHIPZIP" type="char"

usage="output"/>

<data length="2" name="ENTSHIPCOUNTRY" type="char"

usage="output"/>

<data length="9" name="ENTCURRENTBALANCE" precision="2"
type="packed" usage="output"/>
<data length="9" name="ENTPASTDUE" precision="2" type="packed"
usage="output"/>
<data length="100" name="ENTFAIL" type="char" usage="output"/>
</program>
</pcml>

-----Original Message-----
From: WEB400 <web400-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of
(WalzCraft) Jerry Forss
Sent: Thursday, January 16, 2025 2:42 PM
To: Web Enabling the IBM i (AS/400 and iSeries)
<web400@xxxxxxxxxxxxxxxxxx

Subject: Re: [WEB400] External Re: IWS Setup

I am sorry for being so dumb about this.

Is that in the IFS?
How do I get to that path, after I change the IP of course.

-----Original Message-----
From: WEB400 <web400-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of Marco
Facchinetti
Sent: Thursday, January 16, 2025 2:29 PM
To: Web Enabling the IBM i (AS/400 and iSeries)
<web400@xxxxxxxxxxxxxxxxxx

Subject: External Re: [WEB400] IWS Setup

CAUTION: This email originated from outside of the organization. Do
not click links or open attachments unless you recognize the sender
and know the content is safe.

Can you please post ADRBAL.pcml?

/www/YOURIWSSERVER/webservices/services/ADRBAL/ADRBAL.pcml

Best regards
--
Marco Facchinetti

Mr S.r.l.

Tel. 035 962885
Cel. 393 9620498

Skype: facchinettimarco


Il giorno gio 16 gen 2025 alle ore 17:08 (WalzCraft) Jerry Forss <
JForss@xxxxxxxxxxxxx> ha scritto:

Hi All

I am trying to set a Web Server and Service for the first time and
it's not finding it when I test it.

I am using SoapUI to test.

Service Properties - General
Program /QSYS.LIB/UTILITIES.LIB/WOMADRBALR.PGM

URL from Service Properties (IP changed to IBMi IP) http://IBMI
IP:10021/web/services/ADRBAL





Parameters
ENTENVIR

char

*PATH_PARAM

entenvir

*NONE

ENTCUSTNO

packed

*PATH_PARAM

entenvir

*NONE





In SoupUI
Method Get
Endpoint http://IBMi IP:10021/
Resource /web/services/ADRBAL/AA/780

Response
HTTP/1.1 404 Not Found
Date: Thu, 16 Jan 2025 14:44:47 GMT
Server: Apache
Content-Length: 0
Keep-Alive: timeout=300, max=99
Connection: Keep-Alive
Content-Language: en-US

Parameters in RPG Pgm
Dcl-pi WOMAdrBalR;
EntEnvir Char(2);
EntCustNo Packed(8 : 0);
EntBillName Char(35);
EntBillAltName Char(35);
EntBillAddr1 Char(35);
EntBillAddr2 Char(35);
EntBillAddr3 Char(35);
EntBillCity Char(35);
EntBillState Char(2);
EntBillZip Char(10);
EntBillCountry Char(2);
EntShipAddr1 Char(35);
EntShipAddr2 Char(35);
EntShipAddr3 Char(35);
EntShipCity Char(35);
EntShipState Char(2);
EntShipZip Char(10);
EntShipCountry Char(2);
EntCurrentBalance Packed(9 : 2);
EntPastDue Packed(9 : 2);
EntFail Char(100);
End-pi;


What am I doing wrong?



Subject to Change Notice:

WalzCraft reserves the right to improve designs, and to change
specifications without notice.

Confidentiality Notice:

This message and any attachments may contain confidential and
privileged information that is protected by law. The information
contained herein is transmitted for the sole use of the intended

recipient(s) and should "only"

pertain to "WalzCraft" company matters. If you are not the
intended recipient or designated agent of the recipient of such
information, you are hereby notified that any use, dissemination,
copying or retention of this email or the information contained
herein is strictly prohibited and may subject you to penalties
under federal and/or state law. If you received this email in
error, please notify the sender immediately and permanently delete
this email. Thank You

WalzCraft PO Box 1748 La Crosse, WI, 54602-1748
www.walzcraft.com<http://www.walzcraft.com> Phone: 1-800-237-1326
--
This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400)
mailing list To post a message email: WEB400@xxxxxxxxxxxxxxxxxx To
subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxxxxxxxx Before posting, please
take a moment to review the archives at
https://archive.midrange.com/web400.

--
This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400)
mailing list To post a message email: WEB400@xxxxxxxxxxxxxxxxxx To
subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxxxxxxxx Before posting, please
take a moment to review the archives at

https://archive.midrange.com/web400.

Subject to Change Notice:

WalzCraft reserves the right to improve designs, and to change
specifications without notice.

Confidentiality Notice:

This message and any attachments may contain confidential and
privileged information that is protected by law. The information
contained herein is transmitted for the sole use of the intended

recipient(s) and should "only"

pertain to "WalzCraft" company matters. If you are not the intended
recipient or designated agent of the recipient of such information,
you are hereby notified that any use, dissemination, copying or
retention of this email or the information contained herein is
strictly prohibited and may subject you to penalties under federal
and/or state law. If you received this email in error, please notify
the sender immediately and permanently delete this email. Thank You

WalzCraft PO Box 1748 La Crosse, WI, 54602-1748 www.walzcraft.com<
http://www.walzcraft.com> Phone: 1-800-237-1326
--
This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400)
mailing list To post a message email: WEB400@xxxxxxxxxxxxxxxxxx To
subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxxxxxxxx Before posting, please
take a moment to review the archives at

https://archive.midrange.com/web400.

Subject to Change Notice:

WalzCraft reserves the right to improve designs, and to change
specifications without notice.

Confidentiality Notice:

This message and any attachments may contain confidential and
privileged information that is protected by law. The information
contained herein is transmitted for the sole use of the intended

recipient(s) and should "only"

pertain to "WalzCraft" company matters. If you are not the intended
recipient or designated agent of the recipient of such information,
you are hereby notified that any use, dissemination, copying or
retention of this email or the information contained herein is
strictly prohibited and may subject you to penalties under federal
and/or state law. If you received this email in error, please notify
the sender immediately and permanently delete this email. Thank You

WalzCraft PO Box 1748 La Crosse, WI, 54602-1748
www.walzcraft.com<http://www.walzcraft.com> Phone: 1-800-237-1326
--
This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400)
mailing list To post a message email: WEB400@xxxxxxxxxxxxxxxxxx To
subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxxxxxxxx Before posting, please
take a moment to review the archives at
https://archive.midrange.com/web400.

--
This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400)
mailing list To post a message email: WEB400@xxxxxxxxxxxxxxxxxx To
subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxxxxxxxx Before posting, please
take a moment to review the archives at

https://archive.midrange.com/web400.

Subject to Change Notice:

WalzCraft reserves the right to improve designs, and to change
specifications without notice.

Confidentiality Notice:

This message and any attachments may contain confidential and
privileged information that is protected by law. The information
contained herein is transmitted for the sole use of the intended

recipient(s) and should "only"

pertain to "WalzCraft" company matters. If you are not the intended
recipient or designated agent of the recipient of such information,
you are hereby notified that any use, dissemination, copying or
retention of this email or the information contained herein is
strictly prohibited and may subject you to penalties under federal
and/or state law. If you received this email in error, please notify
the sender immediately and permanently delete this email. Thank You

WalzCraft PO Box 1748 La Crosse, WI, 54602-1748
www.walzcraft.com<http://www.walzcraft.com> Phone: 1-800-237-1326
--
This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400)
mailing list To post a message email: WEB400@xxxxxxxxxxxxxxxxxx To
subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxxxxxxxx Before posting, please
take a moment to review the archives at
https://archive.midrange.com/web400.

--
This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400) mailing
list To post a message email: WEB400@xxxxxxxxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxxxxxxxx Before posting, please take a
moment to review the archives at https://archive.midrange.com/web400.




Subject to Change Notice:

WalzCraft reserves the right to improve designs, and to change
specifications without notice.

Confidentiality Notice:

This message and any attachments may contain confidential and privileged
information that is protected by law. The information contained herein is
transmitted for the sole use of the intended recipient(s) and should "only"
pertain to "WalzCraft" company matters. If you are not the intended
recipient or designated agent of the recipient of such information, you are
hereby notified that any use, dissemination, copying or retention of this
email or the information contained herein is strictly prohibited and may
subject you to penalties under federal and/or state law. If you received
this email in error, please notify the sender immediately and permanently
delete this email. Thank You

WalzCraft PO Box 1748 La Crosse, WI, 54602-1748
www.walzcraft.com<http://www.walzcraft.com> Phone: 1-800-237-1326
--
This is the Web Enabling the IBM i (AS/400 and iSeries) (WEB400) mailing
list
To post a message email: WEB400@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/web400
or email: WEB400-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/web400.