Link to home
Start Free TrialLog in
Avatar of JCW2
JCW2

asked on

Cobol Language

What I'm trying to understand: What does it mean by "Enter s to the left of PRTLINE RUN1 from CBL1008/CBL2008 program"?
T008.txt
CBL1008.txt
CBL2008.txt
T08JOB1.txt
Avatar of graye
graye
Flag of United States of America image

I believe you're just thinking too hard....  Just add the letter "S" in the ProcStep column for the row "PRTLINE  RUN1".  That line currently doesn't have anything in the 3rd column... so just add an "S"!

Before:

   DDNAME   StepName ProcStep
   JESMSGLG JES2
   JESJCL   JES2
   JESYSMSG JES2
   SYSPRINT COMPILE1 COMPILE
   SYSPRINT COMPILE1 LINK
   SYSPRINT COMPILE2 COMPILE
   SYSPRINT COMPILE2 LINK
   PRTLINE  RUN1
   PRTLINE  RUN2

After:

   DDNAME   StepName ProcStep
   JESMSGLG JES2
   JESJCL   JES2
   JESYSMSG JES2
   SYSPRINT COMPILE1 COMPILE
   SYSPRINT COMPILE1 LINK
   SYSPRINT COMPILE2 COMPILE
   SYSPRINT COMPILE2 LINK
   PRTLINE  RUN1
   PRTLINE  RUN2 S
Avatar of JCW2
JCW2

ASKER

Actually, I'm having trouble finding that. Where will it be?
Avatar of JCW2

ASKER

Additional info:
I008.txt

---------------------------------------
Technical assistance for TASK008 (T008)
---------------------------------------

A program needs to be written when a system utility does
not have the capability to provide desired output.

The sort utility has the capability to total column of numbers        mn
but it is incapable of totalling numbers with the same row.

If numbers in the same row need to be totalled, then a program
must be written.

A COBOL program can be used to total numberes in the same row.

Although a COBOL program compiles, links and executes, the COBOL
program can fail to report a total accurately.

Inaccurate PACKED DECIMAL PICTURE clauses in the COBOL source code
can result in program failure to report a total accurately.

Focus on the PACKED DECIMAL PICTURE clauses in the source code and
in the manuals (if needed).

z/OS Enterprise COBOL manuals

http://www.ibm.com/software/awdtools/cobol/zos/library/

COBOL Language Reference (SC23-8528-01)
Programming Guide        (SC23-8529-01)

Downloading PDF of each manual is recommended.

Open in new window

Avatar of giltjr
It means exactly what it says.

Based on the screen shots you are in ISPF, most likely SDSF.  Press the TAB key until the cursor is on the same like as:

  PRTLINE  RUN2

Press the S key and then press enter.  graye got is left and right mixed up, but just before you press enter the screen should look like:


      DDNAME   StepName ProcStep
      JESMSGLG JES2
      JESJCL   JES2
      JESYSMSG JES2
      SYSPRINT COMPILE1 COMPILE
      SYSPRINT COMPILE1 LINK
      SYSPRINT COMPILE2 COMPILE
      SYSPRINT COMPILE2 LINK
      PRTLINE  RUN1
S    PRTLINE  RUN2



Avatar of JCW2

ASKER

Additional info:
I008.txt
That does not help, as that is telling you things about the cobol program.  You question was what does:

    "Enter s to the left of PRTLINE RUN1 from CBL1008/CBL2008 program"?

Mean.    It literally means to put the letter "S" to the left of the the line with PRTLINE RUN1.

Just like if I told you to type the word "The" to the left of:


   brown fox ran fast.

You would end up with:

   The brown fox ran fast.

In TSO/ISPF you go to the screen where you are viewing the output of the job where you ran the program CBL1008/CBL2008 and put literally type the letter S (to select) to the left of PRTLINE RUN1 and press enter.
Avatar of JCW2

ASKER

If I submit the JCL (T08JOB1) and view the output in SDSF, I can't put S next to anything, and i can't find any other output where I may do this.
What happens when you try and put an S next to it?
Avatar of JCW2

ASKER

Nothing. It looks like a no input area where the keyboard input gets "stuck", which I unstick with left-ctrl.  Actually, the output is so long I've never managed to scroll though it all, and I haven't found that text in that output.
ASKER CERTIFIED SOLUTION
Avatar of giltjr
giltjr
Flag of United States of America image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of JCW2

ASKER

That's what I needed. Thank you for your help.