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
 
Need help on TDQ load from file using CECI command

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

Active User


Joined: 22 Dec 2007
Posts: 108
Location: Bangalore

PostPosted: Wed Jun 13, 2018 11:32 pm    Post subject: Need help on TDQ load from file using CECI command
Reply with quote

Hi,

I need suggestion on loading data into TDQ. Reason behind, we have trigger level as 1. Normally data will come from outside (distributed platform), then data will pass through program and then gets loaded into TDQ. As we are just testing so trying to load the test data into TDQ on our own and then testing triggering program.

We tried below command for one of our TDQ and we successfully loaded the data into the TDQ. Here the record length was only 20 bytes.

Code:
CECI WRITEQ TD QUEUE('TDQ name') FROM('aaaaaaaaaaaaaaa') LENGTH(20)


But there is another TDQ where the record of length 1700 should be loaded and loading 1700 length of data in above way is not possible. We have one testing file (already defined in CICS region whose length is 1700) and one line record is there in that file. So thought if we can give file name in FROM to directly load the data from the file to the TDQ. But we couldn't do it.

CECI WRITEQ TD QUEUE('TDQ name') FROM(AAAAAAA) LENGTH(20)

Instead of writing the data inside the file it is writing AAAAAAA to the TDQ. So we tried below command with variable &SUB

CECI READ FILE('AAAAAAA') RIDFLD('key value') INTO(&SUB) --> ran successfully

CECI WRITEQ TD QUEUE('TDQ name') FROM(&SUB) --> getting error. System is telling that FROM is invalid.

Not sure how to proceed further. Didn't get much info so if anyone can suggest a way then it would be great.

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

subratarec

Active User


Joined: 22 Dec 2007
Posts: 108
Location: Bangalore

PostPosted: Wed Jun 13, 2018 11:48 pm    Post subject:
Reply with quote

One small correction..

CECI READ FILE('AAAAAAA') RID('key value') INTO(&SUB) --> ran successfully
Back to top
View user's profile Send private message
subratarec

Active User


Joined: 22 Dec 2007
Posts: 108
Location: Bangalore

PostPosted: Wed Jun 13, 2018 11:57 pm    Post subject:
Reply with quote

Below is the exact error message.. against below command

Code:
CECI WRITEQ TD QUEUE('TDQ name') FROM(&SUB)
--> getting error. System is telling that FROM is invalid.



Code:
E variable for FROM does not exist or is null
S Option FROM has been omitted or specified with an invalid value
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


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

PostPosted: Thu Jun 14, 2018 12:22 am    Post subject: Reply to: Need help on TDQ load from file using CECI command
Reply with quote

The format of your message in your last post implies that you are running the CECI READ and the CECI WRITEQ as different CECI transactions. This will not work since &SUB is associated with a single CECI transaction; when the READ completes &SUB has the data but when you hit PF3 (or however you quit CECI) &SUB will be lost. Try starting CECI, doing the READ command, then doing the WRITEQ command without exiting CECI.
Back to top
View user's profile Send private message
subratarec

Active User


Joined: 22 Dec 2007
Posts: 108
Location: Bangalore

PostPosted: Thu Jun 14, 2018 9:45 am    Post subject:
Reply with quote

Hi Robert,

Thanks! for your suggestion. Yes it is working now. As you suggested I ran first CECI read command to copy the files into temp variable and then without using PF3 I just deleted the line and wrote WRITEQ command and it worked.
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 Access file which has DSNTYPE=LIBRARY maxsubrat JCL & VSAM 11 Fri Jun 21, 2019 4:09 pm
No new posts Mainframe to linux file count mismatch shreya19 All Other Mainframe Topics 4 Thu Jun 13, 2019 9:49 pm
No new posts Copy physical Tape files to a Mainfra... Dadi Krishna Teja JCL & VSAM 11 Thu May 16, 2019 10:25 pm
No new posts SDSF REXX for DB2 command output vasanthz CLIST & REXX 2 Thu Apr 25, 2019 11:29 pm
No new posts How can I close a flat file in Ezytrieve dibyendumandal11111 CA Products 3 Wed Apr 17, 2019 2:19 pm

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