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: 8154
Location: East Dubuque, Illinois, 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: 10310
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: 8154
Location: East Dubuque, Illinois, 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: 8154
Location: East Dubuque, Illinois, 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: 8154
Location: East Dubuque, Illinois, 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: 8154
Location: East Dubuque, Illinois, 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 exec macro in the end of edit anatol CLIST & REXX 8 Fri Sep 22, 2017 5:10 am
No new posts FUSE - IBM MQ - CICS integration error Kevin Vaz CICS 1 Mon Sep 18, 2017 4:31 pm
No new posts Julian Date to CICS ABSTTIME blayek CICS 3 Wed Aug 30, 2017 11:15 pm
No new posts Need to track the CICS transaction fr... sam8051 CICS 3 Mon Aug 07, 2017 3:11 pm
No new posts How to Clear all TSQs during CICS sta... Hooman24 CICS 10 Mon Jun 26, 2017 9:46 pm

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