Re: "Reference #"

["Booth Martin" <Booth@xxxxxxxxxxxx>]

If   tracking# = *Blank, 
Eval  tracking#  = 'Anon' + FactoryCode + Seq#
 
 
 
---------------------------------------------------------
Booth Martin   http://www.MartinVT.com
Booth@xxxxxxxxxxxx
---------------------------------------------------------
 
-------Original Message-------
 
From: RPG programming on the AS400 / iSeries
Date: Wednesday, March 26, 2003 16:18:11
To: RPG/400 / iSeries
Subject: "Reference #"
 
Hi Folks,

I have been asked to create a program to allow employees to enter comments,
suggestions, etc. on how the company is doing, what we can do to improve,
etc.

They will have the option to be anonymous in these entries or be "tracked"
for follow-up.

I need to assign a number or something to each record so I can reference
them. What is the best way to do this ?

At a past company we had multiple companies and I wrote Receiving programs
that generated a Receiver # from a data area and each company had a
particular designation in that data area plus the "next number". This, plus
the fact that usually only one person at a location would be entering
Receivers, tended to avoid any problems with this.

In this situation, with the option of being anonymous it is wide open to all
our 10 locations; I fear this might be more difficult.

Anyone doing anything like this ?

Thanks !

Chuck 







_______________________________________________
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.

.