|
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Mark Walter
Sent: Tuesday, January 15, 2008 5:27 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Level Check Issue
Vernacular! ! ! !
We all know what I was talking about. Level checks do not occur because of
File Level Identifiers. Because of "Format Level Identifier"....
Thanks to Charles for correcting me. We all can't be perfect.
I was just trying to make a point. There was allot of useless conversation
regarding File Level Identifiers being the reason that there was a Level
Check. I was just trying iterate the ID that causes the level check.
From now on, I'll keep my thoughts to myself, where they can't hurtanyone.....
Mark Walter
Paragon Consulting Services, Inc.
IBM Certified System i Specialist
717-764-7909 Ext. 26
mwalter@xxxxxxxxxxxxxxx
www.paragon-csi.com
"Wilt, Charles" <WiltC@xxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
01/15/2008 05:08 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc
Subject
RE: Level Check Issue
Just to clarify....
There is no "record format ID"
There is however, a "Format Level Identifier" assigned to each record
format in the file.
See the example information shown from the DSPFD in my post.
Charles Wilt
Software Engineer
CINTAS Corporation - IT 92B
513.701.1307
wiltc@xxxxxxxxxx
-----Original Message-----[mailto:rpg400-l-bounces@xxxxxxxxxxxx]
From: rpg400-l-bounces@xxxxxxxxxxxx
On Behalf Of Mark Walter(level
Sent: Tuesday, January 15, 2008 4:45 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Level Check Issue
Just for clarification, the level check is on the Record Format ID, not
the File Level Id.
Mark Walter
Paragon Consulting Services, Inc.
IBM Certified System i Specialist
717-764-7909 Ext. 26
mwalter@xxxxxxxxxxxxxxx
www.paragon-csi.com
"Wilt, Charles" <WiltC@xxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
01/15/2008 04:37 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc
Subject
RE: Level Check Issue
James,
You are confused.
The "file level identifier" is generated uniquely when the file is
created. It actually includes
create date & time.
From DSPFD:Data Base File Attributes
Externally described file . . . . . . . . . : Yes
File level identifier . . . . . . . . . . . : 1080110151002
Creation date . . . . . . . . . . . . . . . : 01/10/08
HOWEVER, it is _NOT_ responsible for "level checks".
The identifier that is used for "level checks" is the "Format Level
Identifier". It only changes when
the field names/types/sizes change, or fields are added or deleted, the
record format changes, or a
couple of other reasons along the same lines.
From DSPFD:Record Format List
Record Format Level
Format Fields Length Identifier
CPRCONP 6 36 3E38F1CFEEAA2
HTH,
Charles Wilt
Software Engineer
CINTAS Corporation - IT 92B
513.701.1307
wiltc@xxxxxxxxxx
-----Original Message-----[mailto:rpg400-l-bounces@xxxxxxxxxxxx]
From: rpg400-l-bounces@xxxxxxxxxxxx
On Behalf Of James.Hawkins@xxxxxxxxxx
Sent: Tuesday, January 15, 2008 4:22 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Level Check Issue
When any object is created on the system it is given a unique ID
Theidentifier). Remember that programs need to be compiled after files?
atprogram records the unique level ID of the file, if this is different
dorun time, you will get a level check error. I immediately see several
options.
1. change objects to level check *NO (Sorry list, it is an option-I
thenot recommend this one)OET08.
2. Using your example. Change the program to use OETXX instead of
Call the program from a CL program that overrides OETXX with OET08.
3. Change the program to use OETXX. OETXX is current year data. At
OETXXend of the year, archive (CPYF) OETXX to OET08 and purge (CLRPFM)
toend.
prepare for 2009.the
4. Redefine all of the files as internally described again (and endure
maintenance nightmare--not a recommended solution either)you
5. I believe (and someone is sure to correct me if I am wrong) that if
use CPYF of OETXX to create OET08 instead of a compile you will avoidthe
level check issue, I believe that the new file copies the levelidentifier
of the original file.
6. Instead of creating a new file each year, make the file a multiple
member file with each year a member in the file.
Jim
===========================
We have many files that are recreated each fiscal and calendar year
theThey are mainly detail files for A/R, O/E, and so on. The format of
Thefiles is XXXYYN where XXX is related to the system, YY is the currentcreated
year,
and N is any logical files. All of the files for the new year are
automatically whenever a program that needs to update the detail files
runs
in the new year. They are all built off of a dummy file.
As an example, our detail order entry file for 2007 would be OET07.
codefirst program that tried to add detail in 2008 created OET08. All ofthese
changed
files have been built using a dummy file, OETXX. This file hasn't
in
years. The problem started showing up as we convert all the legacy
toversion
external files.
Almost all of the programs that use the detail files have the XX
Iinchecks.
the file spec (OETXX if we follow the above example). It seems that
everytime a file gets created for the new year, nothing but level
The program is compiled with OETXX and the new file is created using
OETXX.
The only way to get around it is to compile with level check no, which
adon't want to do.list
Any thoughts?
Kelley
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
This e-mail transmission contains information that is intended to be
confidential and privileged. If you receive this e-mail and you are not
named addressee you are hereby notified that you are not authorized tounlawful.
read, print, retain, copy or disseminate this communication without the
consent of the sender and that doing so is prohibited and may be
Please reply to the message immediately by informing the sender thatthe
message was misdirected. After replying, please delete and otherwiselist
erase it and any attachments from your computer system. Your assistance
in correcting this error is appreciated.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
To post a message email: RPG400-L@xxxxxxxxxxxxlist
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
This e-mail transmission contains information that is intended to be
confidential and privileged. If you receive this e-mail and you are not a
named addressee you are hereby notified that you are not authorized to
read, print, retain, copy or disseminate this communication without the
consent of the sender and that doing so is prohibited and may be unlawful.
Please reply to the message immediately by informing the sender that the
message was misdirected. After replying, please delete and otherwise
erase it and any attachments from your computer system. Your assistance
in correcting this error is appreciated.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.