Plattformen für die CallAPIs

Plattformen für die CallAPIs

CallAPI für GCOS8

---

 CallAPI für BS2000

Folgende Beschreibung enthält Informationen und Hinweise für die Verwendung des CallAPI für BS2000.

In der INI-Datei des BS2000-CallAPIs können Sie bestimmen, welche CodeTabelle verwendet werden soll. Tragen Sie im Parameter codetable= in der Sektion [GLOBAL] den Namen des CodeTabellen-Objektes ein.

	1.	CallAPI und eigenes Programm

Sie können das CallAPI von einem eigenen Programm heraus aufrufen. Kenntnisse der Programmiersprache, in denen dieses Programm geschrieben wurde, werden dafür vorausgesetzt.

• CallAPI und eigenes Programm

Alle erforderlichen Parameter werden im Programm übergeben. Es muss lediglich das Großmodul UCCALL einbinden bzw. zur Laufzeit dynamisch nachladen.

	2.	CallAPI und das Dienstprogramm

In der Auslieferung befindet sich das Dienstprogramm UCXBB2?C, welches in BS2000-Prozeduren oder Enter-Jobs genutzt werden kann.

• CallAPI und das Dienstprogramm

Die notwendigen Daten für ein Logon an der Automation Engine werden vom Dienstprogramm über SYSDTA eingelesen. Das AE-Script kann entweder aus einer Datei oder direkt von SYSDTA kommen. Wird dafür eine Datei verwendet, muss diese vor dem Programmaufruf mit dem Dateikettungsnamen UCSCRIPT zugewiesen werden.

Beispiel

Im ersten Beispiel erfolgt keine Zuweisung des Dateikettungsnamens UCSCRIPT. Das durchzuführende AE-Script wird bis zum Kommando /EOF von SYSDTA eingelesen.

/FILE UCXBB22C.INI,LINK=INI
/EXEC UCXBB22C
04,RS,PROG,PASSWORD
:SET &RUNNR = ACTIVATE_UC_OBJECT(JOBS,EXAMPLE1)
:IF &RUNNR = '0000000'
: SET &ERROR = SYS_LAST_ERR_NR
: SET &ERROR = SYS_LAST_ERR_NR
: STOP MSG,51,'ACTIVATION ERROR: &ERROR'
:ELSE
: STOP NOMSG,50,'THE JOB WAS STARTED WITH RunID &RUNNR'
:ENDIF
/EOF

In diesem Beispiel befindet sich das durchzuführende Script in der Datei MEINE.SCRIPT.DATEI.

/FILE UCXBB22C.INI,LINK=INI
/FILE MY.SCRIPT.FILE,LINK=UCSCRIPT
/EXEC UCXBB22C
04,RS,PROG,PASSWORD

Folgendes Beispiel gibt die RunID, den Fehlercode und den Fehlertext des CallAPIs zurück. Diese drei Werte werden in eine JV (Jobvariable) geschrieben. 

/CREATE-JV JV-NAME=#UC.RETCODE
/SET-JV-LINK LINK-NAME=UCRETC,JV-NAME=#UC.RETCODE
/CREATE-JV JV-NAME=#UC.RETTEXT
/SET-JV-LINK LINK-NAME=UCRETT,JV-NAME=#UC.RETTEXT
/CREATE-JV JV-NAME=#UC.RUNID
/SET-JV-LINK LINK-NAME=UCRUNID,JV-NAME=#UC.RUNID
/EXEC UCXBB23C
*INI
:SEND_MSG RS,DEV,'MESSAGE FROM THE BS2000 CALL INTERFACE &NAME.'
/EOF
/SHOW-JV JV-CONTENTS=*LINK(LINK-NAME=UCRUNNR)
/STEP
/SHOW-JV JV-CONTENTS=*LINK(LINK-NAME=UCRETC)
/SHOW-JV JV-CONTENTS=*LINK(LINK-NAME=UCRETT)

Siehe auch:

Allgemeines zum CallAPI
Verwendung des CallAPIs