I see said the blind man.....

I probably sohuld have included this at first:

The variations I was working with.

*        LOAD  EP=IDCAMS                ,
*        LR    R15,R0                   ,
*        CALL  (15),VGCARGL,VL
*        LA    R1,VGCARGL               , R1 => IDCAMS ARGUMENT LIST
         LINK  EP=IDCAMS,PARAM=VGCOPTA,VL=1
         B     VGCRET                   ,
.
.
.
.
 ******************************************************************
                   DS    0F
 VGCARGL  DS    0XL12
 VGCOPT    DC    AL4(VGCOPTA)
 VGCDDN    DC    AL4(VGCDDNA)
 VGCPGN   DC    AL4(VGCPGNA)
 ******************************************************************
 *        DUMMY PARMS FOR IDCAMS.
 ******************************************************************
 VGCOPTA  DC    H'0000'                  , NO OPTIONS SPECIFIED
 VGCDDNA  DC    H'0000'                  , NO OVERRIDING DDNAMES
 VGCPGNA  DC    H'0000'                  , NO PAGE NUMBER SPECIFIED
 ******************************************************************
The LINK (uncomented) now works.

Seymour, as you indicated my LINK was previously using VGCOPT, the address
of the options, not the options specifically.
Once I specified the options directly, VGCOPTA, Voila! It worked,
The SYSPRINT is now as it should be.

Thanks guys.





On Tue, Nov 1, 2011 at 9:03 AM, Shmuel Metz (Seymour J.) <
[email protected]> wrote:

> In <[email protected]>, on
> 10/31/2011
>   at 04:51 PM, Ed Gould <[email protected]> said:
>
> >You really need to look. At the IDCAMS book on how to invoke IDCAMS.
> >From a iffy memory R1 points to a list of DDNAMES like SYSIN1 and
> >SYSRINT2 but you have to look at the docuetation.
>
> R1 points to a standard parameter list. The first word should point to
> a parm string, i.e., halfword length followed by characters. If he
> correctly sets the end of list bit then only the first word is
> relevant.
>
> Had he wanted the ddname list then he'd have needed a second word in
> the parameter list, again with the end-of-list bit set correctly.
>
> --
>     Shmuel (Seymour J.) Metz, SysProg and JOAT
>     ISO position; see <http://patriot.net/~shmuel/resume/brief.html>
> We don't care. We don't have to care, we're Congress.
> (S877: The Shut up and Eat Your spam act of 2003)
>
>  ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>



-- 
Joe Aulph,
Florida Dept. of Children & Families
Senior Systems Programmer:
850-487-8945

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to