Scrolling Backward in CICS

About CICS and BMS - In this Mainframe Forum - You can post your queries on CICS

Moderators: DikDude, Natarajan, Moderator Group

Post Reply
krispp3mar
Member
Posts: 5
Joined: Tue Jul 12, 2011 7:41 pm

Scrolling Backward in CICS

Post by krispp3mar » Tue Jul 12, 2011 8:06 pm

Hi am currently designing a screen with scroll forward and backward logic.

Am loading my data in an array.

I am unable to proceed with scroll backward logic. The complexity arises because my map lines are not identical. That is each map line is to be displayed with certain flag set. And i cant assure that how many lines will accommodate in map since that depends on no.of records in a particular type.

So when pressing PF7 is there any way to store the occurrence of the array that is displayed in the first line of the map?????
Poornima. K

User avatar
dbzTHEdinosauer
Moderator
Posts: 981
Joined: Mon Oct 02, 2006 8:31 pm

Post by dbzTHEdinosauer » Tue Jul 12, 2011 8:21 pm

normally the dfhcommarea option in the return statement will save an area containing your flags, but are you doing to be saving your array also?
Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.

Anuj Dhawan
Moderator
Posts: 1625
Joined: Sat Aug 09, 2008 9:02 am
Location: Mumbai, India

Post by Anuj Dhawan » Wed Jul 13, 2011 9:40 pm

I belive it belongs to this thread: http://www.mainframegurukul.com/ibmmain ... php?t=5878
Am not saving the entire array. Am saving only the occurrence which I need to read.

Say for eg my array is like below

AREA TYPE ZONE WORK-NO USERID

1 4 G2 006 1586
1 4 G2 006 1530
1 5 G2 005 1945
1 5 G3 000 1864
1 2 G6 1765
1 5 G6 004 7689
******************************** I need to display the type zero first and its in the last part of array
1 0 Z1 003 1598
1 0 Z2 005 1578
1 0 Z2 005 4598



My Map would be

ZONE TYPE WORK USER ID (heading in map is default) Its desinged in map itself
Z1 Type 0 010-020 (data taken from file)
3 1598
SPACE when zone changes
Z2 Type 0 020-030 (data taken from file)
5 1578
4598
SPACE when zone changes
G2 Othr typ A01- A02 (data taken from file)
Type 4 6 1586
1530(displayd since the ID is of same type)
Type 5 5 1945
SPACE when zone changes






Like wise the screen goes. We cant predict how many occurrences will come in one screen since that depends on zone changes and no.of associates in the zone.

For scroll forward I need to set flag since my each line of map is different and should be populated as per data.

If there is any way to do F7 for this dynamically changing screen(according to data)
_________________
Poornima. K
Regards,
Anuj

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others