Interested to Buy Any Domain ? << Click Here >> for more details...
IN CICS APPLICATION PROGRAM, INSTEAD OF HARDCODING MAP AND
MPASET NAMES WHILE SENDING AND REIEVING ...CAN WE DO LIKE
THIS ???
MOVE MAP AND MAPSET NAMES TO WORKING STORAGE SECTION
VARIABLES AND USE THOSE VARIABLES WHILE SENDING AND
RECIEVING MAP.IF YES, HOW CAN WE MOVE MAP INPUT , OUTPUT
VARIABLES.
IF ANYBODY KNOWS THIS PLEASE POST THE ANSWER
- 2 Answers
- 8413 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / rogerio coelho
You have more than one map in your program?
That`s not a very good practice, but you can do this:
01 WS-MAP-AREA PIC X(6000).
01 WS-MAP-NAME PIC X(7).
COPY MAP001.
COPY MAO002.
PROCEDURE DIVISON.
<MOVE DATA TO MAP FIELDS>
MOVE MAP001O TO WS-MAP-AREA.
MOVE MAP001 TO WS-MAP-NAME.
EXEC CICS SEND MAP(WS-MAP-NAME)
FROM(WS-MAP-AREA)
END-EXEC.
EXEC CICS RECEIVE(WS-MAPNAME)
INTO(WS-MAP-AREA)
END-EXEC.
MOVE WS-MAP-AREA TO MAP001I.
| Is This Answer Correct ? | 7 Yes | 1 No |
Answer / jaga
We can redefine the Input – Output variable of map inside
the working storage.
Move the data to redefined variable in working storage so
that CICS map can accessed between Send and receive.
| Is This Answer Correct ? | 0 Yes | 1 No |
In CICS, BMS what is the use of FREEKB parameter
What does the BUFFER option in RECEIVE mean ?
Explain the function of the load command?
What is the option specified in the read operation to gain multiple concurrent operations on the same dataset?
What is the difference between pseudo-conversational and conversational?
what is the difference between a return with transid and xctl? For example program. A is issuing return with transid to program b. Program a. Is isssuing xctl to program b?
What is the COMMAREA(communications area)?
What are the types of processes to create a map in cics?
What is the difference between Re-Entrant and Quasi re entrant program?? By looking at the program how can you tell if its re- entrant or not??
Can you access QSAM (seq ) files from CICS ?
What is interval control and what are some of the CICS commands associated with it?
What is the EXEC CICS HANDLE ABEND?
COBOL 
