View Full Version : RPG
Hallo ,
habe kurze Frage und Zwar:
in DB2 Datenbank habe eine Kunden-Tabelle!
Die Kunden –Nr. waren am Anfang manuell gegeben, daher sind viele Lücken entstanden!
wie gehen ich mit einem klein RPG Programme überprüfen, wie viel und welche Kunden -Nr noch frei sind!
Kunden – Nr. ist eindeutig
tfroehlich
30-08-04, 10:11
Guten Tag,
wenn die Kundennummern nummerisch sind, könntest
Du die Differenz zwischen der letzten eingelesenen und jetzt gelesenen Kundennummer errechnen.
Programmlogig: Gruppenwechsel auf Kundenummer, somit
habe ich immer Vergleichsfelder
Bei alphanumerischen ???????
Gruss Thomas
Die Kundennummern sind schon nummerisch !
über query (wrkqry) bekomme ich nur eine Auflistung!
tfroehlich
30-08-04, 11:09
Hallo Monet,
ich meine schon ein RPG_Programm mit Programmlogig
Gruppenwechsel auf Kundennummer.
Beim Gruppenwechsel kannst Du die Kundennummer vorher
mit der jetztigen vergleichen und damit rechnen.
Am besten noch mit einer Printerfile die Werte dann
ausgeben.
Oder
anstatt Printerfile in eine neue Datei ausgeben,welche du dann
mit Query drucken kannst.
Gruss Thomas
Die Anzahl der freien Nummern errechnet sich aus "AKTKDNR - PRVKDNR". Ist dieser Wert 1, ist die Kundennr lückenlos.
Hallo ,
habe kurze Frage und Zwar:
in DB2 Datenbank habe eine Kunden-Tabelle!
Die Kunden ?Nr. waren am Anfang manuell gegeben, daher sind viele Lücken entstanden!
wie gehen ich mit einem klein RPG Programme überprüfen, wie viel und welche Kunden -Nr noch frei sind!
Kunden ? Nr. ist eindeutig
Die Anzahl bekommt man am einfachsten durch:
SELECT max(xyzID) - count(*) from xyzDatei
das Programm sieht mir eher nach einer Schulaufgabe aus, die man selber machen sollte.
mfg
Dieter Bender
@Dieter
Naja, "Wieviele" hast du ja schon gelöst, aber nun "Welche" ?
Hallo Baldur,
@Dieter
Naja, "Wieviele" hast du ja schon gelöst, aber nun "Welche" ?
zu meiner Schulzeit nicht soviele, da habe ich das mit 13 Jahren eingestellt. Selbige erinnerte mich daran, weil sie so richtig aus dem Leben gegriffen ist. Zudem ist selbiges Programm schneller und leichter geschrieben als jeder Arbeitshinweis es wäre.
mfg
Dieter