PDA

View Full Version : benutzerdefinierte Befehle



cimbala
09-12-06, 22:08
Hallo zusammen,

kann mir von euch jemand verraten wie ich auf einer i5 benutzerdefinierte Befehle einrichten kann?
z.B. gibt es bei uns schon wsf = wrksplf, jetzt würde ich mir selbst auch noch gern ein paar anlegen. Aber wie?

kuempi von stein
10-12-06, 09:53
Hello,

schaust Du ins CLP-Handbuch.
http://publib.boulder.ibm.com/infocenter/iseries/v5r3/topic/books/sc415721.pdf
Chapter 9 - Defining Commands

Sieht alles komplizierter aus als es ist.
Versuch mal, ob Du die Source von Eurem eigenen Command "wsf" irgendwo findest.
Meistens irgendwie so in QCMDSRC irgendwo versteckt.
So eine Source einfach umwandeln mit 14 aus PDM und gepromted, dann hastes fast.
So ein eigenes Command ruft ja gewöhnlich auch noch nen eigenes CLP/RPG auf, verfolge einfach mal die Kette...
Ich glaube "DSPCMD wsf" könnte auch helfen.


kuempi

Axipro_GmbH
10-12-06, 13:43
Hallo

Ich habe Dir ein Beispiel gemacht.
Gruss Christa Dietziker

1. CRTDUPOBJ OBJ(WRKSPLF) FROMLIB(*LIBL) OBJTYPE(*CMD) TOLIB(QGPL) NEWOBJ(WK
_CD)

Befehl anpassen:

CHGCMDDFT CMD(WK_CD) NEWDFT('SELECT(qsecofr)') :)

holgerscherer
10-12-06, 16:46
Hallo

Ich habe Dir ein Beispiel gemacht.


also *DAS* hätte ich eher über ein CL geregelt :)

z.B.

ein CLP in QCLSRC namens WSEC:
PGM
WRKSPLF SELECT(QSECOFR)
ENDPGM
-> mit 14 Umwandeln

ein CMD in QCMDSRC namens WSEC:
CMD (mehr brauchts da nicht, notfalls mal F4 im SEU drücken)
-> mit 14 umwandeln

Ansonsten hilft F4 und F1 viel.

-h