CICS :: RE: Read of TDQ fails in LENGERR
Author: Robert Sample Posted: Wed Apr 05, 2017 2:43 am (GMT 5.5) How is WS-IMPORTED-LENGTH defined? Post the definitions for the various variables used in your CICS READQ TD command. From the V5.3...
View ArticleCICS :: RE: Read of TDQ fails in LENGERR
Author: Tracy Hansen Posted: Wed Apr 05, 2017 3:07 am (GMT 5.5) In Working Storage: 05 WS-TD-QUEUE PIC X(04) VALUE 'IMPT'. ... 05 WS-IMPORTED-LENGTH PIC S9(4) COMP VALUE +0. ... 01 WS-IMPORTED-RECORD....
View ArticleCICS :: RE: Read of TDQ fails in LENGERR
Author: Robert Sample Posted: Wed Apr 05, 2017 5:46 am (GMT 5.5)Quote:I do not know why the physical data set is defined in TSO as 10011 and the TDQ and variables set to 10007Because the LRECL for a...
View ArticleCICS :: RE: COMMAREA and CHANNELS
Author: menonkiran Posted: Wed Apr 05, 2017 10:12 am (GMT 5.5) Thanks Rahul, I have tried it and it meets my requirements. Thanks Robert. For my knowledge, i will try to test with both the options and...
View ArticleDFSORT/ICETOOL :: Format record to remove Leading zeroes
Author: Learncoholic Subject: Format record to remove Leading zeroes Posted: Wed Apr 05, 2017 2:43 pm (GMT 5.5) Hi, I have a file with below data:Code:Â Â Â 01KG009999 IRRELEVANTTXTÂ Â Â 0000MN1125...
View ArticleDFSORT/ICETOOL :: RE: Format record to remove Leading zeroes
Author: Nic Clouston Posted: Wed Apr 05, 2017 4:03 pm (GMT 5.5) Is this your expected output:Code: 01KG009999Â Â Â IRRELEVANTTXT 0000MN1125Â Â Â IRRELEVANTTXT 100032205Â Â Â Â IRRELEVANTTXT 32209...
View ArticleDFSORT/ICETOOL :: RE: Format record to remove Leading zeroes
Author: Learncoholic Posted: Wed Apr 05, 2017 8:32 pm (GMT 5.5) Yes Nic. You are correct._________________Thanks for not dumping it
View ArticleCICS :: RE: Read of TDQ fails in LENGERR
Author: Tracy Hansen Posted: Wed Apr 05, 2017 9:35 pm (GMT 5.5) Robert, Thank you for your assistance. The code was compiled with TRUNC(STD) and re-compiling with TRUNC(BIN) worked. The READ is now...
View ArticleCICS :: RE: Read of TDQ fails in LENGERR
Author: Robert Sample Posted: Wed Apr 05, 2017 9:41 pm (GMT 5.5) TRUNC is a common culprit with COBOL programs that are having storage issues -- many sites use TRUNC(OPT) which does not allow the...
View ArticleDFSORT/ICETOOL :: RE: Format record to remove Leading zeroes
Author: RahulG31 Subject: Reply to: Format record to remove Leading zeroes Posted: Wed Apr 05, 2017 10:23 pm (GMT 5.5)Code://SYSIN DD *Â OPTION COPYÂ OUTREC IFTHEN=(WHEN=(1,10,FS,EQ,NUM),...
View ArticleCOBOL Programming :: RE: How does a called pgm know if its called from CICS...
Author: Ricardo Guerra Subject: Reply to: How does a called pgm know if its called from CICS or Batch Posted: Thu Apr 06, 2017 12:56 am (GMT 5.5) I work on that and the solution we use is to pass a...
View ArticleDFSORT/ICETOOL :: RE: Format record to remove Leading zeroes
Author: Arun Raj Posted: Thu Apr 06, 2017 2:00 am (GMT 5.5) Hey Rahul, You might want to modify this slightly as the OP's first input field has leading spaces and is of length=15, and the 'overlay'...
View ArticleDFSORT/ICETOOL :: RE: Format record to remove Leading zeroes
Author: RahulG31 Subject: Reply to: Format record to remove Leading zeroes Posted: Thu Apr 06, 2017 4:34 am (GMT 5.5) Yes Arun, I just looked at the data and missed the leading spaces. I hope, the code...
View ArticleAll Other Mainframe Topics :: RE: Why TS/OP would Not contact site support...
Author: CaptBill Posted: Thu Apr 06, 2017 7:26 am (GMT 5.5) Another reason is cultural: Never admit you don't know or understand something as you will be seen as stupid or weak. I've had this happen...
View ArticleClik here to view.
All Other Mainframe Topics :: RE: Why TS/OP would Not contact site support...
Author: enrico-sorichetti Subject: Reply to: Why TS/OP would Not contact site support group: My analysis Posted: Thu Apr 06, 2017 12:47 pm (GMT 5.5) the subject is one of the things that bothers me (*)...
View ArticleDB2 :: SUBSTR for Date functions
Author: Shaheen Shaik Subject: SUBSTR for Date functions Posted: Thu Apr 06, 2017 2:14 pm (GMT 5.5) Please help me out for the below query, Can we use SUBSTR for date functions in DB2...
View ArticleDB2 :: RE: SUBSTR for Date functions
Author: Nic Clouston Posted: Thu Apr 06, 2017 2:28 pm (GMT 5.5) Do you mean some entity called "SUBSTR for date functions" or use SUBSTR instead of date functions or use SUBSTR on the value returned by...
View ArticleDFSORT/ICETOOL :: RE: Format record to remove Leading zeroes
Author: Learncoholic Posted: Thu Apr 06, 2017 2:43 pm (GMT 5.5) Thanks Rahul & Raj. Rahul: Unfortunately your changes did not work. The following check is treating every record as Not Numeric due...
View ArticleDB2 :: RE: SUBSTR for Date functions
Author: Shaheen Shaik Posted: Thu Apr 06, 2017 3:04 pm (GMT 5.5) Thanks for your response Nic. Let me make my query clear. My question is that can we use SUBSTR function to the column which holds the...
View ArticleDB2 :: RE: SUBSTR for Date functions
Author: Marso Subject: Reply to: SUBSTR for Date functions Posted: Thu Apr 06, 2017 6:47 pm (GMT 5.5) You already have date functions like: - DAY(mydatefield) - MONTH(mydatefield) - YEAR(mydatefield)...
View Article