PDA

View Full Version : S/36-Umgebung



AK1
25-08-15, 12:08
Hallo,
ich möchte in einer S/36-Umgebung testen.

Ich möchte die Daten aus der Bibl. QS36F in eine Bibl. QS36F_TEST kopieren.

Danach die QS36F_TEST in der Bibl.-Liste vor die QS36F stellen.


Frage: Funktioniert das wenn S/36-Programme und Prozeduren mit S/36-Dateien aufgerufen werden?

DANKE.

Fuerchau
25-08-15, 12:26
Ich denke, dafür musst du dann die S36-Umgebung (Environment) anpassen CHGS36A.
Ggf. musst du auch eine neue (Test-)Umgebung schaffen da du die "Default files library" FLIB oder "Default session library" SLIB anpassen musst.
Vielleicht reicht auch der Parameter LIBL(*YES).

jajonowak
25-08-15, 13:56
Hi,
da gab es auch eine ocl-Anweisung // FILELIB,
kann jetzt allerdings nicht mehr mit Sicherheit sagen ob das nur für die eine Procedur Gültigkeit hatte.
ZB: // LOAD PGM,LIB
// FILELIB NAME-mylib,LIBL-NO
// FILE NAME-myfile1,DISP-SHR,LABEL-ABC
// FILELIB NAME-yourlib,LIBL-NO
// FILE Name-myfile2,DISP-SHR,LABEL-AAA
// RUN

jojoschluckfirma
25-08-15, 15:52
Hallo,

wir hatten bis vor kurzem eine extra 36er Umgebung für Frankreich, Oesterreich.
Für Oesterreich hieß die OEQS36F.
Es wurde in allen OCL36 folgender Befehl eingesetzt:
// FILELIB NAME-OEQS36F,LIBL-YES

Vielleicht hilft das weiter.
Schöne Grüsse

GJV23
31-08-15, 17:44
Hallo,

hier ein Startprogramm (STRKANT) für eine S/36 Umgebung (aus den 1990er Jahren):

1. Startprogramm (QUSRSYS/QCLSRC(STRKANT)
(CL-Programm -> Umwandeln)

PGM
STRS36 MENU(KANT1) CURLIB(KANT) PRC(FSKANT) +
FRCMNU(*YES)
ENDPGM


2. S/36 Prozedur FSKANT: (QUSRSYS/QS36PRC(FSKANT)
(S/36-Prozdur - nicht umwandeln)

** ZUORDNEN FLIB SLIB FÜR KANT-START
// FILELIB NAME-KANTDTA,SESSION-YES
// LIBRARY NAME-KANT,SESSION-YES
** EOP **


Viele Grüße
GJV23