scottklement.com

Field was part of DS and i was not fetching data correctly from the particular length. I fixed it.

Thank you!!

I have SQL table with Binary field Data Field Buffer Buffer Field Type Length Length Position PKEY BINARY 18 0 8 15492 When i retrieve the value in program in 20I variable it comes as 4629771061636907072 But the data in the actual file field is - (getting below value using STRSQL) 19,461,757 Not sur...

Used YAJL and it worked!! Thanks!!

Json Received - { "start_time": "2022-06-06T00:00:06.000Z", "data_extract": { "expected_end_datetime": "2022-06-07T00:00:00", "stop_idle_fuel_used": 0, "distance_drive": 353.1, "drive_time": 442.25, "performance_gro...

HDFTACTGRP(*no) D data1 S 1000 inz('^test^^testing^letstest') D delimiter1 S 1 inz('^') D ArrData S 50 dim(50) inz /Free ArrData = pssplitd1(data1:delimiter1); dsply arrdata; *inlr = *on; /End-Free Ppssplitd1 b Dpssplitd1 pi 50 dim(50) D data 1000 D delimiter 1 * D returnArray s 50 dim(50) inz D st...

Hi, I am working on a program and it goes like below:- 1) It will read a definition file which have library name/file name in it ( around 50 different files) 2) Now based on the data received from external application i have to populate one of the file from step 1) 3) Now once i figure out which fil...

it is resolved now! It seems passing the parameter from command line was causing the issue but when i called it using program and pass the parameter it is working as expected.

Thank you

I am receiving this parameter from other program and it's length is 2000 same as declared in above DS i am passing "TEST" as value and when it moves into DS it is going as JSONDOC.MESSAGE = ....5...10...15...20...25...30...35...40...45...50...55...60 1 'TESTT ' 61 ' NE ?*NONE ' 121 ' ' 181...

dcl-ds jsonDoc qualified; dcl-ds conversation; dcl-subf subject varchar(1) inz(' '); dcl-subf external_id varchar(1) inz(' '); dcl-subf is_group_chat ind inz('0'); dcl-subf read_only ind inz('0'); end-ds; dcl-subf message varchar(2000); dcl-subf priority varchar(6) inz('normal'); dcl-subf fleet ind...

This was resolved, it was an issue while doing handshake ... thank you