MainframeSupports
tip uge 50/2000:

Vidste du, at man kan lave install af CICS-definitioner uden at benytte CEDA transaktionen og uden at "vende" CICS. Det har man faktisk kunnet ret længe og i hvert fald siden CICS version 3.3. Det hele står beskrevet i Customization Guide under overskriften "The programmable interface to the RDO transaction". Den rigtig fede fidus ved at benytte dette interface er, at man kan lave sin egen install transaktion uden at skulle have adgang til CEDA-transaktionen. Interfacet kan udføre alle de kommandoer, som CEDA kan, men install er den eneste rigtig interessante, da man ikke kan udføre install med batch-interfacet DFHCSDUP, som ellers kan alt det andet, man ønsker at gøre med CICS-definitioner.

Interfacet består i at udstede en EXEC CICS LINK til programmet DFHEDAP med et COMMAREA på 20 bytes bestående af 5 pointere. Disse 5 pointere peger på hver sit areal, og det er via disse 5 arealer, man kommunikerer med DFHEDAP. Det kræver lidt pointer-gymnastik i COBOL eller PL/1 for at få det til at fungere, men det kan selvfølgelig lade sig gøre, og jeg ligger inde med et lille demo-program i COBOL, hvis nogen skulle være interesset.

Til sidst vil jeg komme med de sædvanlige formaninger. Man skal læse hele afsnittet i manualen før man går igang. For eksempel skal man være opmærksom på, at interfacet udsteder SYNCPOINTS efter forgodtbefindende. Det kan drille rigtig meget i samspillet med DB2. Man skal også være meget opmærksom på, at hvis det output-area, man stiller til rådighed, er for lille, så laver interfacet en wrap-around og skriver videre i starten af arealet med den konsekvens, at returkoder overskrives (og hvor smart er nu det?). Man skal også sørge for at den transaktion, der udsteder kaldet til interfacet, bliver udført på samme CICS, som transaktionen udstedes på.

Sidste uges tip        Tip oversigten