<?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="reference" />
<meta name="DC.Title" content="Change a module object" />
<meta name="abstract" content="You can change the module object that is shown on the Display Module Source display ." />
<meta name="description" content="You can change the module object that is shown on the Display Module Source display ." />
<meta name="DC.subject" content="changing, module object, changing view, object, module" />
<meta name="keywords" content="changing, module object, changing view, object, module" />
<meta name="DC.Relation" scheme="URI" content="vwpgmsrc.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="chmod" />
<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>Change a module object</title>
</head>
<body id="chmod"><a name="chmod"><!-- --></a>
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
<h1 class="topictitle1">Change a module object</h1>
<div><p>You can change the module object that is shown on the Display Module
Source display .</p>
<div class="section"><p>You do this by using option 5 (Display module source) on the Work
with Module List display. The Work with Module List display can be accessed
from the Display Module Source display by pressing F14 (Work with Module List).
The Display Module Source display is shown below.</p>
<p>To select a module
object, type 5 (Display module source) next to the module object you want
to show.</p>
<div class="fignone" id="chmod__modview"><a name="chmod__modview"><!-- --></a><span class="figcap">Figure 1. Display a Module View</span><pre class="screen"> <strong>Display Module Source</strong>
Program: DSPWKDAY Library: MYLIB Module: DSPWKDAY
24 500- CALL PGM(WEEKDAY2) PARM(&DAYOFWK)
25 600- IF COND(&DAYOFWK *EQ 1) THEN(CHGVAR +
<strong> 26</strong> 700 VAR(&WEEKDAY) VALUE('Sunday'))
27 800- ELSE CMD(IF COND(&DAYOFWK *EQ 2) THEN(CHGV
28 900 VAR(&WEEKDAY) VALUE('Monday')))
29 1000- ELSE CMD(IF COND(&DAYOFWK *EQ 3) THEN(CHGV
30 1100 VAR(&WEEKDAY) VALUE('Tuesday')))
31 1200- ELSE CMD(IF COND(&DAYOFWK *EQ 4) THEN(CHGV
32 1300 VAR(&WEEKDAY) VALUE('Wednesday')))
33 1400- ELSE CMD(IF COND(&DAYOFWK *EQ 5) THEN(CHGV
34 1500 VAR(&WEEKDAY) VALUE('Thursday')))
35 1600- ELSE CMD(IF COND(&DAYOFWK *EQ 6) THEN(CHGV
36 1700 VAR(&WEEKDAY) VALUE('Friday')))
37 1800- ELSE CMD(IF COND(&DAYOFWK *EQ 7) THEN(CHGV
38 1900 VAR(&WEEKDAY) VALUE('Saturday')))
<strong> More...</strong>
Debug . . . <strong><em></em></strong>
<strong><em></em></strong>
F3=End program F6=Add/Clear breakpoint F10=step F11=Display variable
F12=Resume F17=Watch variable F18=Work with watch F24=More keys
</pre>
</div>
<p>After you select the module object that you want to view, press Enter.
The selected module object is shown in the Display Module Source display.</p>
<p>An
alternate method of changing a module object is to use the DISPLAY debug command.
On the debug command line, type: </p>
<pre>DISPLAY MODULE module-name</pre>
<p>The module object <span class="synph"><span class="var">module-name</span></span> will
now be shown. The module object must exist in a program or service program
object that has been added to the debug session.</p>
</div>
</div>
<div>
<div class="familylinks">
<div class="parentlink"><strong>Parent topic:</strong> <a href="vwpgmsrc.htm" title="You can view the source of a program object using the Display Module Source display.">View the program source</a></div>
</div>
</div>
</body>
</html>