Quantcast
Channel: IBM Mainframe Computers Forums
Viewing all 8500 articles
Browse latest View live
↧

DB2 :: LOW VALUES as a KEY

April 6, 2018, 12:36 pm
$
0
0
Author: juares castro
Subject: LOW VALUES as a KEY
Posted: Sat Apr 07, 2018 1:06 am (GMT 5.5)

Hi everyone!
Could we use LOW VALUES as a key in DB2 table?
We have a flat file we use to REPRO to a VSAM file, but we will convert our system to Linux/Java and need to use now DB2 tables. First record has different information and it has in first 11 bytes as LOW VALUES as a key.

Thanks in advance.
_________________
Thanks!
juares castro
↧
Search

DFSORT/ICETOOL :: RE: How to include a particular field value while counting recs

April 6, 2018, 1:00 pm
$
0
0
Author: RahulG31
Subject: Reply to: How to include a particular field value while counting recs
Posted: Sat Apr 07, 2018 1:30 am (GMT 5.5)

If you copy your records to a temp file first, then it'll be easier to achieve.
Code:
//TOOLIN    DD    *
COPY FROM(INP) USING(CTL1) TO(TMP)
COUNT FROM(TMP) WRITE(OUT) TEXT('TOTAL RECORDS')
OCCUR FROM(TMP) LIST(OUT) -
HEADER('CERTIFY') ON(12,1,CH) -
HEADER('COUNT')  ON(VALCNT)
/*
//CTL1CNTL    DD  *
  INCLUDE COND=(7,1,CH,EQ,C'M')
/*

I tried this on FB, you can add RDW length wherever necessary.

.
↧
↧

COBOL Programming :: RE: COBOL MVS options

April 6, 2018, 1:46 pm
$
0
0
Author: Nic Clouston
Posted: Sat Apr 07, 2018 2:16 am (GMT 5.5)

Quote:
Bob

who is this 'Bob'? show some respect and call them by the name that they use themselves.
_________________
Regards
Nic
↧

DB2 :: RE: LOW VALUES as a KEY

April 6, 2018, 1:57 pm
$
0
0
Author: Rohit Umarjikar
Posted: Sat Apr 07, 2018 2:27 am (GMT 5.5)

In DB2 , there is only one concept that is NULL. LOW-VALUES can be anything.
When you say Key, I take it as Primary Key in DB2 then Nulls are not allowed.
How can a LOW-VALUES be a key anywhere?
_________________
Regards,
Rohit Umarjikar
A leader is one who knows the way, goes the way, and shows the way.
↧

DB2 :: RE: LOW VALUES as a KEY

April 6, 2018, 2:08 pm
$
0
0
Author: Phrzby Phil
Posted: Sat Apr 07, 2018 2:38 am (GMT 5.5)

You could have tried it to see what happened. This is the best way to learn anything.
_________________
World Peace Through Frisbee.
↧
↧

COBOL Programming :: RE: COBOL MVS options

April 6, 2018, 2:11 pm
$
0
0
Author: Rohit Umarjikar
Posted: Sat Apr 07, 2018 2:41 am (GMT 5.5)

I have seen "Mr. Robert Sample "referred to as "Bob" in this week another post and in past as well. People have created their own alias.
_________________
Regards,
Rohit Umarjikar
A leader is one who knows the way, goes the way, and shows the way.
↧

DB2 :: RE: LOW VALUES as a KEY

April 6, 2018, 2:40 pm
$
0
0
Author: enrico-sorichetti
Subject: Reply to: LOW VALUES as a KEY
Posted: Sat Apr 07, 2018 3:10 am (GMT 5.5)

Quote:
How can a LOW-VALUES be a key anywhere?

why not ?

nowhere in the manuals for any data-base/data-management system
there are warnings abut the allowed/forbidden values of a key
_________________
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort icon_cool.gif
↧

COBOL Programming :: RE: COBOL MVS options

April 6, 2018, 2:41 pm
$
0
0
Author: enrico-sorichetti
Subject: Reply to: COBOL MVS options
Posted: Sat Apr 07, 2018 3:11 am (GMT 5.5)

Quote:
I have seen "Mr. Robert Sample "referred to as "Bob" in this week another post and in past as well.


You should also have seen that Robert corrected the poster

and Robert IIRC always confirmed his dislike for being addressed as Bob
_________________
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort icon_cool.gif
↧
Search

DB2 :: RE: LOW VALUES as a KEY

April 6, 2018, 2:49 pm
$
0
0
Author: Robert Sample
Subject: Reply to: LOW VALUES as a KEY
Posted: Sat Apr 07, 2018 3:19 am (GMT 5.5)

Quote:
LOW-VALUES can be anything.
When you say Key, I take it as Primary Key in DB2 then Nulls are not allowed.
First, LOW-VALUES is a COBOL term that refers to a field with all bits set to 0 -- X'0000.....00' (however long it is). It CANNOT be "anything" -- it is a specific bit pattern and only that bit pattern.

Second, LOW-VALUES are not NULL. NULL requires a separate field from the data to denote that the field is NULL. Even if the data field is LOW-VALUES, that does not mean the value is NULL -- only having the indicator field set will mean the value is NULL.
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth
↧
↧

COBOL Programming :: RE: COBOL MVS options

April 6, 2018, 2:50 pm
$
0
0
Author: Robert Sample
Subject: Reply to: COBOL MVS options
Posted: Sat Apr 07, 2018 3:20 am (GMT 5.5)

Yes, I correct people calling me "Bob" -- my name is Robert. My father's name was "Bob" but he is not I and I am not him.
_________________
TANSTAAFL

The first rule of code reuse is that the code needs to be worth re-using.

"We should forget about small efficiencies, say about 97% of the time: premature optimization is the root of all evil." -- Donald Knuth
↧

All Other Mainframe Topics :: RE: Have you ever seen a Mainframe?

April 6, 2018, 4:34 pm
$
0
0
Author: Harold Barnes
Subject: I've been under an IBM z/390 mainframe more than once.
Posted: Sat Apr 07, 2018 5:04 am (GMT 5.5)

On top or bottom, it's all fun.
↧

All Other Mainframe Topics :: Defining SYSLIB to USS c++ (cxx) compile/link

April 6, 2018, 4:36 pm
$
0
0
Author: Harold Barnes
Subject: Defining SYSLIB to USS c++ (cxx) compile/link
Posted: Sat Apr 07, 2018 5:06 am (GMT 5.5)

I'm using c++ (cxx) on z/OS USS to compile and link c programs. I'm getting errors from IEW (linker) that it can't access SYSLIB.

I'm assuming that this has to be an export e.g. export _CXX_LSYSLIB="CEE.SCEELKEDX:CEE.SCEELKED:CBC.SCCNOBJ:SYS1.CSSLIB"

That was my best shot but still getting errors during linking.

ABEND 913-38 OCCURRED WHILE PROCESSING PARTITIONED DATA SET DDNAME SYSLIB.

Please help. I'm losing hair fast
↧

All Other Mainframe Topics :: RE: Defining SYSLIB to USS c++ (cxx) compile/link

April 6, 2018, 6:47 pm
$
0
0
Author: sergeyken
Posted: Sat Apr 07, 2018 7:17 am (GMT 5.5)

S913-38
An open was issued for a RACF-protected data set on a DASD volume or a RACF protected tape volume to which the caller was not authorized.
_________________
Tyrannosaurus-REXX
↧
↧

All Other Mainframe Topics :: RE: Defining SYSLIB to USS c++ (cxx) compile/link

April 6, 2018, 7:20 pm
$
0
0
Author: Harold Barnes
Subject: Reply to: Defining SYSLIB to USS c++ (cxx) compile/link
Posted: Sat Apr 07, 2018 7:50 am (GMT 5.5)

And that would be a BIG YES.

I made an assumption. You know how those go. I have lots of RACF violations to explain.

Thanks!
↧

DFSORT/ICETOOL :: RE: How to include a particular field value while counting recs

April 6, 2018, 9:29 pm
$
0
0
Author: sakrat
Subject: Re: Reply to: How to include a particular field value while counting recs
Posted: Sat Apr 07, 2018 9:59 am (GMT 5.5)

RahulG31 wrote:
If you copy your records to a temp file first, then it'll be easier to achieve.
Code:
//TOOLIN    DD    *
COPY FROM(INP) USING(CTL1) TO(TMP)
COUNT FROM(TMP) WRITE(OUT) TEXT('TOTAL RECORDS')
OCCUR FROM(TMP) LIST(OUT) -
HEADER('CERTIFY') ON(12,1,CH) -
HEADER('COUNT')  ON(VALCNT)
/*
//CTL1CNTL    DD  *
  INCLUDE COND=(7,1,CH,EQ,C'M')
/*

I tried this on FB, you can add RDW length wherever necessary.

.



Right now i cannot access mainframe...I will try this way by monday...And one more help can I add TITLE & DATE with this report....?? I tried using the same after OCCURS statement but I need it before the COUNT statement, but when I tried, it resulted in RC12.
↧
Search

DFSORT/ICETOOL :: RE: How to include a particular field value while counting recs

April 7, 2018, 3:51 am
$
0
0
Author: Nic Clouston
Posted: Sat Apr 07, 2018 4:21 pm (GMT 5.5)

Quote:
resulted in RC12

All sorts of things could gve a return code of 12. Show what you tried and the messages resulting from those attempts (note plural).
_________________
Regards
Nic
↧

DFSORT/ICETOOL :: RE: How to include a particular field value while counting recs

April 7, 2018, 4:16 am
$
0
0
Author: sakrat
Posted: Sat Apr 07, 2018 4:46 pm (GMT 5.5)

Nic Clouston wrote:
Quote:
resulted in RC12

All sorts of things could gve a return code of 12. Show what you tried and the messages resulting from those attempts (note plural).



I can show only the code now as I dont have mainframe access now to get the error messages.

So Below are the options I tried one by one to get the needed result but dint get it in any way:

First try:
Code:

//TOOLIN    DD    *
COUNT FROM(INP) USING(CTL1) WRITE(OUT) TEXT('TOTAL RECORDS:')  WIDTH(121)
OCCUR FROM(INP) LIST(OUT) -
DISPLAY PAGE TITLE('SUMMARY REPORT') -
HEADER('CERTIFY') ON(12,1,CH) -
HEADER('COUNT')  ON(VALCNT)
/*
//CTL1CNTL    DD  *
  INCLUDE COND=(11,1,CH,EQ,C'M')
/*


The output that I got for above code is:

Code:

TOTAL RECORDS: 6
   [-1-]      SUMMARY REPORT
CERTIFY             COUNT
A                        0001
0                        0002
1                        0004
2                        0003


Here I got 2 things wrong
1) The SUMMARY REPORT was not before the TOTAL RECORDS
2) COUNT value for CERTIFY is taken wrong (i.e) It dint take only "M" type records.

So then I tried as below to display SUMMARY REPORT before the count, but this resulted in error:

Code:

//TOOLIN    DD    *
DISPLAY PAGE TITLE('SUMMARY REPORT') -
COUNT FROM(INP) USING(CTL1) WRITE(OUT) TEXT('TOTAL RECORDS:') WIDTH(121)
OCCUR FROM(INP) LIST(OUT) -
HEADER('CERTIFY') ON(12,1,CH) -
HEADER('COUNT')  ON(VALCNT)
/*
//CTL1CNTL    DD  *
  INCLUDE COND=(11,1,CH,EQ,C'M')
/*


Then I searched google to see how can I display only the title with no values below so that I display the title & also searched to see if I can INCLUDE "M" type records. But no luck then posted my question here...

Now I got an idea of How to include "M" type records alone in the CERTIFY-COUNT.

But dint know to place the title before the TOTAL RECORDS
↧
↧

COBOL Programming :: Connection cics program a mantis program

April 7, 2018, 8:26 am
$
0
0
Author: luis carlos
Subject: Connection cics program a mantis program
Posted: Sat Apr 07, 2018 8:56 pm (GMT 5.5)

Hi!
As is a the communication or assignment of control that should make a Mantis program, but from a Cics program.
The main problem I'm having is that since this Mantis program is not compiled, the cics is not able to find any loadable module when executing its LINK, XCTL or START TRANSID command.

thank you very much.
↧

CICS :: Mantis Program Compiled?

April 7, 2018, 8:29 am
$
0
0
Author: luis carlos
Subject: Mantis Program Compiled?
Posted: Sat Apr 07, 2018 8:59 pm (GMT 5.5)

Hi,

I wanted to ask you is whether there is a possibility of compiling a Mantis program.

Thanks.
↧

CICS :: RE: Mantis Program Compiled?

April 9, 2018, 2:49 am
$
0
0
Author: Garry Carroll
Posted: Mon Apr 09, 2018 3:19 pm (GMT 5.5)

I believe Mantis is not a language supported by CICS. Languages mentioned as supported are : Cobol, OO Cobol, PL/1, Assembler, REXX, C, C++, Java.

Garry
_________________
Everyone's entitled to ONE fatal mistake.....
↧
Viewing all 8500 articles
Browse latest View live
Search