ibm-information-center/dist/eclipse/plugins/i5OS.ic.rzakd_5.4.0.1/rzakdmstptdate.htm

113 lines
6.8 KiB
HTML
Raw Normal View History

2024-04-02 14:02:31 +00:00
<?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="concept" />
<meta name="DC.Title" content="DATE (Date) keyword in printer files" />
<meta name="abstract" content="Use this field-level keyword to display the current date or the current system date as a constant field 6 or 8 bytes long." />
<meta name="description" content="Use this field-level keyword to display the current date or the current system date as a constant field 6 or 8 bytes long." />
<meta name="DC.subject" content="DATE (Date) keyword" />
<meta name="keywords" content="DATE (Date) keyword" />
<meta name="DC.Relation" scheme="URI" content="rzakdmstprkey.htm" />
<meta name="DC.Relation" scheme="URI" content="constantfields.htm" />
<meta name="copyright" content="(C) Copyright IBM Corporation 2001, 2006" />
<meta name="DC.Rights.Owner" content="(C) Copyright IBM Corporation 2001, 2006" />
<meta name="DC.Format" content="XHTML" />
<meta name="DC.Identifier" content="rzakdmstptdate" />
<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>DATE (Date) keyword in printer files</title>
</head>
<body id="rzakdmstptdate"><a name="rzakdmstptdate"><!-- --></a>
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
<h1 class="topictitle1">DATE (Date) keyword in printer files</h1>
<div><p>Use this field-level keyword to display the current date or the
current system date as a constant field 6 or 8 bytes long.</p>
<p><img src="./delta.gif" alt="Start of change" />You can specify the DATE keyword and the location of the
field. Also, you can name the field with the special name *NONE, if the POSITION
keyword is used in the record to specify the location of the fields. Optionally,
you can specify the CDEFNT, CHRSIZ, COLOR, EDTCDE, EDTWRD, FNTCHRSET, FONT,
HIGHLIGHT, UNDERLINE, or TEXT keyword.<img src="./deltaend.gif" alt="End of change" /></p>
<p><img src="./delta.gif" alt="Start of change" />If the POSITION keyword is used, you must specify the name
*NONE (positions 19 through 29). If POSITION keyword is not used, positions
17 through 38 must be blank.<img src="./deltaend.gif" alt="End of change" /></p>
<div class="p">The format of the keyword is: <pre>DATE([*JOB | *SYS] [*Y|*YY])</pre>
</div>
<p>The *JOB value causes the current job date to be printed. If you do not
specify a parameter, *JOB is used. The *SYS parameter causes the current system
date to be printed.</p>
<p>If you specify *Y, 2 digits represent the year in the date format that
the DATFMT job attribute designates. If you specify *YY, 4 digits represent
the year in the date format that the DATFMT job attribute designates. If you
do not specify a parameter, *Y is specified by default.</p>
<p>The W edit code on the EDTCDE keyword returns a correctly formatted date
only if a four digit year (*YY) is requested, and the job attribute DATFMT
is YMD.</p>
<div class="p">If you specify EDTCDE(Y) for a DATE field, separators are added according
the date format of the DATFMT job attribute. For example, using EDTCDE(Y)
when the DATFMT job attribute specifies *MDY changes the date from <pre>mmddyy</pre>
</div>
<div class="p">to <pre>mm/dd/yy</pre>
</div>
<p>The slashes (/) represent the job attribute DATSEP at run time and the
job attribute DATFMT determines the order of the month, day, and year. (DATFMT
can be *SYSVAL, indicating that your program is to retrieve the date from
the system value QDATFMT, or MDY, DMY, YMD, or JUL, where M=month, D=day,
Y=year, and JUL=Julian.)</p>
<p>Field length depends on the following factors:</p>
<ol><li>The format of the DATFMT job attribute.</li>
<li>Whether the date field includes separators. The EDTCDE keyword controls
separators.</li>
<li>The number of digits that represent the year. The DATE keyword controls
the number of year digits.</li>
</ol>
<p>If the DATFMT specified for the job is *JUL (Julian), you cannot use the
EDTWRD keyword to edit the result.</p>
<p>Option indicators are not valid for this keyword. However, option indicators
can be used to condition the field associated with this keyword.</p>
<div class="section"><h4 class="sectiontitle">Example</h4><p>The following example shows how to specify
the DATE keyword.</p>
<pre>|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
A R REC01
A 1 56
A DATE
A 21 2 56
A DATE(*JOB *Y)
A 22 2 56
A DATE EDTCDE(Y)
A 23 2 56
A DATE(*JOB) EDTCDE(Y)
A 24 2 56
A DATE(*SYS)
A 25 2 56
A DATE(*SYS *YY) EDTCDE(Y)
A</pre>
<p>The job date is printed without editing on line position
56.</p>
<p>The job date is also printed without editing if option indicator
21 is on. The job date is printed with editing, if either option indicator
22 or 23 is on. The system date is printed without editing, if option indicator
24 is on. The system date is printed with editing and a 4 digit year,
if option indicator 25 is on.</p>
</div>
</div>
<div>
<div class="familylinks">
<div class="parentlink"><strong>Parent topic:</strong> <a href="rzakdmstprkey.htm" title="See the valid keyword entries for defining printer files in this topic.">Keyword entries for printer files (positions 45 through 80)</a></div>
</div>
<div class="relconcepts"><strong>Related concepts</strong><br />
<div><a href="constantfields.htm" title="Constant fields are unnamed fields (positions 19 through 28 must be blank), or fields with a special name (*NONE) when POSITION (Position) keyword is used in the record.">Constant fields in printer files</a></div>
</div>
</div>
</body>
</html>