Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Handling array in cics

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
Vinay N.G

New User


Joined: 15 Sep 2008
Posts: 36
Location: Bangalore

PostPosted: Tue Mar 02, 2010 9:26 pm    Post subject: Handling array in cics
Reply with quote

Hi,

In my code i am trying to send an array to the screen with the below code,

SEND MAP('ABCD') MAPSET('ABCD') FROM (WS-ARRAY)

Where WS-ARRAY is defined as below,

Code:
01  WS-ARRAY.                             
    02 FILLER                            PIC X(12).
    02 ALD-MAP-WS1.                                 
       05 ALD-LINE-WS1 OCCURS 10 TIMES.             
          10 FILLER                      PIC X(3). 
          10 WS-ABCD                 PIC X.     

Even the map is defined with occurs clause.
And the values to all occurances of WS-ABCD is populated in the code before sending the map.

But i am not able to see any values on the screen after executing my code.

Please let me know if i need to take care of anything else as this is my frst cics program.

Thanks in Advance
Back to top
View user's profile Send private message

CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Tue Mar 02, 2010 9:38 pm    Post subject:
Reply with quote

What is populating the fillers?

What does the mapset ABCD look like?
Back to top
View user's profile Send private message
Earl Haigh

Active User


Joined: 25 Jul 2006
Posts: 475

PostPosted: Wed Mar 03, 2010 3:31 am    Post subject:
Reply with quote

WS-ARRAY should redefine map ABCD, and then

move low values to ws-array

move your data values to ws-array

exec cics send map('ABCD') mapset('ABCD')
[/quote]
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts INDEPENDENT CICS TS 4.1 MRO REGION UP... Kyle Carroll CICS 0 Wed Dec 14, 2016 6:55 pm
No new posts CICS START AND CANCEL blayek CICS 1 Wed Dec 07, 2016 3:27 am
No new posts How does a called pgm know if its cal... Graeme Westerman COBOL Programming 4 Tue Nov 29, 2016 9:25 pm
No new posts CICS Roll back partially - Need to re... dwijadas CICS 4 Wed Nov 16, 2016 4:30 pm
No new posts CICS NEW SIT PARAMETERS CICS BEHAVIOR... Kyle Carroll CICS 0 Fri Nov 04, 2016 11:55 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us