Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
EXEC CICS ASSIGN STARTCODE

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
wang_f_y1
Warnings : 1

New User


Joined: 16 May 2008
Posts: 42
Location: shenzhen

PostPosted: Wed Oct 29, 2008 7:49 pm    Post subject: EXEC CICS ASSIGN STARTCODE
Reply with quote

hi,
EXEC CICS ASSIGN STARTCODE(start-code)
IF start-code NOT= "SD"
PERFORM INVALID-START-ROUTINE

(sends an error message to a terminal if the program is started without data)
END-IF.
when i type transaction "MBV1" in cics region.

I always get "start-code=TD".how can i get "SD"?
by the way,
this is IBM Credit Check sample.
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8201
Location: Dubuque, Iowa, USA

PostPosted: Wed Oct 29, 2008 8:05 pm    Post subject:
Reply with quote

Quote:
I always get "start-code=TD".how can i get "SD"?
Did you read the CICS Language Reference manual? A cursory reading indicates the SD is only assigned with START transaction FROM. Looking at START indicates FROM is used with a transaction started after an interval. I've never run this so I'm not sure of the details, but I'm sure if you read for a bit it'll all be clear ....
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10375
Location: italy

PostPosted: Wed Oct 29, 2008 8:08 pm    Post subject: Reply to: EXEC CICS ASSIGN STARTCODE
Reply with quote

did You read the manuals ....

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dfhp4c00/1.12?ACTION=MATCHES&REQUEST=startcode+values&TYPE=FUZZY&SHELF=DFHASJ00.bks&DT=20070612172134&CASE=&searchTopic=TOPIC&searchText=TEXT&searchIndex=INDEX&rank=RANK&ScrollTOP=FIRSTHIT#FIRSTHIT

and scroll a bit down until You find the startcode values

you will get an "SD" by starting the transaction in the proper way
( usually IIRC this token is used in an MQ environment )
Back to top
View user's profile Send private message
pkmurali
Warnings : 1

Active User


Joined: 15 Dec 2005
Posts: 237

PostPosted: Tue Oct 19, 2010 11:24 am    Post subject:
Reply with quote

Thanks Robert & enrico for the link provided for Start code analysis.

I have the similar scenario as wang had. where my driver module receives TD as start code apart from that it can also can have QD, SD,S & U. For QD i have analysed and found that the driver module will be receive the start code as 'QD' if the trans id is invoked through a TDQ, also i found the TDQ associated with the trans id.

Now the question is, the start code 'TD' is received in the driver module if the program is invoked from FE which uses .net screens(i/ps pased from .net screen to mainframe). similarly for TDQ how it is triggered?
i have browsed the following links in ibmmainframes.com
http://www.ibmmainframes.com/viewtopic.php?t=17526&highlight=
http://ibmmainframes.com/post-63210.html
QD A transient data trigger level was reached.
Is it possible to back trace what made the TDQ to be triggered to intiate the trans id?

Thanks,
Murali.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8201
Location: Dubuque, Iowa, USA

PostPosted: Tue Oct 19, 2010 5:08 pm    Post subject:
Reply with quote

CEMT I TD(????) will display the trigger level, if any, associated with the TDQ. If you have access to the SP commands of CICS, you can inquire against the TDQ to find the trigger level.
Back to top
View user's profile Send private message
pkmurali
Warnings : 1

Active User


Joined: 15 Dec 2005
Posts: 237

PostPosted: Tue Oct 19, 2010 6:12 pm    Post subject:
Reply with quote

Robert,

I saw the trigger level,but i need to know apart from CICS program, is it possible to write TD queue? i.e. from Front End. I hope for Extra partition TDQ is it possible to write the data into TDQ. But in this case the TDQ is intra partition.

Thanks,
Murali.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8201
Location: Dubuque, Iowa, USA

PostPosted: Tue Oct 19, 2010 6:26 pm    Post subject:
Reply with quote

An intrapartition TDQ, as the name indicates, exists entirely within the CICS region. I don't see any mention -- other than a monitoring program -- of using a TDQ in the FEPI manual. However, this is not an area where I've done much so it may be possible to access an intrapartition TDQ from outside the region -- I don't know for sure either way.
Back to top
View user's profile Send private message
pkmurali
Warnings : 1

Active User


Joined: 15 Dec 2005
Posts: 237

PostPosted: Tue Oct 19, 2010 7:37 pm    Post subject:
Reply with quote

Robert,

How to CICS recognize / assigns the start code as 'QD' once the TDQ is written. can you please throw some light on this area.

Thanks,
murali.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8201
Location: Dubuque, Iowa, USA

PostPosted: Tue Oct 19, 2010 7:43 pm    Post subject:
Reply with quote

If a transient data queue has a trigger level, and the trigger level is reached, a transaction will be started. That transaction will have QD as the start code. How do you know which transaction is started and when? Look at the TDQ via CEMT:
Code:
  I TD(CNSL)
  STATUS:  RESULTS - OVERTYPE TO MODIFY
   Tdq(CNSL) Int           Tri( 00001 ) Ena
      Tra($LOG) Use(CICTU   )
TDQ CNSL here has a trigger level of 1 (so after every 1 record the transaction will be executed) and the transaction is $LOG.
Back to top
View user's profile Send private message
pkmurali
Warnings : 1

Active User


Joined: 15 Dec 2005
Posts: 237

PostPosted: Tue Oct 19, 2010 8:05 pm    Post subject:
Reply with quote

Thanks Robert.

Quote:

That transaction will have QD as the start code.


How do 'QD' stored ? i checked in CEMT INQ TRA but Startcode is not available.

Thanks,
Murali.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8201
Location: Dubuque, Iowa, USA

PostPosted: Tue Oct 19, 2010 8:28 pm    Post subject:
Reply with quote

CECI ASSIGN will show you the Startcode. Since I've never worked for IBM and never seen the CICS internals, I have no idea how it is stored.
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 Is CICS BMS logic on z/OS different ... Andi1982 CICS 2 Fri Dec 01, 2017 1:56 pm
This topic is locked: you cannot edit posts or make replies. ISREDIT Macro is not returning back t... nico_neoz CLIST & REXX 21 Sat Nov 18, 2017 7:40 pm
No new posts How to get complete URL from CICS Con... mbattu CICS 1 Tue Nov 14, 2017 11:59 pm
No new posts Integrating CICS applications craig2020 CICS 1 Sun Oct 29, 2017 6:49 pm
No new posts ASP3 ABEND IN CICS Vedant CICS 0 Fri Oct 20, 2017 3:18 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us