Re: What do the CNTL and PRINTDEV statements do? (WAS: Are JCL questions on topic her

Does

http://publibz.boulder.ibm.com/cgi-...ea2b540/4.5.4.2

Help at all?  It seems that these are PSF subsystem control statements.  (No
t
something that I have ever personally used).

http://publibz.boulder.ibm.com/cgi-...apss9330/10.1.2

may help more.

--
Bill Klein
wmklein <at> ix.netcom.com
"Oliver Wong" <owong@castortech.com> wrote in message
news:hWDLh.46493$YK6.429779@wagner.videotron.net...
> Thanks for the replies I got so far. I guess I'll try asking here first, a
nd
> see how things goes.
>
> So here's my question:
>
> I have a couple of JCL reference manuals that I've been going through back
 and
> forth, but I feel I only have the vaguest sense of how JCL works. I believ
e
> the dialect I'm working with is the zOS MVS one.
>
> Here's the example I'm currently working through:
>
> //JOB45 JOB (CFH1,2G14,15,,,,2)
> //STEP1 EXEC PGM=PRINT
> //ABLE CNTL
> //STATE1 PRINTDEV BUFNO=20,PIMSG=YES,DATACK=BLOCK
> //BAKER ENDCNTL
> //CALLER DD UNIT=3800-3,CNTL=*.ABLE
>
> My understanding is that the first word on each line after the double slas
hes
> serve as labels to refer to each line (in the same way that you assign num
ber
> as labels for each line in a BASIC program). The next word is the type of
> statement for that line, and everything after that varies depending on the
> statement.
>
> So the first line, JOB45, defines a JOB called "JOB45". It has a bunch of
> parameters which seem to be referred to as "Accounting information" by my
> reference. My understanding is that this has something to do with letting 
the
> OS prioritize or otherwise sort the jobs, and that it isn't too important 
for
> this isolated example.
>
> The next line, STEP1, says that the first step of the job is to execute a
> program (perhaps written in COBOL) called "PRINT".
>
> The next three lines, ABLE, STATE1 and BAKER, I don't really have a clue t
o
> what they do, though I'd guess the STATE1 line involves printing something
,
> somewhere.
>
> The last line, CALLER, is a DD statement. I think I know what a DD stateme
nt
> does when it's associated with an EXEC statement: It controls where the in
put
> and ouput for a program comes from and goes to. In terms of implementation
, I
> guess it would redirect the standard in, standard out and standard err of 
a
> program, and in the case of COBOL, with the LINKAGE SECTION. From my refer
ence
> manual, it sounds like the UNIT parameter has something to do with referen
cing
> some specific hardware device. I don't know what the CNTL parameter does, 
and
> I suspect it has something to do with the CNTL statement.
>
> I also don't understand what the DD statement is doing there, after the CN
TL
> statement, instead of directly after the EXEC statement.
>
> For the JOB, EXEC and DD statements; is my understanding correct so far? A
nd
> can anyone shed some light on the CNTL and PRINTDEV statements?
>
>    - Oliver
>

"William M. Klein" <wmklein@nospam.netcom.com> wrote in message
news:A1FLh.333956$PW4.255107@fe03.news.easynews.com...
> Does
>
>
> http://publibz.boulder.ibm.com/cgi-...apss9330/10.1.2
>
> may help more.

Yes, it does help. Seems like PRINTDEV is used to specify a (hardware)
printing device. I'm still not clear on the CNTL and ENDCNTL statements,
though the second page makes it sound like in the particular example I
posted, it's just necessary punctuation to make PRINTDEV work.

- Oliver

Nicole Kidman Blowjob!
http://Nicole-Kidman-Blowjob.org/Wi...hp?movie=148803

"harsha" <harshaa@gmail.com> wrote in message
news:1174592576.325655.304750@p15g2000hsd.googlegroups.com...
>
> We Use the CNTL parameter to reference a CNTL statement that appears
> earlier in the job. The reference causes the subsystem to execute the
> program control statements within the referenced CNTL/ENDCNTL group.
> The system searches for an earlier CNTL statement with a label that
> matches the label in the CNTL parameter. If the system finds no match,
> the system issues an error message.
>
> In your JCL statement,
> //CALLER DD UNIT=3800-3,CNTL=*.ABLE
>
> Here '*' is 'Referback operator' - for the definition of CNTL it
> refers back to the Label ABLEA.

Thanks, this clarifies things a lot for me. So the actual execution of
the CNTL/ENDCNTL group is delayed until those lines are actually
referenced?

- Oliver