195 lines
6.4 KiB
HTML
195 lines
6.4 KiB
HTML
|
|
<!doctype html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
|
|
<html>
|
|
<head><META http-equiv="Content-Type" content="text/html; charset=utf-8">
|
|
<title>Retrieve PDG Profile (RTVPDGPRF)</title>
|
|
<link rel="stylesheet" type="text/css" href="../rzahg/ic.css">
|
|
</head>
|
|
<body bgcolor="white">
|
|
<script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
|
|
<a name="RTVPDGPRF.Top_Of_Page"></a>
|
|
<h2>Retrieve PDG Profile (RTVPDGPRF)</h2>
|
|
<table width="100%">
|
|
<tr>
|
|
<td valign="top" align="left"><b>Where allowed to run: </b>Compiled CL program or interpreted REXX (*BPGM *IPGM *BREXX *IREXX)<br>
|
|
<b>Threadsafe: </b>No
|
|
</td>
|
|
<td valign="top" align="right">
|
|
<a href="#RTVPDGPRF.PARAMETERS.TABLE">Parameters</a><br>
|
|
<a href="#RTVPDGPRF.COMMAND.EXAMPLES">Examples</a><br>
|
|
<a href="#RTVPDGPRF.ERROR.MESSAGES">Error messages</a></td>
|
|
</tr>
|
|
</table>
|
|
|
|
<div> <a name="RTVPDGPRF"></a>
|
|
<p>The Retrieve Print Descriptor Group Profile (RTVPDGPRF) command is used in a CL program or REXX procedure to retrieve one or more of the print descriptor group profile values associated with a user profile. The values are returned in the specified CL variables for the desired user.
|
|
</p>
|
|
<p><b>Restrictions:</b>
|
|
</p>
|
|
<ol>
|
|
<li>The program must have *OBJOPR authority to the command.
|
|
</li>
|
|
<li>The program must have *READ authority to the user's profile.
|
|
</li>
|
|
</ol>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#RTVPDGPRF.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<hr size="2" width="100%">
|
|
|
|
<div>
|
|
<h3><a name="RTVPDGPRF.PARAMETERS.TABLE">Parameters</a></h3>
|
|
<table border="1" cellpadding="4" cellspacing="0">
|
|
<!-- col1="10" col2="15" col3="30" col4="10" -->
|
|
<tr>
|
|
<th bgcolor="aqua" valign="bottom" align="left">Keyword</th>
|
|
<th bgcolor="aqua" valign="bottom" align="left">Description</th>
|
|
<th bgcolor="aqua" valign="bottom" align="left">Choices</th>
|
|
<th bgcolor="aqua" valign="bottom" align="left">Notes</th>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#RTVPDGPRF.USER"><b>USER</b></a></td>
|
|
<td valign="top">User profile</td>
|
|
<td valign="top"><i>Name</i>, *CURRENT</td>
|
|
<td valign="top">Required, Positional 1</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#RTVPDGPRF.RTNUSER"><b>RTNUSER</b></a></td>
|
|
<td valign="top">CL var for RTNUSER</td>
|
|
<td valign="top"><i>Character value</i></td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#RTVPDGPRF.PDG"><b>PDG</b></a></td>
|
|
<td valign="top">CL var for PDG</td>
|
|
<td valign="top"><i>Character value</i></td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#RTVPDGPRF.PDGLIB"><b>PDGLIB</b></a></td>
|
|
<td valign="top">CL var for PDGLIB</td>
|
|
<td valign="top"><i>Character value</i></td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
<tr>
|
|
<td valign="top"><a href="#RTVPDGPRF.PRTD"><b>PRTD</b></a></td>
|
|
<td valign="top">CL var for PRTD</td>
|
|
<td valign="top"><i>Character value</i></td>
|
|
<td valign="top">Optional</td>
|
|
</tr>
|
|
</table>
|
|
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#RTVPDGPRF.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
</div>
|
|
<div> <a name="RTVPDGPRF.USER"></a>
|
|
<h3>User profile (USER)</h3>
|
|
<p>Specifies the user profile name to be checked for its print descriptor group (PDG) profile.
|
|
</p>
|
|
<p>The possible values are:
|
|
</p>
|
|
<dl>
|
|
<dt><b><u>*CURRENT</u></b></dt>
|
|
<dd>Checks the user profile of the user of the current job.
|
|
</dd>
|
|
<dt><b><i>user-name</i></b></dt>
|
|
<dd>Specify the user profile to check.
|
|
</dd>
|
|
</dl>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#RTVPDGPRF.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="RTVPDGPRF.RTNUSER"></a>
|
|
<h3>CL var for RTNUSER (RTNUSER)</h3>
|
|
<p>In control language (CL) programs, specifies the name of the 10-character variable used to get the name of the user profile for which information is requested.
|
|
</p>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#RTVPDGPRF.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="RTVPDGPRF.PDG"></a>
|
|
<h3>CL var for PDG (PDG)</h3>
|
|
<p>In control language (CL) programs, specifies the name of the 10-character variable used to get the PDG profile of the user for which information is requested.
|
|
</p>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#RTVPDGPRF.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="RTVPDGPRF.PDGLIB"></a>
|
|
<h3>CL var for PDGLIB (PDGLIB)</h3>
|
|
<p>In control language (CL) programs, specifies the name of the 10-character variable used to get the library of the PDG profile of the user for which information is requested.
|
|
</p>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#RTVPDGPRF.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<div> <a name="RTVPDGPRF.PRTD"></a>
|
|
<h3>CL var for PRTD (PRTD)</h3>
|
|
<p>In control language (CL) programs, specifies the name of the 256-character variable used to get the print descriptor name from the PDG profile of the user for which information is requested.
|
|
</p>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#RTVPDGPRF.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<hr size="2" width="100%">
|
|
<div><h3><a name="RTVPDGPRF.COMMAND.EXAMPLES">Examples</a> </h3>
|
|
<p>Assume a user with *OBJMGT authority entered the following command:
|
|
</p>
|
|
<p>
|
|
<pre>
|
|
CHGUSRPRF USER(JWONG) PDG(*LIBL/TAXFORMS) PRTD(FORM_C1)
|
|
</pre>
|
|
</p>
|
|
<p>Also assume the program with *OBJMGT authority contains the following commands and declarations:
|
|
</p>
|
|
<p>
|
|
<pre>
|
|
DCL VAR(&USER) TYPE(*CHAR) LEN(10)
|
|
DCL VAR(&GROUP) TYPE(*CHAR) LEN(10)
|
|
DCL VAR(&LIBRARY) TYPE(*CHAR) LEN(10)
|
|
DCL VAR(&DESCRIPT) TYPE(*CHAR) LEN(256)
|
|
RTVPDGPRF USER(JWONG) RTNUSER(&USER) PDG(&GROUP) PDGLIB(&LIBRARY)
|
|
PRTD(&DESCRIPT)
|
|
</pre>
|
|
</p>
|
|
<p>When the above program is called, the following values are returned:
|
|
</p>
|
|
<p>
|
|
<pre>
|
|
&USER 'JWONG '
|
|
&GROUP 'TAXFORMS '
|
|
&LIBRARY 'TAXLIB '
|
|
&DESCRIPT 'FORM_C1 ... '
|
|
</pre>
|
|
</p>
|
|
<p><b>Note:</b> The value returned in variable &DESCRIPT is FORM_C1 followed by 249 blanks.
|
|
</p>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#RTVPDGPRF.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
<hr size="2" width="100%">
|
|
<div><h3><a name="RTVPDGPRF.ERROR.MESSAGES">Error messages</a> </h3>
|
|
<p><b><u>*ESCAPE Messages</u></b>
|
|
</p>
|
|
<dl>
|
|
<dt><b>CPF2204</b></dt>
|
|
<dd>User profile &1 not found.
|
|
</dd>
|
|
<dt><b>CPF2217</b></dt>
|
|
<dd>Not authorized to user profile &1.
|
|
</dd>
|
|
<dt><b>CPF2247</b></dt>
|
|
<dd>Internal security object not available. Reason code &1.
|
|
</dd>
|
|
</dl>
|
|
</div>
|
|
<table width="100%">
|
|
<tr><td align="right"><a href="#RTVPDGPRF.Top_Of_Page">Top</a></td></tr>
|
|
</table>
|
|
</body>
|
|
</html>
|