ibm-information-center/dist/eclipse/plugins/i5OS.ic.rbam6_5.4.0.1/cappg.htm

91 lines
5.9 KiB
HTML

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html lang="en-us" xml:lang="en-us">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta name="security" content="public" />
<meta name="Robots" content="index,follow" />
<meta http-equiv="PICS-Label" content='(PICS-1.1 "http://www.icra.org/ratingsv02.html" l gen true r (cz 1 lz 1 nz 1 oz 1 vz 1) "http://www.rsac.org/ratingsv01.html" l gen true r (n 0 s 0 v 0 l 0) "http://www.classify.org/safesurf/" l gen true r (SS~~000 1))' />
<meta name="DC.Type" content="task" />
<meta name="DC.Title" content="Example: Call application programs" />
<meta name="abstract" content="This example shows how to define and create a command to call an application program." />
<meta name="description" content="This example shows how to define and create a command to call an application program." />
<meta name="DC.subject" content="example, creating, command to call application program, command definition, command definition, creating a command to call an application program, PARM (Parameter) command definition statement, Parameter (PARM) command definition statement, Command (CMD) statement, CMD (Command) statement, CPP (command processing program), Create Command (CRTCMD) command, CRTCMD (Create Command) command" />
<meta name="keywords" content="example, creating, command to call application program, command definition, command definition, creating a command to call an application program, PARM (Parameter) command definition statement, Parameter (PARM) command definition statement, Command (CMD) statement, CMD (Command) statement, CPP (command processing program), Create Command (CRTCMD) command, CRTCMD (Create Command) command" />
<meta name="DC.Relation" scheme="URI" content="exdcc.htm" />
<meta name="DC.Relation" scheme="URI" content="../cl/crtcmd.htm" />
<meta name="copyright" content="(C) Copyright IBM Corporation 1998, 2006" />
<meta name="DC.Rights.Owner" content="(C) Copyright IBM Corporation 1998, 2006" />
<meta name="DC.Format" content="XHTML" />
<meta name="DC.Identifier" content="cappg" />
<meta name="DC.Language" content="en-us" />
<!-- All rights reserved. Licensed Materials Property of IBM -->
<!-- US Government Users Restricted Rights -->
<!-- Use, duplication or disclosure restricted by -->
<!-- GSA ADP Schedule Contract with IBM Corp. -->
<link rel="stylesheet" type="text/css" href="./ibmdita.css" />
<link rel="stylesheet" type="text/css" href="./ic.css" />
<title>Example: Call application programs</title>
</head>
<body id="cappg"><a name="cappg"><!-- --></a>
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
<h1 class="topictitle1">Example: Call application programs</h1>
<div><p>This example shows how to define and create a command to call an
application program.</p>
<div class="section"> <p>You can create commands to call application programs. If you
create a command to call an application program, i5/OS™ performs validity checking on the
parameters passed to the program. However, if you use the <span class="cmdname">Call (CALL)</span> command
to call an application program, the application program must perform the validity
checking.</p>
<p>For example, a label writing program (LBLWRT) writes any number
of labels for a specific customer on either 1- or 2-part forms. When the
LBLWRT program is run, it requires three parameters: the customer number,
the number of labels, and the type of form to be used (ONE or TWO).</p>
<p>If
the program were called directly from the display, the second parameter would
be in the wrong format for the program. A numeric constant on the CALL command
is always 15 digits with 5 decimal positions, and the LBLWRT program expects
a 3-digit number with no decimal positions. A command can be created that
provides the data in the format required by the program.</p>
<p>The command
definition statements for a command to call the LBLWRT program are: </p>
<pre>CMD PROMPT('Label Writing Program')
PARM KWD(CUSNBR) TYPE(*CHAR) LEN(5) MIN(1) +
PROMPT('Customer Number')
PARM KWD(COUNT) TYPE(*DEC) LEN(3) DFT(20) RANGE(10 150) +
PROMPT('Number of Labels')
PARM KWD(FRMTYP) TYPE(*CHAR) LEN(3) DFT('TWO') RSTD(*YES) +
SPCVAL(('ONE') ('TWO') ('1' 'ONE') ('2' 'TWO')) +
PROMPT('Form Type')</pre>
<p>For the second parameter, COUNT, a default value of 20 is specified
and the RANGE parameter allows only values from 10 to 150 to be entered for
the number of labels.</p>
<p>For the third parameter, FRMTYP, the SPCVAL parameter
allows the display station user to enter <samp class="codeph">'ONE', 'TWO', '1'</samp>,
or <samp class="codeph">'2'</samp> for this parameter. The program expects the value <samp class="codeph">'ONE'</samp> or <samp class="codeph">'TWO'</samp>;
however, if the display station user enters <samp class="codeph">'1'</samp> or <samp class="codeph">'2',</samp> the
command makes the necessary substitution for the FRMTYP parameter.</p>
<p>The
command processing program for this command is the application program LBLWRT.
If the application program were an RPG for i5/OS program, the following specifications
would be made in the program to receive the following parameters:</p>
<pre>*ENTRY PLIST
PARM CUST 5
PARM COUNT 30
PARM FORM 3</pre>
<p>The <span class="cmdname">Create Command (CRTCMD) </span>command is as
follows: </p>
<pre>CRTCMD CMD(LBLWRT) PGM(LBLWRT) SRCMBR(LBLWRT)</pre>
</div>
</div>
<div>
<div class="familylinks">
<div class="parentlink"><strong>Parent topic:</strong> <a href="exdcc.htm" title="This contains examples of defining and creating commands.">Examples: Define and create commands</a></div>
</div>
<div class="relinfo"><strong>Related information</strong><br />
<div><a href="../cl/crtcmd.htm">Create Command (CRTCMD) command</a></div>
</div>
</div>
</body>
</html>