MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Compress memory area from PL/1 application program

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming
View previous topic :: View next topic  
Author Message
bauer
Intermediate


Joined: 10 Oct 2003
Posts: 315
Topics: 49
Location: Germany

PostPosted: Fri Apr 30, 2021 7:07 am    Post subject: Compress memory area from PL/1 application program Reply with quote

Dear *,

I have in PL/1 an memory block.

For example something like this:

Code:

DCL 1 MyStruct(100),
          2 NAME CHAR(20)
         ,2 ADDRESS CHAR(50)
         ,2 PHONENUMBER CHAR(20)
         ;


100 times some address records for example.

The address and current storage size is know of course of this memory block.

Now I like to compress this memory block.


Is there any function something like this:

Code:

CALL COMPRESSandCopy  (ADDR(MyStruct),CSTG(MyStruct), ADDR(DestionationArea), CSTG(DestinationArea))


or something like this:

Code:

CALL COMPRESS (ADDR(AnyMemoryArea), SIZE);



PL/1 builtin seems not to be available. Any zOS callable service?


Thank you,

bauer
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12375
Topics: 75
Location: San Jose

PostPosted: Fri Apr 30, 2021 11:05 am    Post subject: Reply with quote

bauer,

I don't have an answer for your question, however I was wondering about the actual requirement. Looking at the structure you may have about 90-500 bytes of internal table and looking at the field names it seems that you can have variable length data.

Now assuming that there is a service to compress the data, how do you plan to decompress the data when you want to read it back? Doesn't the compress and decompress chew up an additional CPU ? Does this outweigh the storage allocation?
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
bauer
Intermediate


Joined: 10 Oct 2003
Posts: 315
Topics: 49
Location: Germany

PostPosted: Fri Apr 30, 2021 11:48 am    Post subject: Reply with quote

Hi Kolusu,

thank you for your reply.

Yes the sample for the requirement looks strange. The requirement is a little bit more complex, here reduced.

The question is more general according any available compression function in zOS / PL/1 as callable service or some thing other like that.

After reading the PL/1 manual, google search, search here in the forum, before posting the question, only third party products seems to be available for compression tasks in zOS in combination with PL/1.

So please no more efforts, we will try to find some other solution.

Bauer
Back to top
View user's profile Send private message
haatvedt
Beginner


Joined: 14 Nov 2003
Posts: 66
Topics: 0
Location: St Cloud, Minnesota USA

PostPosted: Thu May 06, 2021 10:58 pm    Post subject: Reply with quote

Bauer, are you attempting to reduce the size of the data in memory OR are you attempting to reduce the size of the data when stored on DASD.

If you are attempting to reduce the size on DASD, then refer to the sms acs routines. SMS compression can either be done by software or if a zEDC chip is installed, then it can be done with hardware compression off of the main CP's.
_________________
Chuck Haatvedt

email --> clastnameatcharterdotnet

(replace lastname, at, dot with appropriate
characters)
Back to top
View user's profile Send private message
bauer
Intermediate


Joined: 10 Oct 2003
Posts: 315
Topics: 49
Location: Germany

PostPosted: Tue Aug 17, 2021 11:13 am    Post subject: Reply with quote

Well, I try to reduce the size of memory (ZIP) before for example sending the data .....,
thank you for asking.

But we have implemented a other solution now for the complete problem.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group