Re: QIBM_QTG_DEVINIT

That’s totally helpful Charles. 
Yes I’m overlooking the fact that up address is actually another DS!  

Let me address that. 

Thank you!

On Aug 22, 2025, at 1:28 PM, Charles Wilt <[email protected]> wrote:
> 
> Well, I'd say you're doing something wrong... :p
> 
> Show the DS definition and how it's being loaded...
> 
> A quick glance at the docs,
> https://www.ibm.com/docs/en/i/7.4.0?topic=program-init0100-format-connection-description-information
> 
> and I see that the IP address field is actually another DS...
> Name
> Size
> Description
> sin_len CHAR(1) Size of the sockaddr_in structure
> sin_family CHAR(1) Protocol family IP (Version 4) is hex 02
> sin_port CHAR(2) 16-bit unsigned port number
> sin_addr CHAR(16) 4-byte unsigned
> An RPG DS would be
> dcl-ds ipAddr;
>  len int(3);
>  family int(3);
>  port uint(5);
>  addr uint(10);
>  *n   char(12)
> end-ds;
> 
> Little confused about the sin_addr being defined as char(16) yet the
> description is "4-byte unsigned"..
> 
> I'm assuming that there's 12 bytes of filler...which looks to be the case
> from what you posted...
> 
> HTH,
> Charles
> 
> 
>> On Fri, Aug 22, 2025 at 10:57 AM Jay Vaughn <[email protected]>
>> wrote:
>> 
>> has anyone worked with this exit point before.
>> 
>> My exit pgm is coded and my parms are coming in correctly aligned however
>> some of the data is non legible and look like the following...
>> 12:54 PM (0 minutes ago)
>> to me
>> 
>>> EVAL ds_connect
>> 
>>  DS_CONNECT.LENCONNDSC = 132
>> 
>>  DS_CONNECT.IP4ADDRESSCLIENT = '██ÉC█Õ█P            '
>> 
>>  DS_CONNECT.CLIENTPWVALIDATED = '0'
>> 
>>  DS_CONNECT.WORKSTATIONTYPE = 'IBM-3477-FC   '
>> 
>>  DS_CONNECT.SSLCONNECTION = '1'
>> 
>>  DS_CONNECT.IP4ADDRESSSERVER = '███\█À██            '
>> 
>>  DS_CONNECT.CLIENTAUTHLEVEL = '0'
>> 
>>  DS_CONNECT.RESERVED01 = '   '
>> 
>>  DS_CONNECT.CLIENTCERTVALID = 0
>> 
>>  DS_CONNECT.OFFSETCLIENTCERT = 1362
>> 
>>  DS_CONNECT.CLIENTCERTLEN = 0
>> 
>>  DS_CONNECT.IP6ADDRESSCLIENT = '██ÉC              ███Õ█P    '
>> 
>>  DS_CONNECT.IP6ADDRESSSERVER = '███\              ███À██    '
>> 
>> 
>> I have tried ccsid(*utf8) for the first ip4 address variable but no luck.
>> 
>> 
>> Any idea why these are not coming through legible?
>> 
>> 
>> tia
>> 
>> 
>> Jay
>> --
>> This is the RPG programming on IBM i (RPG400-L) mailing list
>> To post a message email: [email protected]
>> To subscribe, unsubscribe, or change list options,
>> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
>> or email: [email protected]
>> Before posting, please take a moment to review the archives
>> at https://archive.midrange.com/rpg400-l.
>> 
>> Please contact [email protected] for any subscription related
>> questions.
>> 
>> 
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: [email protected]
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: [email protected]
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
> 
> Please contact [email protected] for any subscription related questions.
> 
-- 
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: [email protected]
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: [email protected]
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact [email protected] for any subscription related questions.