Re: DLTUSRPRF - tring to delete pending distributions

[rherdman@xxxxxxxxxxxxxxx]

Thanks Bryan - that cleared up what's going on.  

Rich H.

----- Original Message -----
From: Bryan Dietz <bdietz400@xxxxxxxxx>
Date: Tuesday, May 15, 2007 9:07 am
Subject: Re: DLTUSRPRF - tring to delete pending distributions
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>

> Rich would the follwoing be of any help:
>
> http://www-
> 1.ibm.com/support/docview.wss?uid=nas1d080d1c1235a99aa86256740005960be
> <snip>
> The following programs can be used as a guide. These programs must 
> be 
> submitted for each user in the system directory. Use the DSPDIRE 
> command to obtain a list of who is in the system directory. Then, 
> use 
> SBMJOB CMD(call ....) USER(each.id..)  to submit a job to the JOBQ 
> for 
> each user. By doing it this way, all  mail can be cleaned up. 
> (Using 
> GRTUSRPMN  does not allow personal  mail to be cleaned up.)
>
> </snip>
>
> Bryan
> --
>
> rherdman@xxxxxxxxxxxxxxx said the following on 5/15/2007 8:47 AM:
> > Help!
> >
> > I've got an issue trying to ensure that we delete user profiles 
> off of
> > all out production partitions, especially if they have pending
> > distributions.
> >
> > When I issue a DLTUSRPRF, I get a CPA9001 message that I have to 
> answer> with a G to let it delete the user profile anyways.  In my 
> Cl program,
> > I've tried adding a reply list entry for that msgid to auto-
> answer with
> > a 'G' and it doesn't work.
> >
> > I've also tried using some CL code I found that did a QRYDST to an
> > outfile then issued DLTDST for each pending distribution.  I do a
> > GRTUSRPMN to the current user (who has *ALLOBJ) and that completes
> > successfully, but it still won't let me even do a QRYDST.
> >
> > Does anyone have any suggestions?
> >
> > Rich Herdman
> > Sysco Food Service
> -- 
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) 
> mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.