Home

DCAM V11.0A Makroaufrufe

Contents

1. KKK AIK EK XL EQ XL EA HK AKIK XL A A XX S K Xo ox Xo D D D UUUUUDUDD QU pal PB HDTY HDD HDCB HDLN FLAG RACTI RSWIT RCIFL RAIFL ROPC1 RSPEC RCS RQ RASY RACQ RPASS RRLRQ RSTAR ROPC2 RPCHA RLOMS RTOPL START EXTERNAL SYMBOL DICTIONARY YDDRPB D EQU Y DSECT DC DC DC DC DS EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU DS EQU DS EQU DS EQU EQU EQU EQU EQU EQU EQU EQU DS EQU EQU EQU HEADER OF CONTROL BLOCK RPB CL3 RPB TYPE OF CONTROL BLOCK GEL D DCAM CONTROL BLOCK 077 DCAM INTERFACE VERSION AL2 YDDRLEN 2 YDDRHDTY LGTH OF BODY OF CNT BLOCK BODY OF CONTROL BLOCK RPB XLI REQUEST TYPE X 00 NO REQUEST X 01 OPEN CONNECTION REQUEST X 02 CLOSE CONNECTION REQUEST x 03 RESET REQUEST X 047 REJECT CONNECTION REQUEST x 05 SET LOGON REQUEST x 06 CHANGE REQUEST X 07 INQUIRE REQUEST X 087 PERMIT REQUEST X 0
2. Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm 1 YOPEN ACB NEA ATTR DISCO 1 ATTR SHARE 2 Name der APPNAME relexp 3 DCAM Anwendung 8 Byte DISNAME relexp 4 Verteilungsname 8 Byte USEPW C konstante X konstante 5 VERIFY PRIMARY 6 ENB relexp 7 USEPASS C konstante X konstante 8 LOGPASS C konstante X konstante 9 ATTR NLOGON 0 ATTR REQTASK NOTASK 1 PRONAME relexp 2 LIN relexp 3 iKettungsname 8 Byte LINKMODE PERM 4 DCAMVER absexp 5 AID Kennzeichen der DCAM Anwendung Symbolischer Name des eigenen Prozessors FDBK R ckmeldung siehe Anhang Seite 298 8 Byte CLT Information Register 15 siehe Anhang Seite 298 DCAM gibt zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte B ENB NEA PROCON relexp Ji Contingency Kennzeichen 4 Byte COMEND relexp 7 z EXPR relexp 7 ou TACK relexp 7 oz LOGON relexp 7 a LOSCON relexp 7 x SECOND relexp 7 iz 1 Adresse des Steuerblocks der die DCAM Anvendung beschreibt 58 987 2135 8 Erstmaliges Er ffnen Vervvendung von Verteilcodes YOPEN Es soll eine DCAM Anvvendung erstmalig er ffnet vverden und mit Verteilcodes arbeiten Es mu angegeben werden 1 2 3 4 9 da die Nachrichten anhand eines Verteilcodes verteilt werden sollen die DCAM Anvvendung mehrfach benutzbar sein soll der Name der DCAM Anvvendung der v
3. START YDDFDB YDDFDB D CONT 1 YDDFDB DSECT 1 REASONS FOR COMEND R4 RIGHTMOST BYTE 1 YDDFNUSE DS CL3 UNUSED 1 YDDFRC DS CLI REASON FOR CONTINGENCY 1 YDDFSHWR EQU X 00 SHUTDOVN WARNING 1 YDDFSHDW EQU X 047 SHUTDOVN 1 YDDFFCWR EQU X 087 FORCED CLOSURE WARNING 1 YDDFFCLS EQU X 0C FORCED CLOSURE 1 1 1 REASONS FOR LOSCON R6 RIGHTMOST BYTE ki 1 YDDFDSUS EQU x 00 DISCONNECTION BY USER 1 YDDFIPRM EQU X 04 INVALID DEPROT EDIT COMBINATION 1 YDDFPPER EQU X 087 PTN PROCESS ERR X 25EVENT 1 YDDFPTNA EQU x 0c PARTNER NOT AVAILABLE 1 YDDFDSSY EQU x 10 DISCONNECTION BY SYSTEM OPERATOR 1 YDDFLOST EQU X 14 PARTNER LOST CONNECTION 1 YDDFNETW EQU X 18 DISCONNECTION D E TO NETWORK 1 YDDFDSWR EQU X 20 DISCONNECTION WARNING 1 YDDFRPTC EQU x 24 PTNCHAR NOT ACCEPTED BY PARTNER 1 YDDFADMS EQU X 28 PTN DISCONN SUMMONED BY ADM 1 YDDFESSE EQU 26 ERR IN STAT SERV CONN ELMT 1 YDDFESSP EQU X 34 ERR IN STAT SERV PROTOCOL 356 987 2135 8 Anhang U987 J Z135 8 YDDFTSER YDDFCUME YDDFGOSN YDDFPRIN YDDFDSSH YDDFVTSI YDDFPERL YDDFLSPE YDDFLSSP YDDFLSPP YDDFLSNT YDDFLSCI YDDFLSIE YDDFLSEC YDDFLSDC YDDFLSCT YDDFLSNP YDDFLSCS YDDFLSKV
4. D un K ma Q un iz D KEEP CCBTK 2 1 ORMAL 1 EXPRESS TACK 17 TACK Entweder ACB oder AID mu angegeben werden Werden sowohl ACB wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird Entweder CCB oder CID mu angegeben werden Werden sowohl CCB wie auch CID angegeben und passen CCB und CID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird nur f r DCAM NEA Transport Service Anvvendungen 243 YSENDREC 244 schl sselwort OPTCD EID EIDREF EIDREF2 TOVAL SEQNO VCBADR SUBGROUP nur f r DCAM NEA Transport Service Anvvendungen nur f r DCAM NEA Transport Service Anvvendungen neuer vert 550 register 5 2 L register value value relexp Makroaufrufe Zur Beschreibung der einzelnen Felder siehe YRPB Seite 223 und die Tabelle der Steu erblockfelder Anhang Seite 291 987 2135 8 Makroaufrufe 987 2135 8 YSENDREC Hinvveis Ein YSENDRE C entspricht einem YSEND gefolgt von einem YRECEIVE auf dersel ben Verbindung Dadurch k nnen einige Befehle bzw Laufzeit eingespart werden Das Empfangen der Daten entspricht dem YRECEIVE wird nur dann ausgef hrt wenn das Senden der Daten entspricht dem YSEND
5. DIP relexp 3 13 4 1 Partnername 8 Byte PRONAME relexp 4 ab Prozessorname 8 Byte DIP DCG relexp 16 CG CODEVAL f konstante max 8 17 konstante Angaben X konstante GID Kennzeichen des DCG wenn nicht schon fr her eingetragen DCAM gibt zur ck N 118 U987 J Z135 8 Eigenschaften einer Verbindung ndern YCHANGE 987 2135 8 1 Adresse des Steuerblocks der den Aufruf beschreibt 2 konstante kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante oder Festpunktkonstante F konstante oder Adre konstante A konstante V konstante definiert werden 3 falls mit Verteilcodes gearbeitet vird und dieser Verbindung neue Codes DCG zugeordnet verden sollen 4 falls das CID im CCB Steurblock ung ltig ist Es sollen die Eigenschaften einer Verbindung ge ndert werden Dazu mu angegeben werden 1 die Adresse des Steuerblocks CCB der die Verbindung beschreibt deren Eigen schaften ge ndert werden sollen Die Angabe mu gemacht werden auch wenn im RPB ein g ltiges Kennzeichen der Verbindung steht Enth lt der CCB kein g ltiges Kennzeichen mu stattdessen im CCB der Name und Prozessorname des Partners angegeben werden 2 entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen AID enth lt oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu vorher z
6. Eintrag der unter bestimmten Vorraus setzungen nicht entfallen kann vahlveiser Eintrag vahlveiser Eintrag vahlveiser Eintrag vird er gemacht sind veitere Eintrage zu machen Eintrag der von 6 abh ngig ist Eintrag der von 6 abh ngig ist Eintrage von DCAM venn der Befehl DCAM gibt zur ck ausgef hrt wurde Eintrag von DCAM in ein Register Adressierung eines Steuerblocks mit g ltigem Kennzeichen oft alternativ zur obigen Angabe im Register Pflichteintrag in weiteren Steuerbl cken wahlweiser Eintrag Eintr ge von DCAM in weiteren Steuerbl cken wenn der Befehl ausgef hrt wurde DCAM gibt zur ck Die Ziffern beziehen sich auf die Konnektoren der Feldbeschreibung z B Erkl rung der grafischen Darstellung 48 987 2135 8 3 1 987 2135 8 Makroaufrufe bezogen auf die Existenz einer DCAM Anvvendung Makroaufrufe bezogen auf die Existenz einer DCAM Anvvendung Existenzbezogene Makroaufrufe vverden im Zusammenhang mit der Erzeugung und Auf l sung der DCAM Anvvendung gebraucht Ferner geh ren die Makroaufrufe dazu mit denen die Zust nde der DCAM Anwendung zu ndern bzw abzufragen sind Die existenzbezogenen Makroaufrufe sind YOPEN Er ffnen einer DCAM Anvvendung YCLOSE Schlie en einer DCAM Anvvendung YINQUIRE Abfragen des Zustandes einer DCAM Anvvendung Part
7. AUF DIE AU SIE WERDEN VON DCAM A VON PARTNE Pe e E XOx x x Xo xo x x xo xo x xo x LE RT SENDEN AUF ISO VERBINDUNG M ERZEUGT DIE STEUERBLOECKE ACB CCB UND RPB D SPEICHER DER BEREICH FUER DEN ACB WIRD DER APPLIKATION FUER DEN CCB WIEDERVERWENDET SO APPLIKATION 150 501 WIRD EROEFFNET UND W SAUFBAU VON 7 ISOBSO2 gt DIE APPLIKATION ISO 2 ACH DEM A B AMISCH RTET AUF s n DEM VE RBINDUNGSWUNSCH VON 150 502 DES LINKNAMENS KOENNEN DIE EROEFF UND DIE PAR ET T WERDEN ERNAMEN NOCH GEAENDERT WERDEN WIRD KEIN SET DCAM CONNECTIO LINK PARTNER UEBERM SO ERWARTET DAS PROGRAMM DE DEN NACHRICHTEN VERSCHIEDENER SWERTUNG VON DCAM RETURNCODES WURDE BEWUSST VE BLOSS PROTOKOLLIERT DAMIT LAESST SICH DIE RE UF VERSCHIEDENE EREIGNISSE Z B KEIN VERBINDU R VERBINDUNGSABBAU ETC GUT DARSTELLEN PARTNER IM EIGEN LAENGE AN DE SPACE 3 BAL USING B NAMEN OWNAPPL OWNPROZ PTNAPPL PTNPROZ LINKNAME ANFANG DC DC DC DC DC 10 0 FLO ANFANG DER KOMMUNIKATIONSPARTNER CL8 ISOBS01 CL8 CL8 ISOBSO2 CL8 7 CL8 ISOBSOIl OH ACB ERZEUGEN 5 A CCB E R A RECHNER ZICHTET KTION GSWUNSCH YGENCB BLK ACB WAREA 5 LENGTH L A CCB ISO Y ATTR NSHARE
8. b 4 b YDDFSOPN YDDFSCLS YDDFSDIS YDDFLNCO Steuerbl cke und R ckmeldungen EQU X 38 ERR IN TRANSPORT SYSTEM EQU X 40 STAT SERV CO USERMESS ERR EQU X 507 GROS NOT ACCEPTED BY PTN EQU X 54 NETW PRIO NOT ACC D BY PTN EQU X 587 SHORT RES AT PTN S SYSTEM TOO MANY NTACK S EQU X 5C PARTNER S VTSU INACTIVE EQU X 607 PROTOCOL INCONSISTENCY BY PTN EQU X 64 UNRECOVERABLE UCON ERROR EQU X 687 STATION NOT PRIVILEGED EQU X 6C PROCESSOR NOT PRIVILEGED EQU X 70 NO TASK FOR PW CHECK EQU X 74 WRONG CID FOR OP ID EQU X 78 INTERNAL UCON ERROR EQU X 7C NO ECRNAM ENTRY AVAILABLE EQU X 80 DCAM VERSION lt 10 EQU X 847 NO CHIPCARD TERMINAL EQU X 887 NOT NEW PROTOCOL EQU X 8C NO CHIPCARD SUBSYSTEM EQU X 907 ERROR IN KVP PROTOCOL REASONS FOR SECOND R5 RIGHTMOST BYTE EQU X 00 OPEN BY SECONDARY TASK EQU X 047 CLOSE BY SECONDARY TASK EQU 087 SECONDARY TASK MISSING EQU YDDFNUSE LENGTH YDDFDB 034 920624 55616014 END 357 Steuerbl cke und R ckmeldungen Anhang 358 Variante3 KHK Xl XX E XX XOK XX
9. 034 920624 55616014 A PRONAME DCAM FUNCTIONAI VERSIONS VERSION 8 RESERVED FOR F LENGTH OF CONT 030 910919 55616011 Anhang ELEMENT F SUBGROUP F GROUP BACK INFO L VERSION LESS EQUAL 7 0 0 URTHER EXTENSIONS ROL BLOCK 987 2135 8 Anhang 987 2135 8 Steuerbl cke und R ckmeldungen Makro YDDCCB Mit dem Makroaufruf YDDCCB kann ein Pseudo Abschnitt GCSECT oder DSECT f r den Steuerblock CCB angelegt werden Format Name Operanden symbol YDDCCB lc prefix Operanden symbol gibt die symbolische Adresse f r den Makroaufruf an Wird keine Adresse angegeben so wird die Adresse YDDCCB erzeugt gibt an was generiert werden soll Pl D verlangt die Generierung eines Pseudoabschnitts c verlangt die Generierung eines Code Abschnitts prefix gibt eine Zeichenfolge von maximal 4 Zeichen an die den Namen vorangestellt wird Ohne diese Angabe wird die Zeichenfolge jeweils dem symbolischen Namen vorangestellt 333 Steuerbl cke und R ckmeldungen Anhang Pseudoabschnitt DSECT f r den Steuerblock CCB EXTERNAL SYMBOL DICTIONARY START YDDCCB YDDCCB D 1 YDDCCB DSECT 1 h HEADER OF CONTROL BLOCK CCB 1 YDDCHDTY DC CL3 CCB TYPE OF CONTROL BLOCK 1 YDDCHDD DC GELTED DCAM CONTROL BLOCK 1 YDDCHDCB DC 077 DCAM INTERFACE VERSION 1 YDDCHDLN DC AL2 YDDCLEN 2 YDDCHDTY
10. ROPOSED GROS NETW PRIO ERR IN ACTIVATING PTN S VTSU PARTNER ALREADY DEDICATED DISCONNECTED FTER ACCEPTANCE YNTAX ERROR I NKNOWN AUTHORIZATION NAME USER MSG ALREADY CONNECTED SWORD REJECTED BY PTN REU D BY PTN ERR X 25EVENT REJECTED BY ADMIN CONSISTENCY BY PTN OT ALLOWED NRECOVERABLE UCON ERROR PRIVILEGED OT PRIVILEGED PW CHECK FOR OP ID UCON ERROR ENTRY AVAILABLE DCAM VERSION lt 10 NO CHIPCARD NOT NEW NO CHIPCARD ERROR I FOLLOWING EQUATES ARE VALID IF PROTOCOL TERMINAL SUBSYSTEM KVP PROTOCOL RDCS IS SET X 10 kk ik iki DCS SHORTAGE OF RESOURCES DCS SHUTDOWN WARNED DCS QUICK SHUTDOWN DCS INACTIVE DCS ERROR DCAM IS LOCKED THE FOLLOWING EQUATES ARE VALID IF IN FEEDBACK FIELD 1 X 047 X 087 X 0C X 10 X 14 RTL kkkxkI INVALID REQ NOT ALLOWED NOT ALLOWED EQUIVALENT APPICATION INRU IS SET UEST FOR SECONDARY FOR NONSHARE APPL WITH ATTR NLOGON REQUEST PENDING OT AUTHORIZED 329 Steuerbl cke und R ckmeldungen 330 NN NS S ND NN ND N NN N N S 0 0 0 0 1 10 1 YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD DAS
11. THE FOLLONING EQUATES ARE VALID IF IN FEEDBACK FIELD 1 X 14 psi INVALID REQUEST FOR SECONDARY NOT ALLOWED FOR NONSHARE APPL NOT ALLOWED WITH ATTR NLOGON EQUIVALENT REQUEST PENDING APPICATION NOT AUTHORIZED SYN REQUEST ALREADY QUEUED RPAR IS SET 2 18NN xx 987 2135 8 Anhang YDDRIACB EQU YDDRICCB EQU YDDRIDCG EQU YDDRIDIP EQU YDDRIENB EQU YDDRIAAD EQU YDDRIDAD EQU YDDRIPAD EQU YDDRICOI EQU YDDRIEVI EQU YDDRIARA EQU YDDRIAAR EQU YDDRIAPN EQU YDDRIDIN EQU YDDRIPTN EQU YDDRIPRO EQU YDDRCCBA EQU YDDRSEQH EQU YDDRWRLN EQU YDDRISUB EQU YDDRIPRN EQU YDDRNGAR EQU YDDREDER EQU YDDRICDL EQU YDDRIPCL EQU YDDRIPCA EQU YDDRBATR EQU YDDRNVCB EQU YDDRBVCB EQU YDDRIVCB EQU YDDRIROU EQU YDDRIRLN EQU Xk xx k k kr xx kr xx kk YDDRFDB3 DS YDDRFD3N EQU YDDRPTSK EQU YDDRSTSK EQU YDDRNORM EQU YDDRMTRN EQU YDDRMKEP EQU YDDRRVCB EQU YDDRNSTA EQU YDDRTSTA EQU 1 1 19 1 0 0 1 0 0 0 0 1 10 1 0 1 GE b U987 J Z135 8 X 047 X08 X 0C X 10 X 14 X 18 X 1C X 20 X 24 X 28 XT ZG Xx 30 X 34 X 38 xc X 40 X 44 X 48 X 4C X 507 X 54 X 587 x 30 x 60 x 64
12. MVI MVC BAL YOPEN MVI MVC BAL APPNAME OWNAPPL PRONAME OWNPROZ LINK LINKNAME LINKMOD PERM AKTIND DGENCB Z 2 4 DUMPRC EROEFFNEN DER ANWENDUNG ACB 5 AKTIND DOPEN ZUSATZ OWNAPPL 14 DUMPRC 987 2135 8 DCAM ISO Transport Service Beispiele AID SICHERSTELLEN YSHOWCB BLK ACB BLKADDR 5 NAREAZAIDSAVE LENGTH 4 FIELDS AID MVI AKTIND DSHOWCB MVC ZUSATZ TXTACB BAL 14 DUMPRC 987 2135 8 267 Beispiele 268 Xok xox xox LA CCB 5 A DCAM ISO Transport Service ERZEUGEN BEREICH FUER ACB WIEDERVERWENDEN CCB YGENCB BLK CCB WAREA 5 LENGTH L A CCB MVI MVC BAL LA YGENCB MVI MVC BAL ENAEI VI BAL OBNOHL L YOPNCO MVI MVC BAL PTNN ROC INK KTI USA 4 D 2 6 RP BLK REA PTC KTI USA 4 D N ti RZE EINA AKTI 14 D AUFB FUE 2 AI N RP AKTI AME PTNAPPL PRONAME PTNPROZ TRUNC SIGNAL MAXLN 600 MDATA Y LINKNAME LINKMOD PERM ND DGENCB TZ TXTCCB UMPRC ERZEUGEN B AREAl D Q CS ACCEPT SPEC SYN TOVAL 60 ND DGENCB TZ TXTRPB UMPRC UGEN EINER EREIGNISKENNUNG E ISOBS01 EIIDRET GOEID PARMOD 31 ND DENAEI UMPRC AU DER VERBINDUNG DSAVE ND DOPNCON ZUSATZ PTNAPPL 14 D UMPRC RPB WAREA 6 LENGTH L RPB CCB 5 R DEN SYNCHRONEN YOPNCON EID UND
13. ACB relexp B bezogen ETLOG QUIRE 02 bl ti Min mit nur f r DCAM NEA Transport Service Anvendungen addr und relexp siehe Anhang Seite 322ff Makroaufrufe und Steuerbl cke 10 987 2135 8 2 1 1 987 2135 8 Steuerbl cke erzeugen Steuerbl cke w hrend der Assemblierung erzeugen Die Steuerbl cke die vvahrend der Assemblierung erzeugt vverden sollen sind im Daten teil des Programms zu beschreiben Dazu ruft man den entsprechende Makro auf so da nach der Makroaufl sung der Steuerblock an dieser Stelle im Programm steht Die Inhalte der einzelnen Felder werden durch den Anwender bestimmt indem er entsprechende Werte mit einem vorgege benen Schl sselwort verbindet vom Makrogenerator bestimmt wenn der Anwender durch Weglassen einzelner Schl sselworte anzeigt da er Standardwerte eingetragen haben m chte Er kann wenn er will diese Standardwerte auch angeben zun chst offengelassen f r die Eintragungen die DCAM nach Ausf hrung eines Aktionsaufrufs machen wird Die Eintragungen in den Steuerblock sind entweder selbstdefinierende Werte die als code oder konstante angegeben werden Oder aber es sind Adre verweise relexp auf weitere Steuerbl cke oder Felder Diese Felder enthalten Namen oder sind Bereiche zur Daten bernahme gabe Die Adresse des Makros der den Steuerblock erzeugt wird s
14. x 68 Steuerbl cke und R ckmeldungen INVALID ACB ADDRESS INVALID CCB ADDRESS INVALID DCG ADDRESS INVALID DIP ADDRESS INVALID ENB ADDRESS INVALID APPNAME ADDRESS INVALID DISNAME ADDRESS INVALID PTNNAME ADDRESS INVALID AREA ADDRESS INVALID AAREA ADDRESS INVALID APPLICATION NAME INVALID DISTRIBUTION NAME INVALID PARTNER NAME INVALID PROCESSOR NAME CCB REFERRED TO BY ASYNCHR SEQUENCE NUMBER TOO HIGH AAREALN LESS THAN 8 AREALN INVALID SUBFUNCTION INVALID PRONAME ADDRESS NEGATIVE AREALN EDITING ERROR INVALID CODELN PTNCHLN LESS 4 BYTES APTNCH INVALID THE FOLLOWING EQUATE IS VALID IN CASE OF PROBLEMS WITH ISO APPLICATIONS X 6C X 70 X 74 4 78 X 7C X 80 FEEDBACK FIELD 3 kkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkkkkkkkkkkkkxkkkkkkxk XL1 X 007 CONTRADICTION ISO ATTR VTSUCB NOT USED ON THIS CONN INVALID CONTINGENCY ID ADDRESS INVALID EVENT ITEM ID ADDRESS VTSUCB NOT Al LLOWED EDIT USER INVALID VTSUCB ADDRESS ICONSISTENT ROUT PARAM SPECIFIED INVALID ROUTLIST INDICATORS NO INDICATION IN FDBK FIELD 3 THE FOLLOWING EQUATES ARE VALID IF SUCC IS SET IN FEEDBACK FIELD 1 X 007 X 047 X 007 X 047 X 087 X 10 X 407 Xx 807 X 00YNN TASK IS PRIMARY TASK IS SECONDARY YOPEN MESSAGE NOT TOO LONG MESSAGE TRUNCATED REMAINDER OF MESSAGE IS KEPT RECEIVE OK NO VTSUC
15. 2177 LOGON LOSCON PROCON COMEND EXPR TACK SECOND Inhalt 399 nhalt 400 3 Anwendung der Funktionen von DCAM n Xar 3 1 Makroaufrufe bezogen auf die Existenz einer DCAM Anwendung 49 3 1 1 DCAM Anvvendung er ffnen 525777 7575 75 3 1 1 1 Einfach benutzbare DCAM Anwendung e s bi 3 1 1 2 Mehrfach benutzbare DCAM Anvvendung erstmalig er ffnen 5 edi wo 3 1 1 3 Erstmaliges Er ffnen Vervvendung von Verteilcodes Boss q 3 1 1 4 Nachfolgendes Er ffnen ur 2 2 d n G T 3 1 1 5 Nachfolgendes Er ffnen Verwendung von n Verteilcodes x 064 3 1 2 Zustand einer DCAM Anvvendung ver ndern 67 3 1 3 Zustand einer DCAM Anvvendung abfragen De tt 69 3 1 4 DCAM Anwendung schlie en sos 2 Makroaufrufe bezogen auf eine Verbindung 3 2 1 Verbindung aufbauen n d n n 5 sks ee s A 3 2 1 1 Beschreibung der aufzubauenden Verbindung ma dpi d du Ae es AO 3 2 1 2 Auffordern zum Aufbau 80 3 2 1 3 Aufforderung annehmen kn s 904 3 2 1 4 Aufbau einer Verbindung Verwendung von Verteilcodes 289 3 2 1 5 Anschlie en an eine vordefinierte Verbindung a a 092 3 2 2 Eintr ge ber Partner und Verbindungen abfragen u tt g 2194 3 2 2 1 Partnerinformation nach einer LOGON Meldung 257755 3 2 2 2 Partnerinformation vor dem x a xe 6 IE 3 2 2 3 Partnercharakteristika 5757777777 3
16. Bit 25 und 27 00 Ein Teil der Benutzernachricht enth lt die Kennzeichnung eines Protokolls entsprechend anderen GCITT Empfehlungen z B X 29 01 Ein Teil der Benutzernachricht wird zu Kennzeichnung eines Protokolls nach Festlegung der Netzverwaltung benutzt 10 Ein Teil der Benutzernachricht wird zur Kennzeichnung eines Protokolls nach den Festlegungen internationaler Benutzer Organisationen verwendet 11 Es gibt keine Einschr nkungen f r die Verwendung der restlichen Benutzer nachricht durch die Datenendeinrichtung F r die Proze auswahl bei heterogener Kopplung ber die X 25 Benutzernachricht gibt es zwei M glichkeiten Proze auswahl ber alphanumerischen Proze schl ssel Dann ist die Benutzernachricht wie folgt aufgebaut X D5000001 127 a il L nge des alphanumerischen Proze schl ssels a Alphanumerischer Proze schl ssel ProzeBausvvahl ber numerischen Proze schl ssel Dann ist die Benutzernachricht wie folgt aufgebaut X D5000001 1301 h h Hexadezimaler Proze schl ssel 1 byte Hinweis Wird eine gew hlte virtuelle Verbindung zwischen zwei paketorientierten Datenendein richtungen hergestellt so reagiert das Netz nicht auf die Benutzernachricht und nimmt auch keinen Einflu darauf 372 987 2135 8 Anhang IDCAM Benutzerschnittstelle Beispiel f r den Verbindungsaufbau ber die X 25 Schnittstelle Heterogener Verbund Aufruf des Verbindungs Aufforderung Ve
17. Die logischen Steuerzeichen sollten mit symbolischen Namen ange geben werden siehe Handbuch VTSU Kapitel Logische Steuerzei chen FORM Die Nachrichtenaufbereitung wird vom Systemprogramm FHS oder FORM durchgef hrt Format Datenstation Dieser Operand wird ausgewertet bei YOPNCON und YCHANGE jedoch nur wenn EDIT SYSTEM gesetzt wurde 5 EDITOUT nur bei NEA Transport Service NHCOPY HCOPY Die auszugebende Nachricht wird bei Datensichtstationen zus tzlich auf einem Drucker ausgegeben hardcopy wenn ein solches Ger t vorhanden und betriebsbereit ist NHCOPY Es findet keine zus tzliche Ausgabe auf einem Drucker statt hardcopy Dieser Operand wird ausgewertet bei YOPNCON und YCHANGE jedoch nur wenn EDIT SYSTEM gesetzt wurde Er findet nur Anwendung bei EDITOUT LINE beim Einsatz von Datenstationen des Typs 8151 8152 816X 975X und 976X Hinweis Bei EDITOUT PHYS HCOPY ist der Anwender selbst f r den richtigen Aufbau des Nachrichtenkopfes verantwortlich Andernfalls erh lt er bei der Verwendung von einem zentralen Hardcopyger t eine Negativquittung Bei Verwendung von einem lokalen Hardcopyger tes wird die Hardcopyaufforderung ignoriert 987 2135 8 Makroaufrufe 987 2135 8 YCCB EDITOUT nur bei NEA Transport Service NHOM Die Strukturierung der Nachricht wird festgelegt HOM Die Nachricht soll unstrukturiert ausgegeben werden d h alle logi sch
18. oder Sedezimalkonstante X konstante angegeben vverden Dieser Operand wird ausgewertet bei YOPNCON wenn der im DIP Steuerblock adressierte DCG Steuerblock kein g ltiges GID Kennzeichen enth lt YCHANGE wenn der im DIP Steuerblock adressierte DCG Steuerblock kein g ltiges GID Kennzeichen enth lt YPERMIT wenn der in AAREA adressierte DCG Steuerblock kein g ltiges GID Kenn zeichen enth lt YPERMIT wenn der DCG ein g ltiges Kennzeichen GID enth lt und der Operand CODEVAL vor dem Permit mit YMODCB ge ndert wurde Die Verteilcodewerte f r eine Verbindung m ssen eindeutig sein d h derselbe Verteil codewert darf nicht in verschiedenen DCG Steuerbl cken die von einem DIP Steuer block adressiert werden vorkommen Nachrichten die ung ltige Verteilcodewerte enthalten werden der Prim rtask berge ben 987 2135 8 Makroaufrufe YDIP 4 9 987 2135 8 YDIP 2 Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen Funktion Es wird ein Verteilungsparameter Block DIP distribution parameter block erzeugt Er enth lt Lage und L nge des Verteilcodes einer Nachricht sowie Verweise auf DCG Steu erbl cke siehe auch Seite 89 und 118 Format Name Operanden symbol YDIP CODELN absexp CODEPOS absexp CODEIND character DC6 relexp Operanden CODELN absexp L nge des Verteilcodes in Byte Standardvvert ist Null Der Verteilcode kan
19. 150 5 l Y N Y Pflichtoperand f r ISO Transport Service f hige Anwendungen Die DCAM NE A Funktionen sind f r diese Anwendungen nicht verf gbar es wird mit einer DCAM NEA Transport Service Anwendung gearbei tet Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask oder Sekund rtask APPNAME relexp Adresse des Feldes in dem der Name der DCAM Anwendung steht Dieser Operand wird ausgewertet bei YOPEN durch eine Primartask Der Operand ist wahlweise f r ATTR NSHARE st kein Name angegeben so vvird im Verarbeitungsrechner in dem die YOPEN aufru fende Task existiert ein eindeutiger Name erzeugt den der Benutzer jedoch nicht in Erfahrung bringen kann YOPEN durch eine Sekund rtask Der Bereich auf den durch diesen Operanden verwiesen wird mu die folgenden Bedin gungen erf llen Der Bereich mu ein 8 Byte langes Feld sein Der Name mu alphanumerisch und linksb ndig ausgerichtet sein das erste Byte mu alphabetisch sein A Z e Das hei t der Name mu den Konventionen f r Assembler Namen entsprechen im 1 Byte ist f r System Anwendungen reserviert Nichtgenutzte Byte des Feldes m ssen mit Leerzeichen X 40 aufgef llt sein 987 2135 8 Makroaufrufe YACB SHARE 1 ATTR NSHARE Die DCAM Anvvendung kann entvveder von SHARE mehreren Tasks benutzt werden mehrfach benutzbar oder von NSHARE einer einzigen Task einfach benutzbar Di
20. AID register ne E A gt Register n Nummer des Registers AID Kennzeichen der Anwendung 3 CID register pe gt Register m Nummer des I Registers CID Kennzeichen der Verbindung 4 1 150 Text der zu sendenden AREA relexp 1 gt Nachricht n Byte AREALN absexp O lt n lt MAXLN 2 man kann ein Register angeben ACB relexp 3 CCB relexp 4 OPTCD EXPRESS 5 OPTCD ELEMENT GROUP ELEMENT GROUP 6 SUBGROUP VCBADR relexp 7 SEQNO absexp 8 0xnx65535 OPTCD TACK 9 OPTCD 10 BELL 11 EID relexp 12 Ereigniskennzeichen 4 Byte EIDREF konstante 2 13 EIDREF2 konstante 2 13a FDBK R ckmeldung siehe Anhang Seite 298 DCAM gibt Register 15 siehe Anhang Seite 298 zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte CCB Steuerblock mit g ltigem Kennzeichen CID ACB Steuerblock mit g ltigem Kennzeichen AID 126 U987 J Z135 8 Nachricht senden YSEND 1 Adresse des Steuerblocks der den Aufruf beschreibt 2 konstante kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante oder Festpunktkonstante F konstante oder Adre konstante A konstante V konstante definiert werden Es soll eine Nachricht gesendet vverden Dazu mu angegeben werden 1
21. VERIFY PRIMARY ENB ENBAD ATTR SHARE DISCO REOTASK DISNAME DISAD USEPASS X O000FFFO ADDR1 DC CL8 BUCHUNG ENBAD YENB m DISAD DC CL8 PRIMAER 987 2135 8 Nachfolgendes Er ffnen YOPEN 3 1 1 4 Nachfolgendes Er ffnen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anvendungsprogramm 1 YOPEN ACB NEA ISO ISO N Y 1 Name der APPNAME relexp 2 DCAM Anwendung 8 Byte USEPW C konstante X konstante 3 ATTR SHARE 4 DCAMVER absexp 5 ENB relexp 6 PRONAME relexp T LIN relexp 8 Kettungsname 8 Byte LINKMODE PERM 9 VERIFY SECONDARY 10 AID Kennzeichen der DCAM Anwendung Symbolischer Name des eigenen Prozessors FDBK R ckmeldung siehe Anhang Seite 298 8 Byte CLT Information DCAM gibt zur ck Register 15 siehe Anhang Seite 298 FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte ENB NEA ISO COMEND relexp 6 Contingency Kennzeichen 4 Byte EXPR relexp 2 6 n TACK relexp 3 6 bi LOSCON relexp 6 i SECOND relexp 6 1 Adresse des Steuerblocks der die DCAM Anwendung beschreibt 2 nur in Verbindung mit EDIT USER 3 nur wenn die Prim rtask ATTR REQTASK gegeben hat 987 2135 8 61 YOPEN Nachfolgendes Er ffnen 62 Es soll eine DCAM Anvvendung nachfolgend er ffnet werden Die Nachrichtenv
22. Zur Auswertung der R ckmeldung steht das Feld FDBK im RPB zur Verf gung 987 2135 8 Asynchrone Ausf hrung Befehle ausf hren Synchroner SOLSIG Bild unten Er wird an der Stelle im Programm abgesetzt ab der die Verarbeitung des Ereignisses erfolgt Auch hier besteht die Wahl zwischen zwei M glichkeiten Es vird gewartet bis das Ereignis eintrifft falls es nicht schon eingetroffen ist Operand COND UNCOND die maximale Wartezeit wird dabei festgelegt Operand LIFETIM Ist die SOLSIG Wartezeit abgelaufen aber das Erfolgs oder Mi erfolgs Ereignis trat nicht ein und es ist auch kein Fehler aufgetreten dann kann der SOLSIG nochmals f r das gleiche Ereignis Kennzeichen gegeben werden Der Aufruf wird sofort beendet Operand COND IMMED Falls das Ereignis noch nicht eingetroffen war mu ggf zu einem sp teren Zeitpunkt der Aufruf wiederholt werden ENAEI EIIDRET relexp YOPNCON YRECEIVE RPB YSENDREC OPTCD ASY EID relexp Ereignis Kennzeichen 4 Byte SOLSIG EIID relexp Angaben bei synchroner Ausf hrung des SOLSIG 987 2135 8 33 Befehle ausf hren Asynchrone Ausf hrung 34 Asynchroner SOLSIG Bild unten Er kann unmittelbar nach dem 1 und 2 Schritt abgesetzt werden Der Bezug zum Contingency Kennzeichen COID das im 2 Schritt ENACO siehe BS2000 Makroaufrufe definiert wurde wird durch die Angabe der Adresse des
23. ber die Annahme oder Nichtannahme des Befehls siehe auch die folgende Tabelle 987 2135 8 Anhang 987 2135 8 Tabelle der R ckmeldungen Steuerblock R ckmeldung FDBK in Register Register Ausf hrung Stand der ACB RPB 15 15 3 bestatigt Anforderung 1 Synchroner Aufruf FDB sofort zur ckgeviesen FDB2 20 sofort ausgef hrt nach einer Wartezeit zu r ckgewiesen ausgef hrt Asynchroner Aufruf sofort zur ckgewiesen angenommen und sofort ausgef hrt nach einer Wartezeit zu r ckgewiesen ausgef hrt 1 Der Wartezustand kann von einer Contingency unterbrochen werden daher ist es m glich da der Steuerblock vom Anwender zerst rt wurde 2 Der Anwender erh lt die Steuerung bevor der Aufruf ausgef hrt wurde daher ist es m glich da der Steuerblock vom Anwender zerst rt wurde Es kann keine R ckmeldung erhalten und den ung ltigen Steuerblock auch nicht sp ter mit YSHOWCB oder YTESTCB ansprechen 3 linksb ndiges Byte 4 X 00 angenommen 299 Tabelle der R ckmeldungen Primar Sekund r Anzeige L nge der Nach richt Dateneigenschaft und Gruppierungsanzeige x lt x lt x gt x x lt oo 5 Ursache 7 Fehler Code Ursache zur ckg verursacht durch den viesen Zustand des Daten Fehler zur ckg unzul ssiger Gebrauch Code wiesen eines Makroaufrufs Anhang FDBl
24. 2135 8 Asynchrone Meldungen ENACO YOPEN Einsprungsadresse der Contingeney COADAD relexp routine COIDRET relexp ACB ENB relexp ENB zum Beispiel Kennzeichen der LOGON relexp Contingency Routine 4 Byte Contingency Routine Bearbeitung der Aufforderung zum Verbindungs aufbau Angabe bei Definition einer Contingency f r DCAM Ereignismeldungen Wird eine Contingency Routine gestartet erh lt der Anwender in verschiedenen Regi stern Informationen siehe dazu die Tabellen der Registerbelegungen im Anhang Seite 317 Alle weiteren Register mu er selbst versorgen auch die Basisregister Auf Registerinhalte der unterbrochenen Routine oder der Hauptroutine kann er mit dem Makroaufruf CONTXT siehe Handbuch BS2000 Makroaufrufe an den Ablaufteil zugrei fen Im folgenden werden die Ereignisse die als asynchrone Meldung an das Programm gegeben werden k nnen im einzelnen beschrieben 987 2135 8 39 LOGON 2 8 1 40 Asynchrone Meldungen LOGON Wenn eine Aufforderung zum Verbindungsaufbau an eine DCAM Anvvendung gerich tet wird die die Eigenschaft ATTR LOGON hat und deren aktueller Zustand gleich START ist wird diese LOGON Meldung gegeben siehe DCAM Programmschnittstellen DCAM erwartet eine Reaktion des Benutzers auf diese Meldung keine Reaktion wird als Zur ckweisung der Aufforderu
25. 987 2135 8 Einleitung Finleitung DCAM data communication access method ist eine Zugriffsmethode im Datenkommuni kationssystem TRANSDATA f r die Kommunikation zwischen Programmen bzw zwi schen Programm und Datenstation DCAM bietet zwei unterschiedliche Funktionalit ten DCAM NEA Transport Service Funktionen DCAM ISO Transport Service Funktionen Damit besteht die M glichkeit Datenkommunikation auf Basis der durch ISO ge normten Transportdienste zu betreiben Dieses Benutzerhandbuch wendet sich an Programmierer die in ihren Programmen DCAM Makroaufrufe verwenden Sie sollten daher mit dem BS2000 Assembler vertraut sein Vorausgesetzt werden ferner grundlegende Kenntnisse des BS2000 die es Ihnen erlau ben Programme zu bersetzen und zu testen Au erdem wird die Kenntnis des Benutzerhandbuchs Programmschnittstellen sowie des OSI Referenzmodells vorausgesetzt Einleitung 1 1 Konzept der DCAM Handb cher Die Beschreibung der DCAM Assembler Schnittstelle besteht aus zwei Handb chern Damit soll jedem Anwender das Richtige geboten werden sei es da er programmiert sei es da er sich nur informieren will siehe auch Bild unten DCAM Programmschnittstellen DCAM Makroaufrufe Kapitel Kapitel Einleitung Einleitung Grundbegriffe und Einf h DCAM Assembler rung in die Verwendung der Schnittstelle DCAM Schnittstelle Funktionen von DCAM Anwendungen der Funktionen von DCAM Un
26. 987 2135 8 Vervvendung der Kennzeichen kann vom Anvender eingetragen verden ins 13 AID Feld des RPB Steuerblocks CID Feld des RPB Steuerblocks DID Feld des DIP Steuerblocks und DID Feld des CCB Steuerblocks GID Feld des DCG Steurblocks ung ltig nach YCLOSE oder erzvungenem Schlie en der Anwendung forced clo sure YCLSCON oder erzwungenem Abbruch der Verbindung forced disconnection YCLSCON oder erzwungenem Abbruch der Verbindung forced disconnection YCLSCON oder erzwungenem Abbruch der Verbindung forced disconnection oder YFORBID 21 Vervvendung der Kennzeichen Der Anwender hat zwei M glichkeiten Entweder er adressiert f r k nftige Aufrufe den entsprechenden Steuerblock ACB CCB und zus tzlich f r DCAM NEA Transport Service Anvven dungen DIP und DCG der jeweils das g ltige Kennzeichen enth lt oder er stellt die zur ckgegebenen Kennzeichen in eigenen Feldern sicher Die Steuerbl cke kann er nun wieder verwenden oder die Bereiche freigeben Will er sich auf die mit den Kennzeichen erreichbaren Eintr ge in DCAM beziehen mu er die Kennzeichen der Anwendung AID und der Verbindung CID in den verwendeten RPB eintragen Hinweis Nach einem YOPNCON Aufbau einer Verbindung oder einem YRECEIVE Empfan gen einer Nachricht ist das Kennzeichen der Verbindung CID auch im RPB einge tragen Ein direkt darauf folgender YSEND Senden einer Nachrich
27. CCB RPB ENB DIP NEA DCG NEA DACB DCCB DRPB 987 2135 8 interner Arbeitsbereich enth lt taskspezifische Daten z B aktuellen Adressen der DCAM Steuerbl cke Nicht angegebene Adressen Felder sind mit X 00 initialisiert vom Anwender angegebene Steuerbl cke DCAM application control block Der DACB enth lt anwendungsspezifische Daten z B Anwendungsna me Attribute Der DACB wird beim YOPEN angelegt und bleibt bis zum Schlie en der Anwendung bestehen DCAM connection control block Der DCCB enth lt verbindungsspezifische Daten z B Partner Prozes sornamen Pro Verbindung wird ein DCCB angelegt DCAM request parameter block enth lt bei asynchronen Aufrufen die aufrufspezifischen Informationen aus dem RPB 285 DCAM SYSTEM EXIT 286 Beim Aufruf der Exit Routine sind abhangig vom Exit Ereignis folgende Felder der DCAM Datenstruktur versorgt interner Arbeitsbereich application control block connection control block request control block request control block Feldname Feldinhalt YDDEXPL Exit Parameterliste YDDXMAIN Exit Hauptereignis YDDXSUB Exit Unterereignis YDDXDPAR A DARPPAR YDDXLOGL L nge der Verbindungsnachricht YDDXLOG Adresse der Verbindungsnachricht YDDDVEC interner Arbeitsbereich YDDVXTID TID identifier YDDVADAC A DACB YDDVADCC YDDVADRP YDDVARPB YDDVAPTN YDDVAPCN Exit Ereignis XX xox X
28. D h der Anwender verschl sselt zu sendende Nachrichten in die sem Code und erwartet empfangene Nachrichten im beliebigen Code Der Datentransport im Kommunikationssystem ist transparent Es wird keine Code bersetzung vom System vorgenommen Wenn der Partner eine Datenstation ist bedient durch eine Prozedur die keine HDLC Prozedur ist gelten die folgenden Regeln Steuerzeichen die sich im Bitmuster befinden werden durch DLE Zeichen deaktiviert Diese Deaktivierung ist jedoch nur dann wirksam wenn die Datenstation eine transparente Daten bermittlung verarbeitet Andernfalls mu sich der Anwender davon berzeugen ob das Bitmuster keine unerw nschten Steuerzeichen enth lt Dieser Operand wird ausgewertet bei YOPNCON YCHANGE YSEND YRECEIVE und YSENDREC jedoch nur wenn EDIT USER gesetzt wurde APPSTART PROC nur bei NEA Transport Service ANYSTART APPSTART Die DCAM Anwendung die zum Verbindungsaufbau auffordert bzw die Aufforderung annimmt wird mit der Daten bermittlung begin nen Die Angabe des Akzeptierenden unterdr ckt die des Auffordern den ANYSTART Es wird keine Angabe ber den Beginn der Daten bermittlung gemacht Dieser Operand wird ausgewertet bei YOPNCON Der aufgeforderte Partner kann sich informieren welche Variante vorgeschlagen wur de indem er das Feld PROC im CCB abfragt siehe Seite 95 und 98 Der auffordernde Partner kann sich ber die endg ltige Festlegung informieren i
29. Das oben erl uterte giltl 0 lt l nge menge lt 9 gt ebenfalls jedoch ohne die Gleichsetzung Im Flie text werden noch die folgenden Darstellungsmittel benutzt Hinweis f r n tzliche bzw wichtige Informationen halbfett f r die Hervorhebung wichtiger Begriffe 0 zur Kennzeichnung von Kapiteln die nur f r DCAM NEA Transport Service Anvvendungen gelten 6 987 2135 8 987 2135 8 DCAM Assembler Schnittstelle DCAM Assembler Schnittstelle Eine Einf hrung in die Eigenschaften der Assembler Schnittstelle wurde bereits in der Beschreibung der Programmschnittstellen gegeben Alle Makroaufrufe an DCAM soweit sie nicht der Steuerblockerzeugung und behandlung selbst dienen beziehen sich auf Steuerbl cke Die Form dieser Aktionsauf rufe ist so angelegt da Steuerbl cke und Befehle mit Aktionsaufruf getrennt abge setzt werden Folgende Schritte sind im Programmablauf notwendig 1 Schritt 2 Schritt 3 Schritt 4 Schritt 5 Schritt Bereitstellen der Informationen in Steuerbl cken durch Erzeugen dieser Steuerbl cke und Eintragen der Inhalte Bei Abgabe eines Aktionsaufrufs an DCAM wird der Steuerblock adressiert der alle notwendigen Informationen enth lt Bei der Bearbeitung des Aufrufs holt sich DCAM die Felder die ben tigt werden aus den angegebenen Steuerbl cken und darin adressierten variablen Feldern DCAM baut sich eine Kopie des Steu erblocks mit den aktuellen Werten
30. Der Anwender stellt bereit den Namen des Partners bei YINQUIRE mit dem Operanden OPTCD NAMXLATE die Adresse des Bereichs f r die Verbindungsnachricht bei YINQUIRE mit OPTCD REQLOGON den symbolischen Namen des Partners bei YREJLOG und zus tzlich f r DCAM NEA Transport Service Anwendungen die Adresse des DCG Steuerblocks bei YPERMIT DCAM tr gt ein den Namen des Partners bei YINQUIRE mit dem Operanden OPTCD CIDXLATE die angeforderten Informationen bei YINQUIRE die empfangene Nachricht bei YRECEIVE und YSENDREC ab DCAMVER 8 0 die Verbindungsnachricht des Partners falls bei YOPNCON der Operand OPTCD ACQUIRE gesetzt wurde 224 987 2135 8 Makroaufrufe YRPB 987 2135 8 AAREALN absexp L nge in Byte des Bereiches auf den durch AAREA verwiesen wird Dies kann sein die L nge der Verbindungsnachricht h chstens 80 Byte bei DCAM NEA Transport Service Anwen dungen und 32 Byte bei DCAM ISO Transport Service Anwendungen bei YINQUIRE mit dem Operanden OPTCD REQLOGON TOPLOGON Dabei ist zu beachten da bei IBM Datenstationen keine Verbindungsnachrichten gesendet werden sollen da sie von TRANSIT CD nicht umgesetzt werden empfangene Daten bei YRECEIVE und YSENDREC mindestens 8 Byte Verbindungsnachricht des Partners bei YOPNCON mit dem Operanden OPTCD ACQUIRE ab DCAMVER 8 0 berschreiten die empfangenen Daten die hier angegebene L nge so erh lt der A
31. Er kann maximal 8 Byte lang sein und mu alphanumerisch und links b ndig ausgerichtet sein Das erste Zeichen mu alphabetisch sein A Z d h der Name mu den Konventionen f r Assembler Namen entsprechen register enth lt die Adresse eines 8 Byte langen Feldes in dem der Kettungs name linksb ndig steht Nach rechts sind freie Bytes mit Leerzeichen X 40 aufzuf llen Wenn dieser Operand alleine angegeben ist werden fr here Eintragungen in der CLT unter gleichem Kettungsnamen gel scht prozname 1 register prozname gibt den Prozessornamen des Partners an Er kann maximal 8 Byte lang sein und mu alphanumerisch und links b ndig ausgerichtet sein Das erste Zeichen mu alphabetisch sein A 2 ft d h der Name mu den Konventionen f r Assembler Namen entsprechen register enth lt die Adresse eines 8 Byte langen Feldes in dem der Prozessor name linksb ndig steht Nach rechts sind freie Bytes mit Leerzeichen X 40 aufzuf llen 987 2135 8 Makroaufrufe YCONN fbenutzerfeldl register benutzerfeld gibt ein Feld an in dem der Anwender eine Begleitinformation hinter legt Dieses Feld kann maximal 4 Byte lang sein und ist eine Zeichen konstante C konstante oder eine Sedezimalkonstante X konstante register enth lt die Adresse einer 4 Byte langen Adre konstanten in der die Begleitinformation rechtsb ndig steht kennwort4 LOGPW nur bei NEA Tr
32. FDB 4 1 Byte 1 Adresse des Steuerblocks der die DCAM Anwendung beschreibt YCLOSE durch eine Sekund rtask Die DCAM Anwendung wird ausschlie lich f r diese Task geschlossen Bei einer defi nierten SECOND Contingency siehe Seite 46 wird diese angesto en YCLOSE durch eine Prim rtask Die DCAM Anwendung wird aufgel st d h die DCAM Anwendung wird f r diese Task und f r alle zu dieser Anwendung geh rigen Sekund rtasks geschlossen Es werden alle in diesem Moment bestehenden Verbindungen abgebaut Anstehende Anforderungen von DCAM Funktionen werden aufgehoben Angekommene aber an die Task noch nicht bergebene Daten gehen verloren Die zu dieser Zeit in einer Warteschlange eingetragenen Aufforderungen zum Verbin dungsaufbau werden von DCAM zur ckgewiesen 987 2135 8 71 YCLOSE Anwendung schlie en F r die von diesem YCLOSE Aufruf betroffene Sekund rtask gilt Wenn die Sekund rtask eine COMEND Contingency Routine definiert hat wird sie durch ein Verzweigen auf diese Routine vom Schlie en der DCAM Anvvendung benachrichtigt st keine COMEND Contingency Routine definiert worden so wird die Task beim n chsten Makroaufruf der sich auf diese DCAM Anwendung bezieht die R ckmel dung nicht er ffnet siehe Anhang Seite 298 davon unterrichtet da die Anwendung bereits geschlossen ist Dazu mu angegeben werden 1
33. FDB2 Zustand Bemerkung des Makro aufrufs nur bei YOPEN Makroaufruf nur bei YSENDREC und YRECEIVE angenommen nur bei asynchronen YOPNCON YRECEIVE und YSENDREC Anzeige Dateneigenschaft ausge Warnung und Gruppie f hrt rungsanzeige e verursacht durc Zustand der DCA Anwendung verursacht durc Zustand des Par bertragungssystems falsche Operanden im Makroaufruf Fehler zur ckg Abweisung durch wiesen System Exit Zustand Bemerkung des Makro aufrufs zur ckge falsche Adressierung wiesen oder Registerangabe zur ckge Subsystem DCAM nicht wiesen verf gbar 300 987 2135 8 Anhang Tabelle der R ckmeldungen R ckmelde Feld Bedeutung Makroaufruf F F F F Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OT O G T TI I I R T N N G G E R T D V E E E C 00 akroaufruf erfolgreich beendet 00 00 Task ist Prim rtask der x DCAM 00 04 Task ist Anvendung Sekund rtask x 00 akroaufruf angenommen OPTCD ASY x x x 00 00 achricht berschreitet nicht die Pufferl nge 00 22 achricht berschreitet Pufferl nge berlange ist gel scht 00 23 Nachricht berschreitet Pufferl n
34. Im Gegensatz zur statischen Erzeugung k nnen Adressen bei dieser nderung wie auch bei der dynamischen Erzeu gung in einem Register angegeben werden U987 J Z135 8 987 2135 8 Steuerblockfelder Im Katalog der Makroaufrufe Seite 1531 sind bei allen Aktionsaufrufen die Felder aufge f hrt die jeweils ben tigt werden Sie k nnen mit dem Aufruf in der angegebenen Weise neu gesetzt werden Dar ber hinaus k nnen alle beliebigen Felder des RPB soweit f r den Anwender ver nderbar gesetzt werden siehe Anhang Seite 291ff Zu beachten ist da hierbei nicht auf Standardwerte zur ckgegriffen werden kann wie dies im Kapitel Anwendung der Funktionen von DCAM Seite 47ff gezeigt wird Dort wird zur Erleichterung der Arbeit immer ein eigens f r den Aktionsaufruf generierter Steuerblock benutzt soda Standardwerte nicht angegeben werden m ssen Dies erbringt auch eine geringere Laufzeit 25 Steuerblockfelder ver ndern 2 4 2 26 nderungen mit einem eigenen Aufruf Der Illustration dient das folgende Bild und das Bild auf Seite 23 En Befehle Konstanten und Variable Veranlassung der nderung Parameterliste der nderungen LA 6 RI MI MODCB BLK RPB MF L LA 4 AIDI BLKADDR 6 L 5 0261 4 M CID 5 YMODCB 3 BLK RPB zu ndernder Steuerblock RI YRPB AREA AREALN AIDI DS F 5 E CIDI DS
35. LGTH OF BODY OF CNT BLOCK 1 d BODY OF CONTROL BLOCK CCB 1 1 YDDCCID DS XL4 CID 1 YDDCPTN DS A A PTNNAME 1 YDDCPAWO DS A LOGPW 1 YDDCUSER DS XL4 USERFLD 1 YDDCPCN DS A A PRONAME i SP 1 YDDCITRA DS XLI BYTE 1 FOR EDITIN 1 1 YDDCITLI EQU X 01 EDITIN LINE 1 YDDCITPH EQU X 02 EDITIN PHYS 1 YDDCITFO EQU X 047 EDITIN FORM 1 YDDCIT2 DS XLI BYTE 2 FOR EDITIN 1 YDDCISPA EQU X 80 EDITIN GETBS 1 YDDCILCA EQU X 40 EDITIN LCASE 1 YDDCIGET EQU Xx 20 EDITIN GETFC 1 1 YDDCOTRA DS XLI BYTE 1 FOR EDITOUT 1 1 YDDCOTLI EQU X 01 EDITOUT LINE 1 YDDCOTPH EQU X 027 EDITOUT PHYS 1 YDDCOTFO EQU X 047 EDITOUT FORM 1 1 YDDCOCOP DS XLI BYTE 2 FOR EDITOUT 41 1 YDDCOHCP EQU X 80 EDITOUT HCOPY 1 YDDCOHOM EQU X 40 EDITOUT HOM 1 YDDCOEXT EQU X 20 EDTITOUT EXTEND 1 YDDCOLOG EQU X 10 EDTITOUT NLOGC 1 YDDCOLAK EQU X 087 EDTITOUT LACK 1 1 YDDCDIP DS A A DIP 1 YDDCDID DS OF DID 1 YDDCDSN DS H 1 YDDCDLN DS H 1 1 YDDCFLG1 DS XLI FLAGBYTE 1 1 YDDCMDAT EQU X 10 DATA YES 1 1 YDDCTRUN EQU X 047 PROC TRUNC 1 YDDCKEEP EQU X 02 PROC KEEP 334 987 2135 8 Anhang YDDCCBK YDDCFLG2 YDDC YDDC YDDC YDDC YDDC YDDC YDDC RCO RST RSI RTE 11 2 RI3 tg YDDCFLAG YDDCFLG3 YDDCPDXP YDDCPED YDDCPPST Y
36. RTNER DEVICE RESERVE R DSSIM A PTNCHAR R DSSIM L PTNCHAR UTENUMBER RLTH FOR OPNCON ROUTELIST RESERVE GTH OF CONTROL BLOCK 55616012 335 Steuerbl cke und R ckmeldungen Anhang 336 Makro YDDDCG Mit dem Makroaufruf YDDDCG kann ein Pseudo Abschnitt CSECT oder DSECT f r den Steuerblock DCG angelegt werden Format Name Operanden symbol YDDDCG lc prefix Operanden symbol gibt die symbolische Adresse f r den Makroaufruf an Wird keine Adresse angegeben so wird die Adresse YDDDCG erzeugt gibt an was generiert werden soll D verlangt die Generierung eines Pseudoabschnitts c verlangt die Generierung eines Code Abschnitts prefix gibt eine Zeichenfolge von maximal 4 Zeichen an die den Namen vorangestellt wird Ohne diese Angabe wird die Zeichenfolge YDDG jeweils dem symbolischen Namen vorangestellt 987 2135 8 Anhang U987 J Z135 8 Steuerbl cke und R ckmeldungen Pseudoabschnitt DSECT f r den Steuerblock DCG YDDDCG DDDCG DGHDTY DGHDD DGHDCB DGHDLN KU CI DDGNCOD DDGFLGI DDGCO DGRES1 DGCODE DGCOD1 DGCOD2 DGCOD3 DGCOD4 DGCOD5 DGCOD 6 DGCOD7 DGCOD8 UQ Qu o DDGGID DDGGSN DDGGLN K IKKKIKKKKKKRKKKK IK HI KG XX HF KR KG SE IS Xxx DDGL
37. SET DCAM APPLIC 1 YAPPL NEA ISO LINK kettungsname register Kettungsname anwendungsname register Anwendungsname DISNAME Verteilungsname register gt Verteilungsname USEPASS C konstante Kennwort f r Sekund r X konstante task Vorgabe in register gt Primartask USEPW C konstante X konstante Kennvort f r register gt Sekund rtask LOGPASS C konstante X konstante Kennvort f r log Verb register gt Vorgabe in Prim rtask 1 siehe Handbuch BS2000 Dienstprogramme 146 987 2135 8 Zuweisung f r die DCAM Anwendung YOPEN Es soll die Zuweisung f r die DCAM Anvvendung festgelegt werden Es mu angegeben werden 1 im ACB ein Kettungsname weitere Eintr ge siehe Beschreibung des YOPEN Seite 50 Es kann angegeben werden 2 da die Informationen der CLT Eintr ge die Angaben im ACB berschreiben Fehlt die Angabe stehen sie nur w hrend des Aufrufs zur Verf gung Ferner m ssen 3 Eintragungen in der CLT gemacht werden wahlweise durch den Makro YAPPL Erl uterungen siehe Beschreibung des YOPEN Seite 50 oder mit dem Kom mando SET DCAM APPLICATION LINK siehe Anhang Seite 360 Beachten Sie da der Aufruf YAPPL und das Kommando SET DCAM APPLICATION LINK nur benutzt werden k nnen wenn das DCAM Subsystem erfolgreich geladen wur de Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor
38. Transport Service Anwendungen wird die More Data Funktion f r diese Verbindung nicht genutzt Y Bei DCAM ISO Transport Service Anwendungen wird die More Data Funktion f r diese Transportverbindung genutzt Sie legt fest wie die Dateneinheiten an der eigenen lokalen DCAM ISO Schnittstelle berge ben werden sagt jedoch nichts ber die Aufteilung der physikali schen Datenbl cke zum fernen Transportsystem aus Dieser Operand wird ausgewertet bei YOPNCON MDATA kann nach erfolgtem Verbindungsaufbau nicht mehr ver ndert werden Eine detaillierte Information ber die More Data Funktion ist dem Handbuch Programmschnittstellen zu entnehmen 987 2135 8 Makroaufrufe YCCB RLTH absexp Maximal erwartete Nachrichtenl nge Standardwert 65535 bei DCAM ISO Transport Service Anwendungen Dieser Wert wird nicht an den Kommunikationspartner weitergegeben er dient lediglich der Optimierung der vom System bereitgestellten Puffer Der DCAM ISO Operand ist abh ngig von MDATA Ist MDATA N kann die maximal erwartete Nachrichtenl nge im Operanden RLTH angegeben werden und dadurch Systemspeicherplatz eingespart werden RLTH bie tet in diesem Fall jedoch keine Gew hr da nicht doch l ngere Nachrichten eintref fen k nnen Ist MDATA Y wird nach erfolgtem Verbindungsaufbau die maximal m gliche L nge der zu empfangenden Nachrichten eingetragen Ein eventuell angegebener Wert f r RLTH wird ignoriert
39. Xxx x x XX xx KR vw Zur Versorgung der brigen Felder des internen Arbeitsbereichs und der Steuerbl cke DACB DCCB siehe Seite 289 Nicht versorgte Adressen und Felder sind mit X 00 initialisiert 987 2135 8 6 2 2 2 987 2135 8 DCAM SYSTEM EXIT R ckinformation f r die Exit Ereignisse Bei den Exit Ereignissen die zur Information der Exit Routine dienen kann die Exit Rou tine die Bearbeitung in DCAM nicht beeinflussen Bei folgenden Exit Ereignissen mu daher immer RC 00 im Register 15 zur ckgegeben werden APPCLS APPSHU APPTRM APPFCL CONCPL CONCLS CONFCL CONBAD Bei den Exit Ereignissen APPOPN CONACQ CONACC und CONREQ kann die Exit Routine die weitere Bearbeitung in DCAM beeinflussen Aus nachfolgender Tabelle ist zu sehen welche R ckinformationen bei diesen Exit Ereignissen gesetzt werden k n nen R ckinformation Bedingung Exit Ereignisse Register 165 YDDEXPL xe ec RC 08 YDDXLOGL 0 x der Mert kann angegeben verden der Mert das Feld kann nicht angegeben verden das Feld mu angegeben werden falls die angegebene Bedingung zu trrttb Durch Setzen des RC 08 in Register 15 kann die Exit Routine die Modifikation einiger Benutzerangaben veranlassen Die neuen Angaben werden ber die R ckgabefelder in der Parameterliste YDDEXPL an DCAM bergeben 287 DCAM SYSTEM EXIT 6 2 3 288 Folgende Modi
40. ckgabe vom YGENCB L nge des Adresse des R ckmeldung akroaufruf Steuerblocks Steuerblocks R ckgabe vom YMODCB ver ndert R ckmeldung akroaufruf R ckgabe vom YSHOWCB erforder ver ndert R ckmeldung akroaufruf liche 2 Speicher lange R ckgabe vom YTESTCB Test ver ndert R ckmeldung akroaufruf resultat 2 bedeutet unver ndert 987 2135 8 317 Registerbelegung Anhang 2 Registerbelegung bei Ansto einer Contingency wegen einer asynchronen DCAM Meldung Reg Inhalt 1 Contingency Information die im Makroaufruf ENACO mit dem Parameter COMAD festgelegt wurde 2 Grund f r den Ansto der Contingency Routine in 2 Bytes ES Ereignis Schalter rechtsb ndig II Informations Indikator linksb ndig Die Angaben in folgender Tabelle sind sedezimal II ES 00 00 Keine Contingency Information COMAD 08 00 vorhanden 04 00 Eine Contingency Information COMAD ist 00 vorhanden LOGON LOSCON PROCON COMEND EXPR Tack SECOND 3 AID AID AID AID AID AID AID 4 LID CID Name Inhalt CID CID Inhalt des siehe siehe vorge Seite 319 Seite 319 schla 5 L nge Inhalt genen Inhalt Inhalt Vertei der von Part von von lungs Verbin USERFLD ners USERFLD USERFLD name dungs im CCB im CCB im CCB nach Steuer Steuer Steuer richt block block block 6 Inhalt Name Daten Quit Vertei siehe des Pro der tung lungs Seite 319 zessors EXPRESS
41. die Adresse des Feldes das die zu sendenden Daten enth lt 2 die L nge der Nachricht die gesendet werden soll Bei DCAM NEA Transport Service Anwendungen kann die Angabe entfallen wenn eine Expre nachricht gesendet werden soll In diesem Fall wird die maximale L nge von 8 Byte angenommen 3 die Adresse des ACB Steuerblocks in dem das g ltige Kennzeichen der Anwen dung AID steht oder ein Register in dem das g ltige Kennzeichen steht Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein 4 die Adresse des CCB Steuerblocks in dem das g ltige Kennzeichen der Verbin dung CID steht oder ein Register in dem das g ltige Kennzeichen steht Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein Ferner kann angegeben werden 5 da die Nachricht per Expre bermittelt werden soll d h unter Umgehung aller Datenflu kontrollen und mit der F higkeit andere Nachrichten f r den gleichen Partner zu berholen nur bei NEA Transport Service Diese Angabe schlie t ein da die L nge maximal 8 Byte betragen kann Bei Nor malnachrichten entf llt diese Angabe 6 da bei DCAM ISO Transport Service Anwendungen der Anwender abh ngig von MDATA angeben kann ob die gesendete Dateneinheit die letzte einer Nachricht ist OPTCD GROUP oder ob noch weitere Dateneinheiten folgen Dieser Ope rand wird nur ausgewertet
42. die in DCAM Benutzerprogrammen auftreten k nnen Erzeugen von negativen Transportquittungen Negative Transportquittungen k nnen durch Endsysteme oder durch Transit Systeme erzeugt werden Endsysteme sind Systeme die mindestens einen der Verbindungspartner enthalten Transit Systeme sind Systeme die Endsysteme miteinander verbinden Transportsysteme Transitsysteme senden negative Transportquittungen wenn eine Nachricht bzw Expre nachricht nicht bermittelt werden konnte z B weil die Leitung oder der Port zum Partnerssytem nicht betriebsbereit ist Hinweis Ein Grund f r Leitung nicht aktiv kann auch ein Betriebsmittelengpa im Emp fangssystem sein eine Nachricht l nger ist als die maximal zul ssige Paketl nge Die Behandlung von negativen Transportquittungen ist abh ngig von der jeweiligen Pro duktversion siehe Tabelle Eigenes System Partnersystem Behandlung von DCAM Version PDN Version negativen Transportquittungen 8 0 Alle negativen Transportquit tungen werden an das DCAM Be nutzerprogramm gesendet 8 0 Negative Transportquittungen werden nur vom Endsystem an das DCAM Anwendungsprogramm ge sendet Der Typ Betriebsmittel engpass kommt nicht vor Er wird durch den Datenflu mechanismus ersetzt 987 2135 8 Anhang 987 2135 8 Endsysteme Negative Transportquittungen Die Behandlung von negativen Transportquittungen ist unterschiedlich beim PDN und bei DCAM
43. einen X 00xxxxxx erfolg reich ausgef hrt oder RC X 04xxxxxx Warnung liefert der RC des YSENDREC zeigt dann das Ergebinis des YRECEIVE an auch im eventuell vorhandenen VTSUCB Zu beachten ist da das Empfangen von Daten z B auch nach Ausgabe wurde gek rzt YSEND RC X 04002C00 ausgef hrt wird Wird beim Senden der Daten weder RC X 00xxxxxx noch RC X 04xxxxxx geliefert wird der YSENDREC Aufruf mit einem entsprechenden Return Code beendet Bei spielsweise kann bei einer berlastung der Verbindung ein Wait for Go gegeben werden das Empfangen von Daten wird dann nicht mehr eingeleitet R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung siehe Seite 136 und der Tabelle der Meldungen zu entnehmen Anhang Seite 298 245 YSETLOG 4 24 246 Makroaufrufe YSETLOG 2 Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen Funktion Dieser Aufruf veranla t die nderung des Zustands einer DCAM Anvvendung Es kann der START in den STOP Zustand und der STOP in den START Zustand ge ndert wer den siehe auch Seite 74 Der Aufruf kann nur in einer Prim rtask gegeben werden Format Name Operanden symbol YSETLOG RPB addr schl sselwort neuer wert Operanden Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer wert Hiermit k nnen Werte des RPB Steuerblocks wie auch mit dem Aufruf YMODCB akt
44. entweder die Adresse des Steuerblocks ACB in dem das g ltige Kennzeichen AID steht oder ein Register welches das g ltige Kennzeichen enth lt Beispiel Die unter dem Namen APPL er ffnete DCAM Anwendung soll geschlossen werden YOPEN ACB ACBNAM YCLOSE ACB ACBNAM ACBNAM YACB ISO Y APPNAME NAME NAME DC CL8 APPL 72 987 2135 8 3 2 987 2135 8 Makroaufrufe bezogen auf eine Verbindung Makroaufrufe bezogen auf eine Verbindung Bevor Kommunikationspartner Nachrichten bermitteln k nnen m ssen sie eine Verbin dung aufbauen Einer der Partner fordert zum Verbindungsaufbau auf Die Aufforderung wird dem anderen Partner durch das Kommunikationssystem bermittelt Informationen ber den auffordernden Partner kann er abfragen Er kann die Aufforderung annehmen oder zur ckweisen Bestimmte Eigenschaften der Verbindung k nnen f r eine beste hende Verbindung wieder ge ndert werden Die Verbindung kann von jedem der Part ner jederzeit abgebaut werden Die verbindungsbezogenen Makroaufrufe sind YOPNCON Aufbau einer Verbindung auffordern annehmen YINQUIRE Abfragen von Informationen ber die Verbindung und verbun dene Partner YREJLOG Zur ckweisen einer Aufforderung zum Verbindungsaufbau YCHANGE ndern von Eigenschaften einer Verbindung YCLSCON R cknahme einer Aufforderung bzw Abbau einer Verbindung Angaben zur dynamischen Namen Zuweisung LINK werden in einem eigenen Ab sch
45. konstante oder Sedezimalkonstante X konstante oder Festpunktkonstante F konstante oder Adre konstante A konstante V konstante definiert werden abh ngig von der maximalen Paketl nge bei Transfer zu einem angeschlossenen Rechner bzw von einer Systemkonstanten bei bermittlung innerhalb des Verarbeitungsrechners Die ersten vier Byte der Partnercharakteristika siehe Handbuch VTSU Kapitel Statusinformation Es soll eine Verbindungsaufforderung angenommen werden Bei DCAM NEA Transport Service Anwendungen ist die Annahme der Aufforderung zum Aufbau einer Verbindung nur dann n tig wenn die Anwendung Aufforderun gen bearbeitet Attribut LOGON und Zustand START Die in diesem Abschnitt dar gestellte Variante des YOPNCON setzt zudem voraus da die Anwendung entwe der mit dem Attribut NSHARE siehe Seite 51 oder den Attributen SHARE NDISCO siehe Seite 54 er ffnet wurde Dazu mu angegeben werden 1 2 die Adresse des Steuerblocks CCB in dem die aufzubauende Verbindung be schrieben ist siehe Seite 75 entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen AID enth lt oder ein Register welches das g ltige Kennzeichen enth lt Diese Angabe kann entfallen wenn das Kennzeichen vorher z B mit YMODCB in den RPB eingetragen worden ist Weiterhin kann angegeben werden 3 987 2135 8 ob die Aufforderung eines bestimmten Partners SPEC angeno
46. l 213 YPERMIT 214 Makroaufrufe Operanden RPB addr Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer wert Hiermit k nnen Werte des RPB Steuerblocks wie auch mit dem Aufruf YMODCB aktuali siert werden Folgende Angaben sind bei der Bearbeitung des YPERMIT von Bedeutung schl sselwort neuer wert ACB 1 addr arp 1 register AAREA addr AREA addr 1 Entweder ACB oder AID mu angegeben werden Werden sowohl ACB wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird Zur Beschreibung der einzelnen Felder siehe YRPB Seite 223 und die Tabelle der Steu erblockfelder Anhang Seite 291 R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung siehe Seite 141 und der Tabelle der Meldungen zu entnehmen Anhang Seite 298 U987 J Z135 8 Makroaufrufe YRECEIVE 4 18 987 2135 8 YRECEIVE Funktion Mit diesem Aufruf wird das bertragen Empfangen von Daten in den Speicherbereich des Benutzers eingeleitet Es k nnen Nachrichten und bei DCAM NEA Transport Service Anwendungen zus tzlich Expre nachrichten und Transportquittungen empfan gen werden siehe auch Seite 130 Format Name Operanden symbol YRECEIVE RPB addr schl sselwort neuer wert Operanden RPB addr Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer wert Hiermit k
47. n dige Siemens Vertretung 388 987 2135 8 Stichvv rter Stichvv rter A AAREA 224 AAREALN 225 ablaufinvariante Programmierung 13 absenderspezifische Warteschlange 132 163 228 ACB 188 225 ACCEPT 228 ACQUIRE 228 Adresse des Makros 11 Adresse des Steuerblocks 208 AID 121 188 Aktionsaufruf 7 47 akustisches Signal 233 Anwendung einfach benutzbar 159 mehrfach benutzbar 159 Anwendungsname 158 166 Anwendungssteuerblock 157 Anzahl der Routen 174 Anzahl der Steuerbl cke 202 APPL 165 APPLICATION Kommando 360 APPNAME 158 APPSTART 184 APPSTAT 230 AREA 225 AREALN 226 ASY 231 Asynchrone Ausf hrung 30 DCAM Meldung 38 Verarbeitung 135 987 2135 8 389 Stichvv rter 390 Asynchroner Aufruf 231 SOLSIG 34 Aufforderung annehmen 84 annehmen von bestimmten Partnern annehmen 85 von beliebigen Partnern annehmen 85 zum Aufbau 80 zur cknehmen 121 zur ckweisen 116 Aufruf asynchron 231 synchron 231 B Befehle ausf hren 29 Befehlsausf hrung asynchrone 30 synchrone 29 Befehlsform E Form Execute Form 15 Begleitinformation 193 beliebige Task 162 beliebiger Partner 231 BELL 233 benutzerfeld 174 193 Beschreibung der Verbindung 75 Bitmuster transparenter Modus 76 184 BLK 202 203 208 249 251 252 BTERMINF 106 235 c CA Zustand 229 CCB 226 CIDXLATE 94 114 230 CLT communication link table 165 172 Codeanzeiger 196 CODEIND 196 CODELN 195 CODEPOS 195 CODEVAL 194 COMEND 43 49
48. nur notwendig wenn 77 o nicht derselbe RPB Nachricht zum Senden verwendet wird Verwendung der Kennzeichen 987 2135 8 23 Steuerblockfelder ver ndern 2 4 2 4 1 Inhalte von Steuerblockfeldern ver ndern Soll derselbe Steuerblock von verschiedenen Aufrufen als Operandenfeld benutzt wer den so mu er jeweils mit den aktuellen f r den Aufruf g ltigen Werten versorgt wer den Um dies zu erreichen und um berhaupt nderungen in einem Steuerblock zu machen gibt es zwei verschiedene M glichkeiten nderungen bei Verwendung des Steuerblocks An einem Beispiel wird dieses Verfahren im folgenden Bild gezeigt vor Ausf hrung von YOPNCON YOPNCON 1 OPTCD ACCEPT RPB1 YRPB OPTCD ACQUIRE nach Ausf hrung von YOPNCON OPTCD ACCEPT RPB Steuerblock ge ndert in Beispiel f r nderung bei Verwendung eines Steuerblocks 24 Das ndern von Feldinhalten bei Verwendung des Steuerblocks ist nur beim RPB m g lich notwendigerweise dann wenn ein RPB f r mehrere unterschiedliche Aufrufe ver wendet wird Die Feldinhalte die ge ndert werden sollen k nnen im Makroaufruf mit der Adresse des zu ndernden RPB angegeben werden Dadurch werden die alten Ein tragungen im Steuerblock berschrieben Die urspr nglichen bei der Steuerblockerzeu gung angegebenen Werte sind nicht mehr erreichbar
49. register gt partners PRONAME prozname Prosessorname des Kommuni register gt ationspartners USRFLD C konstante X konstante Feld f r Anvender register information LOGPW C konstante X konstante ennwort zum Aufbau einer register gt log Verbindung 987 2135 8 149 YOPNCON Zuvveisung f r die Verbindung Es soll die Zuvveisung f r die Verbindung festgelegt vverden Es mu angegeben werden 1 im CCB ein Kettungsname weitere Eintr ge siehe Beschreibung des YOPNCON Seite 74 bis Kapitel Katalog der Makroaufrufe Es kann angegeben werden 2 da die Informationen der CLT Eintr ge die Angaben im CCB berschreiben sollen Fehlt die Angabe stehen sie nur w hrend des Aufrufs zur Verf gung Ferner m ssen 3 Eintragungen in der CLT gemacht werden wahlweise durch den Makro YCONN Erl uterungen der einzelnen Eintr ge siehe Beschreibung des YOPNCON Seite 74 bis Kapitel Katalog der Makroaufrufe oder mit dem Kommando SET DCAM CONNECTION LINK siehe Anhang Seite 360 Beachten Sie da der Aufruf YCONN und das Kommando SET DCAM CONNECTION LINK nur benutzt werden k nnen wenn das DCAM Subsystem erfolgreich geladen wur de Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolgreich abgesetzt hat kann er trotz HOLD Subsystem oder DELETE
50. rung block ruf zur YGENCB YMODCB YTESTCB f r feldes statischen YSHOWCB Steuerblock erzeugung max 8 Verteilcodewerte DCG CODEVAL codevalue 64 3eder in einem Feld von 8 Byte linksb ndig einge tragen GID register register 4 Kennzeichen der Verteil Codegruppe DCG DCGLN value 2 L nge des Verteilcode gruppen Blocks DIP CODELN absexp value value value 2 1 L nge des Verteilcodes CODEPOS Position des Verteilcodes CODEIND character character character character 2 1 Anzeige f r impliziten Verteilcode DCG relexp 64 max 16 Adressen von DCG Steuerbl cken DID register register 4 Kennzeichen der Nachrichtenverteilung DIPLN value 2 L nge des DIP Steuerblocks ENB LOGON Adres LOGON LOSCON se des LOSCON PROCON Kenn PROCON Contingency COMEND relexp addr addr addr 4 zei COMEND Routine EXPR chens EXPR TACK der TACK SECOND SECOND ENBLN value 2 L nge des ENB Steuerblocks 1 987 2135 8 Rechtsb ndiges Byte 295 Tabelle der Steuerblockfelder Anhang Sehl ssel Wert oder mnemotechnischer Wert Steuer vort des Feld block Steuer Makro Auf lange Erkl rung block ruf zur YGENCB YMODCB YTESTCB f r feldes statischen YSHOWCB Steuerblock erzeugung RPB ACB ACB Steuerblock CCB Adres CCB Steuerblock AREA relexp addr addr addr 4 se Pufferbereich AAREA von alternativer Puffer VCBADR VTSUCB EID ber Ereignis kennzeichen AREALN 4 L nge des Puffer
51. wenn der asynchron ausgef hrte Befehl beendet wird Fehlt diese Angabe oder ist sie gleich dem Standardwert X 00000000 wird nur das erste Wort der Ereignisinformation bergeben 93 YINQUIRE 3 2 2 94 Eintr ge abfragen Im Steuerblock CCB ist die Verbindung zu beschreiben siehe Seite 75 Es k nnen aber nicht alle Optionen angegeben werden siehe Bild Bei Verwendung von Verteilcodes gilt zus tzlich das im Abschnitt Nachfolgendes Er ff nen auf Seite 89 Beschriebene Eintr ge ber Partner und Verbindungen abfragen Beim Aufbau einer Verbindung und auch sp ter gibt es unterschiedliche Gr nde ber einen Partner oder eine Verbindung Informationen abzufragen Ein Partner der nicht bekannt ist fordert zum Verbindungsaufbau auf und schl gt Modalit ten vor Er hat ggf eine Verbindungsnachricht gesendet Dies wurde durch den Ansto der LOGON Contingency Routine bekannt REQLOGON Es wurde keine LOGON Contingency definiert und darum soll der erste Eintrag einer ggf vorhandenen Warteschlange von Verbindungsaufforderungen gepr ft werden TOPLOGON Es wird die Anzahl der verbundenen und zur Verbindung auffordernden Partner gebraucht COUNTPTN Es ist der Partnername und Prozessorname bekannt es soll aber ein evtl bereits vorhandenes Kennzeichen der Verbindung CID ermittelt werden NAMXLATE Es ist das Kennzeichen der Verbindung C D bekannt und es sollen der Partner name und
52. x 8 X cc X D X D4 THE FOLLONING EQUATES ARE VALID IF IN FEEDBACK FIELD 1 X 047 X 087 X 0C X 10 X 14 X 20 INVALID DEPROT EDIT SYSTEM TIMEOUT PARTNER NOT AVAILABLE PARTNER IN STOP STATE PARTNER IN NLOGON STATE INVALID LOGPW REQUEST REJECTED PTNCHAR NOT ACCEPTED BY PTN INVALID STAT SERV ELMT DATA PTN IN STOP REOCON FOLLOWS RR IN ACTIVATING PTN S VTSU INER ALREADY DEDICATED DCG MEDIATELY DISCONNECTED FTER ACCEPTANCE YNTAX ERROR IN USER MSG NKNOWN AUTHORIZATION NAME PLICATION ALREADY CONNECTED VALID PASSWORD ROPOSED GROS REJECTED BY PTN ROP NETW PRIO REJ D BY PTN TN PROCESS ERR X 25EVENT ONN REQ REJECTED BY ADMIN ROTOCOL INCONSISTENCY BY PTN XPEDITED NOT ALLOWED NRECOVERABLE UCON ERROR TATION NOT PRIVILEGED ROCESSOR NOT PRIVILEGED O TASK FOR PW CHECK RONG CID FOR OP ID INTERNAL UCON ERROR NO ECRNAM ENTRY AVAILABLE DCAM VERSION lt 10 NO CHIPCARD TERMINAL NOT NEW PROTOCOL NO CHIPCARD SUBSYSTEM ERROR IN KVP PROTOCOL ri 2 00 2 3 02 22 RDCS 15 SET 4210 kk iki DCS SHORTAGE OF RESOURCES DCS SHUTDOWN WARNED DCS QUICK SHUTDOWN DCS INACTIVE DCS ERROR DCAM IS LOCKED THE FOLLOWING EQUATES ARE VALID IF INRU IS SET IN FEEDBACK FIELD 1 X 047 X 087 X 0C X 10 X 14 X 18
53. 0 bed name an dem Nach positiv der vor richt 4 bed geschla negativ gene 7 Partner Laufen ange de Num schlos mer der sen ist Qittung 8 Lauf nummer der Nach richt 318 die Spalten EXPR und TACK betreffen nur DCAM NEA Transport Service Anvendungen 987 2135 8 Anhang Registerbelegung F r die folgenden Inhalte k nnen symbolische Adressen generiert werden Makroaufruf YDDFDB Anhang Seite 326 Inhalt Xx 007 X 087 X 0C X 10 X 14 X 18 X 1C X 207 X 24 X 28 x 2C X 30 X 34 x 38 Xor X 40 U987 J Z135 8 rechtsb ndig von Register 6 bei LOSCON der Verbindungsabbruch wurde vom Anwender angefordert Verarbeitungsfehler z B bei einer St rung an X 25 Der Partner ist nicht mehr verf gbar bzw die Datenstation ist ausgefallen Verbindungsabbruch durch externen Eingriff Systemoperator Die Verbindung wurde im Netz unterbrochen Es ist eine erneute Aufforderung zum Verbindungs aufbau zu erwarten Der Verbindungsabbruch ist auf eine St rung oder einen Zusammenbruch im Daten bertragungsnetz zur ckzuf hren reserviert Warnung vor dem bevorstehenden Verbindungsabbruch reserviert Die Verbindung des Partners wurde nach Aufforderung durch die Systemverwaltung aufgel st Fehler im Verbindungselement des Stations dienstes reserviert Fehler im Stationsdie
54. 1 1 1 1 1 1 1 1 1 1 YDDROPC5 DS XLI BYTE 5 FOR OPTCD 1 1 YDDREXPR EQU X 80 OPTCD EXPR 1 YDDRTACK EQU X 40 OPTCD TACK 1 YDDRBELL EQU x 20 OPTCD BELL 1 YDDRFHSY EQU X 10 FHS YES FOR DCUS ONLY 1 1 1 YDDRACB DS A A ACB 1 YDDRAID DS XL4 APPLICATION IDENTIFIER AID 1 YDDRCCB DS A A CCB 1 YDDRCID DS XL4 CONNECTION IDENTIFIER 1 1 YDDRLID DS XL4 LOGON IDENTIFIER 1 YDDRAR DS A A AREA 1 YDDRARLN DS F AREAL 1 YDDRAA DS A A AAREA 1 YDDRAALN DS AAREALN 1 YDDRARCL DS F LENGTH OF DATA IN AAREA ARECLN 1 YDDRUSER DS USER 1 YDDRTOVA DS H TOVAL 1 YDDRTCKN DS H SEQUENCEf OF RECEIVED TACK 1 YDDRSON DS H SEQUENCE FOR OUTPUT SEONO 1 YDDRASON DS H SEQUENCE FOR INPUT ASEONO 1 YDDREID DS A A EVENT ITEM IDENTIFIER 1 YDDREIDR DS EIDREF1 1 1 YDDRFDBK YDDFDB YDDR 2 YDDRFDBK DS OF 2 x 2 FIELD ili kkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkkkkxkkkkkkkkkkkkkkkkkxk 2 YDDRFDB1 DS XL1 GENERAL RETURN CODE IN R15 TOO PA 2 YDDRSUCC EQU X 00 REQUEST SUCCESSFULLY 2 YDDRSUVA EQU X 047 REQUEST COMPLETED WITH WARNING 2 YDDRRAPS EQU X 087 REQUEST REJ DUE TO APP STATE 2 YDDRRPTS EQU X 0C REQUEST REJ DUE TO PART STATE 344 987 2135 8 Anhang U987 J Z135 8 NNNNNNNNNONNNONNNNNNNNNNNNNONNNONYNNNNNNNNNNNNNNNONNNNNONNNNNNNNNONNDODNNNNADN YDD YDD YDD YDD YDD YDD kkk YDD YDD YDD YDD YDD YD
55. 2 x 2 x 2 YDDFDB 034 920624 55616014 1 1 1 YDDRUREA DS X ISO USERDATA FOR REJ DISCON 1 DS CL3 RESERVE 1 si v EW PARAMETER EIDREF2 FIRST USE IN DCM V8 9 1 1 YDDREIR2 DS F EIDREF2 1 EW PARAMETER AVTSUCB FIRST USE V10 1 1 YDDRVCBA DS A 1 DS 8XL1 00 RESERVE 1 1 YDDRLEN EQU YDDRHDTY LENGTH OF CONTROL BLOCK YDDRPB 030 910919 55616013 END U987 J Z135 8 349 Steuerbl cke und R ckmeldungen Anhang Makroaufruf YDDFDB Der Makroaufruf YDDFDB generiert einen Bereich von 4 Byte der f r den Inhalt ver schiedener R ckmeldungen vorgesehen ist Wahlweise kann eine DUMMY SECTION erzeugt werden Die symbolischen Namen k nnen als symbolische Adressen zur Aus wertung der R ckmeldungen verwendet werden Format Name Operanden symbol YDDFDB k lc prefix FDBK TCONT 1 cBRC Operanden symbol gibt die symbolische Adresse f r den Makroaufruf an VVird keine Adresse angegeben so vvird die Adresse YDDFFDBK erzeugt gibt an was generiert werden soll Pl D verlangt die Generierung einer DUMMY SECTION c C verlangt die Generierung eines Bereichs von 4 Byte Lange prefix gibt eine Zeichenfolge von maximal 4 Zeichen an die dem symboli schen Namen vorangestellt wird Ohne diese Angabe wird die Zei chenfolge YDDF jeweils dem symbolischen Namen vorangestellt 350 987 2135 8 Anhang 987 2135 8 FDBK CONT CBRC Steuerbl cke
56. 55616014 359 Kommandos f r die Namen Zuvveisung Anhang 7 6 360 Kommandos f r die Namen Zuvveisung F r die Namen Zuvveisung gibt es zvvei Kommandos an das Organisationsprogramm des BS2000 Hier folgt eine kurze Funktionsbeschreibung und die Darstellung des For mats 1 APPLICATION Kommando Das APPLICATION Kommando wird von DCAM Benutzern verwendet um in einer pro ze spezifischen Tabelle der CLT communication link table Angaben ber eine DCAM Anwendung zu speichern bzw zu l schen Bei Er ffnung der DCAM Anvvendung durch ein DCAM Anwendungsprogramm ersetzen die Werte dieser Tabelle die entsprechenden Eintr ge im Anwendungssteuerblock ACB Assembler bzw in der Anwendungsstruktur COBOL Die Verkn pfung des CLT Ein trags mit diesem Programmbereich wird durch den Kettungsnamen hergestellt der dazu sowohl im Kommando als auch im Programm angegeben werden mu Beachten Sie da APPLICATION Kommando nur benutzt werden kann wenn das DCAM Subsystem erfolgreich geladen wurde Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolgreich abge setzt hat kann er trotz HOLD Subsystem oder DELETE Subsystem bis Taskende mit DCAM arbeiten gilt auch f r Format LICATION anwendungsname L LINK kettungsname DISNAME verteilungsname USEPASS kennwortl USEPW kennwort2 LOG
57. 9 RUF RU IH Xo FH KU XX 9 E Xod XX E Xi xox Xok FRC15 FOK FARSM FINCB 155 FNOFW FUSAR FERET FILST FIUSA FICBA FIREF START YDDFDB DSECT RETURN 15 DS EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EXTERNAL SYMBOL DICTIONARY D CBRC CODE FOR MANIPULATIVE REQUESTS LEFTMOST BYTE CLI LEFTMOST BYTE OF R15 X 00 REQUEST SUCCESSFUL X 047 USER REQM AREA TOO SMALL YGENCB X 047 BLKADDR POINTS TO INVALID CB YMODCB YSHONCB YTESTCB X 087 OBLIGATORY PARAM MISSING YGENCB YMODCB YSHOWCB YTESTCB X 0C WAREA NOT ON FULLWORD BOUNDARY YGENCB X 0C MODIFICATION NOT ALLOWED YMODCB x 0c USER AREA TOO SMALL YSHOWCB X Cc INVALID ERET ADDRESS YTESTCB X 10 INVALID BLK BLKADDR COMBINATION YMODCB YSHONCB YTESTCB X 14 INVALID FIELD BLK COMBINATION X 18 INVALID LIST ADDRESS MF PARAM X 1C INVALID ADDRESS OF USER AREA YGENCB YSHOWCB x ror INVALID CB ADDRESS YMODCB YTESTCB X 20 INVALID CB REFERENCE INVALID PL REFERENCE CONTENTS YMODCB YTESTCB 987 2135 8 Anhang 987 2135 8 YDDFNOSS EQU YDDFLNC 5 EQU END X 24 CL3 YDDFRC15 YDDFDB 034 Steuerbl cke und R ckmeldungen CANNOT CONNECT TO SS UNUSED LENGTH 920624
58. 987 2135 8 Empfangsaufrufe zur cknehmen und CS CA Zustand ndern YRESET 3 3 4 Empfangsaufrufe zur cknehmen und CS CA Zustand ndern Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register nn gt Register n Nummer des Registers AID Kennzeichen der Anwendung 1 CID register Fr gt Register m Nummer des Registers CID Kennzeichen der Verbindung 2 RPB addr1 YRESET RPB NEA ISO ACB relexp 1 CCB relexp 2 OPTCD SPEC 3 OPTCD cs 4 FDBK R ckmeldung siehe Anhang Seite 298 4 DCAM gibt zur ck Register 15 siehe Anhang Seite 298 FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte CCB Steuerblock mit g ltigem Kennzeichen CID ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der den Aufruf beschreibt 987 2135 8 139 YRESET Empfangsaufrufe zur cknehmen und CS CA Zustand ndern 140 Es sollen Empfangsaufrufe zur ckgenommen werden und der CS CA Zustand ge n dert werden Dazu mu angegeben werden 1 entvveder die Adresse des Steuerblocks ACB in dem das g ltige Kennzeichen der Anwendung AID steht oder ein Register in dem das g ltige Kennzeichen steht Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein entweder die Adresse des Steuer
59. ACCEPTED BY PTN STAT SERV ELMT DATA STOP REQCON FOLLOWS ACTIVATING PTN S VTSU ALREADY DEDICATED TELY DISCONNECTED CCEPTANCE ERROR IN USER MSG AUTHORIZATION NAME TION ALREADY CONNECTED PASSWORD D GROS REJECTED BY PTN ETW PRIO REJ D BY PTN CESS ERR X 25EVENT Q REJECTED BY ADMIN L INCONSISTENCY BY PTN ED NOT ALLOWED ERABLE UCON ERROR OT PRIVILEGED OR NOT PRIVILEGED FOR PW CHECK ID FOR OP ID L UCON ERROR NO ECRNAM ENTRY AVAILABLE DCAM VE NO CHIP NOT NEW NO CHIP ERROR I THE FOLLOWING EQUATES ARE VALID IN FEEDBACK FIELD 1 X 047 X 087 X 0C X 10 x 10NN DCS SHO DCS SHU DCS QUI DCS INA RSION lt 10 CARD TERMINAL PROTOCOL CARD SUBSYSTEM KVP PROTOCOL IF RDCS IS SET kkk RTAGE OF RESOURCES TDOWN WARNED CK SHUTDOWN CTIVE 353 Steuerbl cke und R ckmeldungen 354 erererrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr rre YDDFDCSE EQU YDDFDCLK EQU YDDFIRSE EQU YDDFIRNS EQU YDDFIRNL EQU YDDFERPE EQU YDDFNAUT EQU YDDFSYNQ EQU YDDFIACB EQU YDDFICCB EQU YDDFIDCG EQU YDDFIDIP EQU YDDFIENB EQU YDDFIAAD EQU YDDFIDAD EQU YDDFIPAD EQU YDDFICOI EQU YDDFIEVI EQU YDDFIARA EQU YDDFIAAR EQU YDDFIAPN EQU YDDFIDIN EQU YDDFIPTN EQU YDDFIPRO EQU YDDFCCBA EQU B YDDFSEQH EQU YDDFWRLN EQU YDDFISUB EQU YDDFIPRN EQU YDDFNGAR EQU YDDFEDER EQU YDDFICDL EQU YDDFIPCL EQU YD
60. AUSTAUSCHE N IST ABSICHTLICH ZU KURZ 1 ENDEKENNZEICHEN SENDEN YSENDREC RPB 6 AAREA AAREAl AAREALN 8 AREALN 1 MVI CVD UNPK OI MVC BAL ENDE DS xox x YCLSCO MVI BAL L YCLOSE VI BAL TERM TERM EJECT AKTIND DSENDREC 9 DW ZUSATZ DW ANZAHL GESENDETER BYTES ZUSATZ L ZUSATZ 1 X FO Z 1 0 USATZ 4 AAREA1 4 ANZAHL EMPFANGENER BYTES 4 DUMPRC H BBAU DER VERBINDUNG BBAU DER VERBINDUNG D D N RPB 6 AKTIND DCLSCON 14 DUMPRC SCHLIESSEN DER ANWENDUNG 2 AIDSAVE AID 2 AKTIND DCLOSE 14 DUMPRC UNTERPROGRAMM RETURNCODE AUSGEBEN w DUMPRC DS ST LA AH VC UNPK VI TR WROUT VC BR ARKAKAKAKAKAKAKK TXTNIL DC TXTACB DC TXTCCB DC TXTRPB DC ESSAGE DS DC DC ESSTEXT DC DC ZUSATZ DC DC ESSCODE DC HK DC ESSEND EQU 270 OH 15 DCAMFDBK 8 AKTDIST 8 AKTDIST MESSTEXT 0 8 TEXT EINFUEGEN MESSCODE 9 DCAMFDBK 5 DCAM FDBK UMWANDELN KELTIA ESSCODE TRTAB C 0 ESSAGE TERM PARMOD 31 FDBK NACH SYSOUT AUSGEBEN USATZ TXTNIL A kkxkxkxkxkxkxkxkxkxk kx xx xx x DATEN kkxkxkxkxkxkxkxkxkxkxkxkxkkkkkkkkkx k L8 o L8 ACB L8 CCB L8 RPB MELDUNGSTEXT MESSEND MESSAGE p5 t 1 L8 FDBK X 7 L8 o 121 annaaaaxeacaacgtenssH m 987 2135 8 DCAM ISO Transport Service U987 J Z135 8 TRTAB AKTD
61. Anwender mu sie bei der Eingabe durch aktuelle Werte ersetzen Die Form der Eingabe wird durch die Art der PICTURE Klausel be stimmt kleinbuchstaben Alternative Angaben sind in geschweifte Klammern eingeschlossen Sie werden untereinander geschrieben Eckige Klammern schlie en Angaben ein die weggelassen werden k nnen Standardwerte sind un terstrichen dargestellt Das sind die Werte die das System einsetzt wenn der Anwender keine Angaben macht unterstrichen Punkte bedeuten eine Wiederholung Sie zeigen an da die davorstehende Einheit mehrmals wiederholt werden kann Erl uterung Beispiele YES partnername xES NO kennwort4 archivnr Einleitung Zeichen Erl uterung Beispiele O Ein Ausdruck der zur 0 lt l nge lt 9 Darstellung von Variab len benutzt wird steht in runden Klammern Diese Darstellung soll auf einen Blick den Wertebereich zeigen Da dazu mehrere Zeichen notwendig sind ist auch diese formale Eingren zung erforderlich IA Beziehung zweier Werte Der links stehende Wert nummer lt 2047 0 lt position sei kleiner oder gleich dem rechts stehenden der rechts stehende Wert sei gr ber oder gleich dem links stehenden IV Beziehung zweier Werte Der links stehende Wert anzahl sei gr er oder gleich dem rechts stehenden der rechts stehende Wert sei kleiner oder gleich dem links stehenden IV ji lt
62. B mit YMODCB das g ltige Kennzeichen in den RPB eingesetzt worden sein Es kann angegeben werden 3 die Adresse eines Bereichs in den der VTSUCB bergeben wird nur bei NEA Transport Service Ist VCBADR NULL wird der VTSUCB in die DCAM interne Daten struktur kopiert Ist VCBADR NULL wird die DCAM interne Kopie des VTSUCB gel scht Die Nachrichtenaufbereitung wird mit den Optionen die im CCB Steuer block festgelegt wurden fortgesetzt Die Daten werden beim Verbindungsaufbau YOPNCON bzw bei der letzten nderung der Verbindungseigenschaften YCHANGE bernommen Die Angabe wird nur ausgewertet wenn OPTCD VTSUCB gesetzt wurde 119 YCHANGE 120 Eigenschaften einer Verbindung ndern Die Eigenschaften der Verbindung die ge ndert werden sollen sind im Steuerblock CCB zu beschreiben Es werden nur die Felder ausgewertet die ge ndert werden k n nen Welche das sind geht aus der bersicht auf Seite 118 hervor N heres ist in der Beschreibung der Eigenschaften einer Verbindung nachzulesen Die Numerierung der einzelnen Felder bezieht sich darauf siehe Seite 75 Wird bei DCAM NEA Transport Service Anwendungen mit Verteilcodes gearbeitet k n nen auch neue Steuerbl cke DCG angeschlossen werden eine nderung der Eintragun gen f r Codeposition CODEPOS Codel nge CODELN und Codeanzeige CODEIND im DIP ist nicht m glich siehe Seite 89 Beispiel F r die DCAM NEA Transport Service Verbindung die durch d
63. BS2000 siehe Tabelle Grund Datenstation Leitung oder Port nicht aktiv Anwendung nicht verf gbar Anwendungsprogramm Betriebsmittel engpass DCAM BS2000 keine negative Transport quittung Verbindungsabbau nach wiederholtem Versuch Datenstation lokal ber MSN angeschlossen negative Transportquittung nicht bei vordefinierten Verbindungen negative Transportquittung der Anwender bernimmt gemeldete Daten nicht Zeitablauf negative Transportquittung Stau in der Warte schlange f r Expre nachrichten 777 565 PDN negative Transport quittung negative Transportquittung Ladefehler beim Anwen dungsprogramm Fehler im Anwendungspro gramm Adressierungsfehler negative Transportquittung nur durch das Benutzerpro gramm keine negative Transport quittung vom Endsystem negative Transportquittung X 25 Reset Das Erzeugen einer negativen Transportquittung hangt von den Produktversionen ab Die aufgef hrten negativen Transportquittungen vverden an das DCAM Anvvenderpro gramm gesendet 381 Fachvv rter Fachvv rter CMX Anwendung CMX application Kommunikationsanwendung an einem SINIX oder BS2000 Rechner die von einem CMX Anwendungsprogramm gesteuert wird Dateneinheit Data unit Datenmenge die mit einem Aufruf an DCAM bergeben bzw von DCAM empfangen werden kann Datenkommunikationssystem Data communication system Komplexe Einr
64. Bei DCAM ISO Transport Service Anwendungen jedoch nur wenn die Transportverbin dung mit der More Data Funktion arbeitet Wurde die Verbindung mit MDATA N er ff net so werden die Daten immer mit OPTCD GROUP gesendet jedoch ist zu beach ten da die Aufteilung der Nachricht beim Empf nger nicht identisch mit der Aufteilung beim Absender sein mu siehe Handbuch DCAM Programmschnittstellen Abschnitt Nachrichten und lokale Dateneinheiten BELL sssi nur bei NEA Transport Service NBELL BELL Die Ausgaben der Nachricht an der Datenstation sollen mit einem akusti schem Signal angezeigt vverden NBELL Ausgabe ohne akustisches Signal ELEMENT 1 OPTCD SUBGROUP nur bei NEA Transport Service GROUP ELEMENT Die Daten sind Element einer Gruppe oder Untergruppe von Daten SUBGROUP Die Daten sind das letzte Element einer Untergruppe von Daten GROUP Die Daten sind das letzte Element einer Gruppe von Daten st der Partner eine DCAM Anvvendung erh lt er sie als Angabe in FDB4 der R ckmel dung siehe Anhang Seite 298 987 2135 8 233 YRPB 234 Makroaufrufe Bei EDIT USER stellt DCAM nur sicher da die Information ber die Datenstufe Block letzter Block einer Nachricht letzter Block der bertragung mit gesendet wird Falls m glich wird diese Angabe in die Kontroll Information f r Terminals eingetra gen Bei EDIT SYSTEM bernimmt es DCAM die Nachricht f r den Anwender falls erfor der
65. Bei Eingabe von END wird die Verbindung abgebaut die Anwendung HUGO geschlossen und das Programm beendet sonst wird die Eingabe mit YSEND an CONSOLE geschickt Nach allen DCAM Aufrufen wird eine Fehlerbehandlungsroutine aufgerufen die bei Feh lern den Returncode ausgibt und das Programm beendet CONSOLE START PRINT NOGEN SPACE 3 BALR 10 0 BASISREGISTER USING 10 L 7 FDBCHK UNTERPROG FUER FDBK AUSWERTUNG SPACE 3 2 YGENCB E ST 1 AACB VI SVCIND DGENACB BALR 6 7 SPACE 3 ERZEUGEN YGENCB BLK CCB MF E YCCB ST 1 ACCB VI SVCIND DGENCCB BALR 6 7 SPACE 3 987 2135 8 259 Beispiele 260 FUH R YRECEIVE ERZEUGEN FUER YSEND ERZEUGEN DCAM NEA YGENCB BLK RPB MF E YRPB ST 1 ARECRPB VI SVCIND DGENRPB BALR 6 7 SPACE 3 YGENCB BLK RPB MF E YRPBO ST 1 ASNDRPB BALR 6 7 TM PROGSTA ENDPROG BNZ TERM ANWENDUNG HUGO EROEFFNEN L 3 AACB YOPEN ACB 3 MVI _SVCIND DOPEN BALR 6 7 SPACE 3 AID IN AIDO SICHERSTELLEN YSHONCB BLK ACB BLKADDR V BA EJ V RETRY WR V T I LR ECT OUT SVCIND DSHOWCB 6 7 STARTTYP STARTIND STARTMSG TER STARTTYP RETRYIND PROGSTA 255 NOCO LOGON MESSAGE EINLESEN CL BE VERBIND E E s 03 3 63 03 1264 00 Cc UNG RDATA IN
66. C WROUT ERRMSG TERM DS H FALLS WARNUNG WEITER FALLS CLI BE CLI BNE OI B YDDF CHEC YDDF CHEC FDB1 YDDFSUWA KEND KEINE VERBINDUNG ANZEIGE SETZEN FDB1 YDDFRPTS K08 PROGSTA NOCONN CHEC x ALLES ANDERE P ROGRAMMENDE PROGSTA ENDPROG CHECKEND BR 6 EJECT DATENDEKLARATIONEN FDBCHK A CHECKERR AACB DS A ACCB DS A ARECRPB DS A ASNDRPB DS A AIDO DS A Beispiele 263 Beispiele 264 CIDO CORRLEN PROGSTA ENDPROG NOCONN TIMEOUT YDDFDB ERRMSG ERRIND RCODE ERRMSGE ERRMSG1 SVCDIST SVCIND DGENACB DGENCCB DGENRPB DMODCB DOPEN DSHOWCB DOPNCON DRECEIV DSEND DRESET DCLOSE TRTAB INBUF INLEN INDATA RECLEN RECAREA WRLEN RECDATA DS A DC H 4 DC XL1 00 PROGRAMMSTATUS EQU X 807 EQU X 40 EQU X 20 EQU X 007 YDDFDB C SPACE 3 DC Y ERRMSGE ERRMSG DC UNRECOVERABLE DS CL6 DC C ERROR DC CORRERE NET EQU x SPACE 3 DS OF DS OH DS X DS X EQU ERRMSG1 DC C GENACB EQU ERRMSG1 DC C GENCCB EQU ERRMSG1 DC C GENRPB EQU ERRMSG1 DC C MODRPB EQU ERRMSG1 DC C YOPEN EQU 561 DC C SHOWCB EQU ERRMSG1 DC C OPNCON EQU ERRMSG1 DC C RECEIV EQU ERRMSG
67. CL8 53 YOPEN Mehrfach benutzbare Anvvendung 3 1 1 2 Mehrfach benutzbare DCAM Anvvendung erstmalig er ffnen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anvendungsprogramm ACBeaddr1 voren ACB NEA ISO ISO N Y 1 ATTR SHARE 2 Name der APPNAME relexp 3 DCAM Anwendung 8 Byte USEPW konstante 2 4 VERIFY PRIMARY 5 ENB relexp 6 USEPASS konstante 2 7 ATTR NLOGON 8 ATTR REQTASK NOTASK 9 LOGPASS konstante 2 10 PRONAME relexp 20 LIN relexp 12 iKettungsname 8 Byte LINKMODE PERM 13 DCAMVER absexp 14 AID Kennzeichen der DCAM Anwendung Symbolischer Name des eigenen Prozessors FDBK R ckmeldung siehe Anhang Seite 298 8 Byte CLT Information Register 15 siehe Anhan g Seite 298 DCAM gibt FDB 1 FDB 2 FDB 3 FDB 4 zur ck 1 Byte 1 Byte 1 Byte 1 Byte ENB NEA ISO PROCON relexp 6 Contingency Kennzeichen 4 Byte COMEND relexp 6 x EXPR relexp 6 TACK relexp 6 n LOGON relexp 6 LOSCON relexp 6 hi SECOND relexp 6 1 Adresse des Steuerblocks der die DCAM Anwendung beschreibt 2 konstante kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante definiert werden 54 987 2135 8 Mehrfach benutzbare Anvvendung YOPEN Es soll eine DCAM Anvvendung er ffnet werden die mehrfach benutzbar ist und
68. Control Block 3 2 2 7 VTSU Control Block 2 Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register peia gt Register n Nummer des Registers AID Kennzeichen der Anwendung 3 CID register px m gt Register m Nummer des Registers CID Kennzeichen der Verbindung 4 RPB addr1 YINQUIRE RPB NEA VCBADR relexp 1 OPTCD VTSUCB 2 ACB relexp 3 CCB relexp 4 FDBK R ckmeldung siehe Anhang Seite 298 DCAM gibt zur ck Register 15 siehe Anhang Seite 298 Feld f r den FDB 1 FDB 2 FDB 3 FDB 4 VTSUCB 1 Byte 1 Byte 1 Byte 1 Byte CCB Steuerblock mit g ltigem Kennzeichen CID ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der die DCAM Anvendung beschreibt 108 987 2135 8 VTSU Control Block YINQUIRE Es soll der Inhalt des VTSU Control Block abgefragt werden Dazu mu angegeben werden 1 die Adresse eines Bereichs in den der VTSU Control Block eingetragen werden soll siehe Handbuch VTSU Kapitel VTSU Control Block 2 da der VTSU Control Block abgefragt werden soll 3 entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen AID enth lt oder ein Register welches das g ltige Kennzeichen enth lt Fehlt
69. DCS STATE 1 YDDFINRU EQU X 14 INVALID REQUEST USAGE 1 YDDFRPAR EQU X 18 REQUEST REJ DUE TO BAD PARAM 1 YDDFBCBR EQU X 20 BAD CONTROL BLOCK PL REFERENCE 1 YDDFCONS EQU X 24 CANNOT CONNECT TO SS 1 YDDFSYSX EQU X CC RESERVED FOR SYSTEM EXITS m dl k ok kk kk kk x x kk FEEDBACK FIELD 2 1 YDDFFDB2 DS XLI REASON FOR REJECTION 1 X xx k k kir 1 YDDFFD2N EQU X 00 NO INDICATION IN FDBK FIELD 2 1 1 THE FOLLOWING EQUATES ARE VALID IF RAPS IS SET 1 IN FEEDBACK FIELD 1 X 08NN x 1 YDDFNOTO EQU 04 APPLICATION NOT OPENED 1 YDDFALRO EQU X 08 APPLICATION ALREADY OPENED 1 YDDFNOSH EQU X 0C APPLICATION IS NON SHARABLE 1 YDDFONEO EQU X 10 NO MORE THAN ONE OPEN IS ALLOWED 1 YDDFVERO EQU X 14 WRONG OPEN FOR PRIMARY TASK 1 YDDFSECO EQU X 18 WRONG OPEN FOR SECONDARY TASK 1 YDDFDIS EQU X 1C DISTRIBUTION ALREADY PERMITTED 1 YDDFFCLW EQU X 20 FORCED APPL CLOSING WARNING 1 YDDFFCL EQU X 24 FORCED APPL CLOSING 1 YDDFFCLD EQU X 28 FORCED CLOSING DCAM ERROR 1 YDDFFCEP EQU X 2C FORCED CLOSING INV CONT BY PRIM 1 YDDFFCSE EQU X 30 FORCED CLOSING INV CONT BY SEC 1 YDDFFCLT EQU X 34 FORCED CLOSING TERM OF PRIMARY 1 YDDFFCLP EQU X 38 FORCED CLOSING BY PRIMARY TASK 1 YDDFFCRS EQU X 3C FORCED CLOSING BY SECONDARY TASK 1 YDDFTMAR EQU X 40 TOO MANY REQUESTS PENDING 1 YDDFNACT EQU X 44 APPLICAT
70. Dabei ist zu beachten da bei IBM Datenstationen keine Ver bindungsnachrichten und Verbindungskennworte gesendet werden sollen da sie von TRANSIT CD nicht umgesetzt werden die Adresse eines Bereichs in dem die Verbindungsnachricht des Kommunikations partners von DCAM abgelegt werden soll ferner die L nge dieser Nachricht h ch stens 80 Byte bei DCAM NEA Transport Service Anwendungen und 32 Byte bei DCAM ISO Transport Service Anwendungen Diese Angabe wird nur ab DCAM Version 8 0 ausgewertet d h DCAMVER 28 0 da die Nachrichtenverteilung ber die absenderspezifische Warteschlange erfol gen soll CS Wird nichts angegeben so wird die empf ngerglobale Warte schlange eingestellt CA Dies kann bei der Daten bermittlung wieder ge ndert werden da der Befehl asynchron ausgef hrt werden soll ASY Die synchrone Ausf h rung wird eingestellt SYN wenn nichts angegeben wird die Adresse eines Feldes von 4 Byte L nge in dem das Ereigniskennzeichen steht jedoch nur wenn der Befehl asynchron ausgef hrt werden soll Dann je doch darf die Angabe nicht entfallen siehe auch Seite 30 das erste Wort der Ereignisinformation die bergeben werden soll wenn der asynchron ausgef hrte Befehl beendet wird Das 1 Byte wird bei der R ckgabe mit X 0C berschrieben Fehlt diese Angabe wird der Standardwert X 00000000 bergeben das zweite Wort der Ereignisinformation die bergeben werden soll wenn der
71. Dieses Kapitel enth lt im ersten Abschnitt die allgemeine d h f r alle Exit Ereignisse g ltige Beschreibung der DCAM Exit Programmschnittstelle Im zweiten Abschnitt wird dann f r jedes Exit Ereignis beschrieben welche Felder in der Parameterliste versorgt sind und wie die R ckgabefelder versorgt werden m ssen bzw k nnen Im dritten Abschnitt werden die Einschr nkungen beschrieben die bei der Programmie rung einer DCAM EXIT Routine beachtet werden m ssen Der 4 Teil beschreibt die Formate der Makroaufrufe mit denen die DSECT s der DCAM Datenstruktur erzeugt werden k nnen 280 987 2135 8 6 2 1 6 2 1 1 6 2 1 2 987 2135 8 DCAM SYSTEM EXIT DCAM Exit Programmschnittstelle Registerversorgung Beim Ansprung der Exit Routine sind die Register 4 bis 11 undefiniert die brigen Regi ster enthalten folgende Werte RO 7075 Nummer des DCAM Exits Ri A YDDEXPL DCAM Exit Parameterliste R2 A Task Control Block A Executive Vector Table R12 A P2 Program Manager R13 A 18 Wort Registersicherungsbereich R14 A indirekter R cksprung R15 A Exit Routine Die Register 12 13 14 d rfen von der Exit Routine nicht zerst rt werden DCAM Exit Parameterliste Mit dem Makro YDDEXPL kann eine DSECT f r die DCAM Exit Parameterliste erstellt werden Format Name Operanden symbol YDDEXPL D prefix si Operanden symbol symbolische Adresse f r den Makroaufr
72. EDIT USER Nachrichtenaufbereitung SYSTEM EDITIN PHYS GETBS GETFC LCASE Aufbereitung der JLINEf 11 112 1 Nachrichteneingabe FORM NGETBS NGETFC NLCASE 987 2135 8 293 Tabelle der Steuerblockfelder Anhang Sehl ssel Wert oder mnemotechnischer Wert Steuer vort des Feld block Steuer Makro Auf lange Erkl rung block ruf zur YGENCB YMODCB YTESTCB f r feldes statischen YSHOWCB Steuerblock erzeugung EDITOUT PHYS HCOPY HOM EXTEND Aufbereitung der JLINEf 11 D 1 Nachrichtenausgabe FORM NHCOPY NHOM NEXTEND LOGC LACK 11 1 NLOGC NLACK PROC TRUNC SYSCODE APPSTART SIGNAL 1 Verbindungs 1 11 16 11 parameter KEEP BINARY ANYSTART NSIGNAL TERMSTAT L 1 NTERMSTAT DID register register register 4 Kennzeichen der Nachrichtenverteilung CID register register 4 Kennzeichen der Verbindung PTNCHA1 1 4 Partnercharakteristika Teil 1 PEDIT USER Vom Partner vorgeschlagene Nachrichtenaufbereitung SYSTEM PPROC PTNSTART Vom Partner vorgeschlagener Beginn der Daten ANYSTART bermittlung FLAG ACTIVE Markierung f r die Belegung des Steuerblocks INACTIVE durch einen Aufruf PRIO absexp value value value 1 Transportpriorit t CCBLN value 2 L nge des CCB Steuerblocks 294 987 2135 8 Anhang Tabelle der Steuerblockfelder Sehl ssel Wert oder mnemotechnischer Wert Steuer vort des Feld block Steuer Makro Auf lange Erkl
73. EIDREF ICHT NOTWENDIG SIND KOENNEN SIE BEREITS JETZT FUER YSEND IN DEN RPB EINGETRAGEN WERDEN GO SIGNAL B 6 AID 2 EID GOEID EIDREF2 C GOGO 987 2135 8 DCAM ISO Transport Service U987 J Z135 8 xox x SENDEN SENDI WEITER XR LA LA ST LA ST AR CVD UNPK VC VC VC VC DS YSEND VI VC BAL CLC BNE XC NACH ERFOLGREICHEM YOPNCON SIND NU UND CID IM RPB EINGETRAGEN VIERZEHN NACHRICHTEN AN DEN PARTNE 250 2 14 14 NACHRIC 4 100 4 SENDLEN 4 SENDLEN 4 50 0 4 SENDELAENG 4 SENDLEN AID R SENDEN HTEN SENDEN EN 150 200 9 4 R9 GESENDETE BYTES DW REA1 DW REAI L AREAI 1 X FO REA148 256 AREAl REA1 264 256 AREAL REA1 520 256 AREA1 REA1 776 24 AREAl H NACHRICHT PB 6 AREALN 4 KTIND DSEND USATZ AREA1 14 DUMPRC DCAMFDBK 3 NAITGO WEITER N 2 WARTEN AUF DAS GO SIGNAL EIREF EIREF NACHRICHT ERZEUGEN SENDEN SOLSIG EIID GOEID COND UNCOND LIFETIM 600 MVI MVC BAL OHNE GENAUE AUSWERTUNG DES SOI RPOSTAD EIREF RPOSTL 2 PARMOD 31 AKTIND DSOLSIG ZUSATZ 4 EIREF2 14 DUMPRC Beispiele 250 z LSIG RTC WIRD HIER ANGENOMMEN DASS DAS GO SIGNAL EINGETROFFEN IST gt YSEND WIEDERHOLEN B DS BET SEND1 OH 2 SENDEN 269 Beispiele AAREAL xox xox MVI DCAM ISO Transport Service ABSCHLUSSNACHRICHT
74. EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU X 00 X 047 Xx 007 X 047 X 087 X 10 X 40 Xx 807 Steuerbl cke und R ckmeldungen TASK IS PRIMARY YOPEN TASK IS SECONDARY YOPEN MESSAGE NOT TOO LONG MESSAGE TRUNCATED REMAINDER OF MESSAGE IS KEPT RECEIVE OK NO VTSUCB TERMINAL STATUS INCOMPLETE TERMINAL STATUS COMPLETED THE FOLLOWING EQUATES ARE VALID IF SUWA IS SET IN FEEDBACK FIELD 1 X 04 NN X 047 087 X 0C X 10 X 14 X 18 X 20 X 24 X 28 X 2C X 30 X 34 X 44 X 48 CONTRADICTION IN DATA CODE NO INPUT AVAILABLE NO LOGON REQUEST QUEUED REQUEST CANCELED BY TIMEOUT LOSS OF DATA D E TO TIMEOUT LOGO ESSAGE TRUNCATED EDIT ERROR OCCURRED PTNCHAR TRUNCATED OUTPUT TRUNCATED INVALID EDIT OPTIONS REQUEST TERMINATED BY YRESET LOCAL HARDCOPY NOT ASSIGNED NEW LINE CHAR WHILE EXTEND Y THE FOLLOWING EQUATES ARE VALID IF RDCS IS SET IN FEEDBACK FIELD 1 AND SHOR IS SET IN FEEDBACK FIELD 2 X 047 X 087 X 0C X 20 X 24 X 28 X C Xx 307 X 1004NN BCAM TRY 1 0 LATER BCAM SHORTAGE OF RESOURCES BCAM WAIT FOR GO LOGON REQUEST CANCELED TIMEOUT DCAM NO CONTROL BLOCK AVAILABLE DCAM NO ID ENTRY AVAILABLE DCAM NO MEMORY AVAILABLE DCAM SH RES AT PTN S SYSYTEM NAME MANAGE
75. Feldes erreicht in dem das Kennzeichen steht Operand 10 Trifft das Erfolgs oder Mi erfolgs Ereignis ein wird die Contingency Routine angesto Ben deren Kennzeichen hier angegeben wird In dieser Routine kann der Anwender das eingetroffene Ereignis verarbeiten 987 2135 8 Asynchrone Ausf hrung Befehle ausf hren ENAEI EIIDRET relexp YOPNCON YRECEIVE RPB YSENDREC OPTCD ASY EID relexp Ereignis Kennzeichen 4 Byte t COIDRET relexp Einsprungsadresse der Contingency routine 4 Byte ENACO COADAD relexp 1 Contingency Kennzeichen 4 Byte 1 EIID relexp SOLSIG COID relexp Contingency Routine Angaben bei asynchroner Ausf hrung des SOLSIG 987 2135 8 35 Befehle ausf hren Asynchrone Ausf hrung Der Aufruf an DCAM wird sofort abgeschlossen zum Zeitpunkt also an dem der Befehl von DCAM angenommen an dem er aber u U noch nicht ausgef hrt ist Die R ck meldung im vervvendeten Steuerblock sagt dann noch nichts aus ber die Befehlsaus f hrung von DCAM siehe Anhang Seite 298 Die Beendigung und Ausf hrung des Befehls erf hrt der Anwender nur wenn er einen SOLSIG Aufruf f r das verwendete Ereigniskennzeichen gibt Die Adresse des verwendeten Steuerblocks kann der Anwender wenn er sie nicht selbst sichern will als Referenz des Aufrufs in den Pa
76. ISO Transport Service Anwendungen Fehlerhafter Verbindungswunsch z B Partner nicht bekannt Protokollfehler falsche Refe renzen Partner lehnt Verbindungsaufbau ab Verbindungsaufbau abgelehnt z B vorgeschlagene Protokollklasse nicht unterst tzt Die Partnercharakteristika wurden vom Partner nicht angenommen Fehler im Stationsdienstprotokoll Der Partner bearbeitet keine Aufforderungen zum Verbindungsaufbau eine Aufforderung zum Verbin dungsaufbau durch den Partner folgt Fehler in der Aktivierung der VTSU Unterst tzung des Partners 308 987 2135 8 Anh ang Tabelle der R ckmeldungen R ckmelde Feld Bedeutung Makroaufruf F F F E Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E 612 2 1 I R T N N G G E R T D V E E E C oc 70 Der Partner ist einer anderen DCAM Anwendung zugeh rig x oc 74 Der DIP Steuerblock adressiert keinen DCG Steuerblock x x 78 Die Verbindung vurde unmittelbar nach dem Verbindungsaufbau vom Partner oder vom System abgebaut x oc Te reserviert oc 80 Syntax Fehler in der Verbindungsnachricht 1 x oc 84 Unbekannter Berechtigungsname 1 x oc 88 Dieselbe Anwendung ist bereits verbunden 1 x oc 8
77. In Anwendungen SHARE DISCO die mit Verteilcode arbeiten erh lt immer die Prim rtask die Statusinformation AAREALN mu mindestens gro genug sein um bei EDITIN PHYS den Nachrichten kopf aufnehmen zu k nnen Einschr nkung Eine Programm kann gleichzeitig absetzen maximal 8 YRECEIVE ANY bei OPTCD ASY pro Anwendung und Task maximal 8 YRECEIVE SPEC bei OPTCD ASY pro Verbindung R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung und der Tabelle der Meldungen zu ent nehmen siehe Seite 130 und Anhang Seite 298 987 2135 8 Makroaufrufe YREJLOG 4 19 987 2135 8 YREJLOG Funktion Mit diesem Aufruf wird eine Aufforderung zum Aufbau einer Verbindung zur ckgewiesen siehe auch Seite 116 Er kann nur in einer Prim rtask gegeben werden Format Name Operanden symbol YREJLOG RPB addr schl sselwort neuer wert Operanden Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer wert Hiermit k nnen Werte des RPB Steuerblocks wie auch mit dem Aufruf YMODCB aktuali siert werden 219 YREJLOG Makroaufrufe Folgende Angaben sind bei der Bearbeitung des YREJLOG von Bedeutung schl sselwort neuer wert ACB 1 addr arp 2 register AAREA addr AREA addr 1 Entweder ACB oder AID mu angegeben werden Werden sowohl ACB wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwende ten Makro ab
78. OF CONTROL BLOCK 910919 55616018 339 Steuerbl cke und R ckmeldungen Anhang 340 Makro YDDENB Mit dem Makroaufruf YDDENB kann ein Pseudo Abschnitt CSECT oder DSECT f r den Steuerblock ENB angelegt vverden Format Name Operanden symbol YDDENB E lc prefix Operanden symbol gibt die symbolische Adresse f r den Makroaufruf an Wird keine Adresse angegeben so wird die Adresse YDDENPB erzeugt gibt an was generiert werden soll Pl D verlangt die Generierung eines Pseudoabschnitts c verlangt die Generierung eines Code Abschnitts prefix gibt eine Zeichenfolge von maximal 4 Zeichen an die den Namen vorangestellt wird Ohne diese Angabe wird die Zeichenfolge YDDE jeweils dem symbolischen Namen vorangestellt 987 2135 8 Anhang U987 J Z135 8 Steuerbl cke und R ckmeldungen Pseudoabschnitt DSECT f r den Steuerblock ENB K H H H H H b FH KR H X O HH KR DDENB DDENB DEHDTY DEHDD DEHDCB DEHDLN U U U U DECEND DEEXPR DELOGO DELOSC DEPROC DETACK DESECO OUUQUOUQ DDELEN EXTERNAL SYMBOL DICTIONARY START YDDENB D DSECT HEADER OF CONTROL BLOCK ENB DC CL3 ENB TYPE OF CONTROL BLOCK DC CL1 D DCAM CONTROL BLOCK DC 07 DCAM INTERFACE VERSION DC AL2 YDDELEN 2 YDDEHD
79. Operand wird ausgewertet bei YOPNCON und YCHANGE benutzerfeld kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante oder Festpunktkonstante F konstante oder Adre kon stante A konstante V konstante in der L nge von 4 Byte definiert werden Der Standardwert ist X 00000000 gleichbedeutend mit keine Begleitinformation definiert Bei einem Makroaufruf der sich auf einen RPB Steuerblock bezieht wird dem Anvven der die Begleitinformation im USER Feld des RPB Steuerblocks bergeben siehe An hang Seite 291 Hat der Anwender eine LOSCON EXPR oder TACK Contingency Routine siehe Kapi tel DCAM ASSEMBLER Schnittstelle Seite 7 definiert und wird ein entsprechendes Ereignis gemeldet so erh lt er den Inhalt von USERFLD im Register 5 der entsprechen den Contingency Routine 987 2135 8 Makroaufrufe YCCB MAXLN absexp Maximale L nge der Daten TSDU Transport Service Data Unit die von der DCAM Anwendung auf dieser Verbindung gesendet werden sollen Dieser Wert wird nicht an den Kommunikationspartner weitergegeben er dient lediglich der Optimierung der vom System bereitgestellten Puffer DCAM gibt den vom System angenommenen oder reduzierten Wert im MAXLN Feld des CCB zur ck vgl Anhang Seite 291 Wenn Sie MAXLN angeben so achten Sie darauf den Wert nach jedem YOPNCON Aufruf mit demselben CCB erneut anzugeben da sonst der zuvor von DCAM eingetragene Wert
80. PARTPRO PARVER XKON Parameter PARTNAM PARTID Beispiel 1 Direkter Verbindungsaufbau 1 Einzelverbindung 4 YOPNCON ACQUIRE PTNNAME ANWR1 1 LOGON Contingency PRONAME XAR 1 wenn definiert YINQUIRE REQLOGON PTNNAME ANWLI1 5 PRONAME XAR 2 YOPNCON ACCEPT 374 987 2135 8 Anhang U987 J Z135 8 IDCAM Benutzerschnittstelle 2 Verbindungsaufforderung an verschiedene nahe Partner einer DTE ANWR2 9 incoming call von DTE 45890006 6 LOGON Contingency incoming call von DTE 45890007 3 Parallelverbindungen ANVLI YOPNCON ACQUIRE PTNNAME ANWR1 PRONAME XAR 1 ANWL2 oder Forts ANVLI YOPNCON ACQUIRE PTNNAME ANWR2 PRONAME XAR 1 21 72 YINQUIRE REQLOGON ANVRI 10 LOGON Contingency YINQUIRE REOLOGON ANVRI LOGON Contingency YINQUIRE REQLOGON YOPNCON ACCEPT ANVRI LOGON Contingency YINQUIRE REOLOGON PTNNAME PRONAME PTNNAME PRONAME PTNNAME PRONAME PTNNAME PRONAME ANVMI XAR 2 ANVLI XAR 2 ANWL1001 XAR 2 14 ANWL1002 XAR 2 15 375 IDCAM Benutzerschnittstelle Anhang Beispiel 2 Verbindungsaufbau mit Pradialog ANVRI 16 YOPNCON ACQUIRE PTNNAME ANWL2 PRONAME XAR 2 R ckmeldung Verbindung aufgebaut gt CID YRECEIVE CID 18 17 CNOl PLEASE ENTER NET COMMAND ANWL2 LOGON Contingency 17 YSEND CID OPNCON ANWL2 3 0 venn definiert YINQUIRE REQLOGON PT
81. Prim rtask aufgerufen werden Format Name Operation Operanden symbol YOPNCON RPB addr schl sselwort neuer vert l 987 2135 8 Makroaufrufe 987 2135 8 Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer wert Hiermit k nnen Werte des RPB Steuerblocks wie auch mit dem Aufruf YMODCB aktuali siert werden Folgende Angaben sind bei der Beschreibung des YOPNCON von Bedeutung schl sselwort ACB 1 AID 2 CCB OPTCD neuer vert addr register YOPNCON 1 Entweder ACB oder AID mu angegeben werden Werden sowohl ACB wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird nur f r DCAM NEA Transport Service Anvvendungen 211 YOPNCON Makroaufrufe schl sselwort neuer wert EID addr EIDREF L register J EIDREF2 17505 L register J AREA addr AREALN value TOVAL value Zur Beschreibung der einzelnen Felder siehe YRPB Seite 223 und die Tabelle der Steu erblockfelder Anhang Seite 291 Einschr nkung Bei DCAM Anwendungen kann eine Task gleichzeitig maximal 128 YOPNCON ACQUIRE maximal 8 YOPNCON ACCEPT ANY maximal 8 YOPNCON ACCEPT SPEC pro Anwendung absetzen Bei DCAM ISO Transport Service Anwendungen darf zu einem Partner zu einem Zeit punkt nur ein YOPNCON Au
82. Q YRECEIVE Q YSENDREC Q Ein zvveiter synchroner Aufruf mit VVartezeit aus einer Contingency Task gestartet vvahrend der VVartezeit vvird abgelehnt 29 Befehle ausf hren Asynchrone Ausf hrung 2 7 2 30 Asynchrone Ausf hrung Befehle mit denen auf das Eintreffen eines Ereignisses m glicherweise gewartet werden mu k nnen auch asynchron ausgef hrt werden Dies bedeutet da der Parameter OPTCD ASY angegeben werden mu Die Angabe ist nur m glich bei YOPNCON siehe Abschnitt Makroaufrufe bezogen auf eine Verbindung Seite 73 und YRECEIVE bzw YSENDRE C siehe Abschnitt Makroaufrufe bezogen auf die Daten ber mittlung Seite 125 Eine Sonderstellung nimmt hier die Datenflu kontrolle mittels GO Signal ein Das Anwendungsprogramm kann sich beim Auftreten eines Datenstaus asynchron von dessen Behebung informieren lassen Dies ist der Fall bei YSEND und YSENDREC wenn im YOPNCON im CCB PROC SIGNAL angegeben wurde Zur asynchronen Ausf hrung arbeitet DCAM mit der Eventing Contingency Schnittstelle zusammen 987 2135 8 Asynchrone Ausf hrung Befehle ausf hren Folgende Schritte sind notwendig 1 Schritt F r jeden asynchronen Aufruf mu ein Ereigniskennzeichen EID event item identifier verwendet werden Zur Definition ist der Aufruf ENAEI enable event item zu verwenden Das Kennzei chen wird vom System benutzt um das Eintreffen des Ereignisses zu verbuchen 2 Schritt Soll bei Eintref
83. SECONDARY 2 x THE FOLLONING EQUATES ARE VALID IF RPTS IS SET 20 IN FEEDBACK FIELD 1 X OCNN xx 2 YDDANCON EQU X 047 PARTNER NOT CONNECTED TO APPL 2 YDDAACON EQU 08 PARTNER ALREADY CONNECTED 2 YDDALOGQ EQU X 0C LOGON REQUEST QUEUED 2 YDDAIDID EQU X 10 INVALID DID 2 YDDAILID EQU X 14 INVALID LID 2 YDDACLUR EQU X 18 CNNECTION CLOSED BY USER REQUEST 2 YDDAFDIS EQU XLE PARTNER FORCED DISCONNECTED 2 YDDAPCSP EQU X 20 PARTNER IN CS STATE PENDING 2 YDDAPCSS EQU x 24 CHANGE TO CA NOT ALLOWED 2 YDDAPCST EQU X287 PARTNER IN CS FOR ANOTHER TASK 2 YDDAPCA EQU X 2C PARTNER IN CA STATE 2 YDDAMESL EQU X 30 ESSAGE IS TOO LONG 328 987 2135 8 Anhang YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD YD NN NN S N i ay NIIT 0 IDITD NIDINI 0 1 DIDI NDDID NND NND NND NND NND NND U987 J Z135 8 DAWRC DASOU DANOEX DANUS DAIPA DASYTI DAPNAV DAPSTP DAPNLG DAILPW DAREJL DAPCNA DAISSE DAPSTR DAPNVT DAPDED DANDCG DAIDIS DASYER DANONA DAAPCO DAIPSW DARCOS DARPRI DAPPRE DARAD DAPERD DAEXNA DAUPER DAUSNP DAUPNP DAUNOT DAUCID DAUIER DAUNOE DAUVER DAUNCT DAUNNP DAUNCS R D R D DAUKVP DASHO
84. SHORTAGE OF RESOURCES BCAM WAIT FOR GO X 20 DCAM NO CONTROL BLOCK AVAILABLE X 24 DCAM NO 1D ENTRY AVAILABLE x 28 DCAM NO MEMORY AVAILABLE X 2 DCAM SH RES AT PTN S SYSYTEM 7307 NAME MANAGER MAX NAME THE FOLLOWING EQUATES ARE VALID IF RPAR IS SET IN FEEDBACK FIELD 1 AND EDER IS SET IN FEEDBACK FIELD 2 X 185CNN x 00 EDIT PARAM ERROR X 04 INVALID DEVICE HEADER X 087 LENGTH OF RECEIVED MESSAGE 0 x 0c VTSU NOT AVAILABLE X 10 ERROR IN VTSUCB X 14 ERROR IN NEABT PROTOCOL THE FOLLONING EQUATES ARE VALID IF RDCS IS SET IN FEEDBACK FIELD 1 AND DCSE IS SET IN FEEDBACK FIELD 2 X 1014NN X 047 UNEXPECTED BCINF RC X 087 UNEXPECTED APINF RC X 0C UNEXPECTED STINF RC X 10 OTHER UNEXPECTED BCAM RC FEEDBACK FIELD XLI X 007 4 kkkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkkxkxkkkkkkkxkkkkxkkkkkkkxk DATA INDICATORS NO INDICATION IN FDBK FIELD 4 THE FOLLOWING EQUATES ARE VALID IF SUCC OR SUWA ARE SET IN FEEDBACK FIELD 1 X 00 NN X 0477 NN X 01 MESSAGE 02 GO SIGNAL x 04 POSITIVE TACK x 08 NEGATIVE TACK X 10 EXPRESS DATA 987 2135 8 Anhang Steuerbl cke und R ckmeldungen 2 YDDRELMT EQU X 20 DATA ITEM IS A ELEMENT 2 YDDRSGRP EQU X 40 LAST ELEMENT OF SUBGROUP 2 YDDRGRUP EQU X 80 LAST ELEMENT OF GROUP 2 YDDRLNF EQU YDDRFDBI LENGTH OF FEEDBACK INFO
85. Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register nn Register n Nummer des Registers AID Kennzeichen der Anwendung 4 RPB addr1 YINQUIRE RPB NEA ISO AAREA relexp 1 AREA relexp 2 Name der Anwendung 8 Byte OPTCD APPSTAT 3 ACB relexp 4 FDBK R ckmeldung siehe Register 15 siehe Anhang Seite 298 Informationsfeld 8 Byte Anhang Seite 298 DCAM gibt zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der die DCAM Anwendung beschreibt Es soll der Zustand einer DCAM Anwendung abgefragt werden Dazu mu angegeben werden 1 ein Feld von 8 Byte das die Information aufnehmen soll 2 der Name der DCAM Anwendung deren Zustand abgefragt werden soll Es mu eine Anwendung in demselben Verarbeitungsrechners sein Es kann die gleiche Anwendung sein die auch in 4 adressiert wird 3 die Bezeichnung der Variante des YINQUIRE die hier verwendet wird 4 entweder die Adresse des Steuerblocks ACB in dem das g ltige Kennzeichen AID steht oder ein Register welches das g ltige Kennzeichen enth lt Diese Angabe kann entfallen wenn das Kennzeichen vorher z B mit YMODCB in den RPB eingetragen worden ist U987 J Z135 8 69 YINQUIRE Zustand einer Anwendung abfragen Die Information ist folgende Informationsfeld 00
86. Subsystem bis Taskende mit DCAM arbeiten gilt auch f r 150 987 2135 8 Zuvveisung f r die Verbindung U987 J Z135 8 Beispiel YOPNCON Das USERFELD f r Transportverbindungen soll von der auffordernden Task f r jede Sit zung neu angegeben werden Ein Vorlaufprogramm bernimmt das aktuelle Kennwort von z B SYSDTA Vorlaufprogramm AKTUELL START Lesen der Information von SYSDTA Eintrag in die CLT ERRADR FEHLERROUTINE FUER RDATA BEREICH HEADER USERFLD DCAM Verarbeitungsprogramm RPBAD CCBAD LINKAD RDATA LA YCONN DS DS DS DS DS YOPNCON YRPB YCCB DC BEREICH ERRADR 6 USERFLD LINK LINKNAME USERFLD 6 OY OF 0CL84 80C RPB RPBAD CCB CCBAD OPTCD ACQUTRE USERFLD C USR LINK LINKAD C LINKNAME 151 Makroaufrufe 4 Katalog der Makroaufrufe n diesem Kapitel sind die Makroaufrufe an DCAM mit den formalen Einzelheiten aufge f hrt n den Tabellen vvurden einige Operanden aufgrund der unterschiedlichen Anvvendbar keit ihrer Werte innerhalb eines Makroaufrufs mehrmals aufgef hrt In der Praxis sollte bei einem Makroaufruf jeder Operand jedoch nur einmal aufgef hrt werden da anson sten keine fehlerfreie Funktion gew hrleistet werden kann Der Anwender soll deshalb die einzelnen Operandenwerte zu einem Operanden nicht getrennt auff hren sondern sie hinter dem entsprechenden Operanden zusammen
87. VERARBEITEN AR 9 4 EMPFANGENE BYTES VPASS 1 B RECCYCLE QUITTUNG SENDEN UND WARTEN AUF VERBINDUNGSABBAU x DURCH DEN PARTNER YSENDREC FDB1 X 0C ENDREC CVD 9 DW UNPK AREAL 8 DW AREA147 X FO YSENDREC RPB 7 AREA AREAl AREALN 16 TOVAL 30 VI AKTIND DSENDREC RECLN AREA1 BAL 014 DUMPRC B ENDE BEHANDLUNG VON UNERNARTETEN FDBK DS OH x FDBl X 08 APPLIKATION ABGEBAUT x FDBl X 0C VERBINDUNG ABGEBROCHEN SCHLIESSEN DER ANWENDUNG ENDE DS OH MVI AKTIND DCLOSE YCLOSE ACB 5 BAL 014 DUMPRC TERM TERM x UNTERPROGRAMM RETURNCODE AUSGEBEN DUMPRC DS OH sT 15 SAV15 LH 8 AKTDIST LA 8 AKTDIST 8 MESSTEXT 0 8 UNPK MESSCODE 9 SAV15 5 TR MESSCODE TRTAB C 0 VI FILLER C WROUT MESSAGE TERM VC RECLN TXTNIL BR 14 273 Beispiele 274 DCAM ISO Transport Service AKAKAKKKAKKKKKKKKKKKKHK HK KK KH x DATEN KARKAKAKAKAKAKAKAKAKAKAKKAKKKR TXTNIL ESSAGE ESSTEXT RECLN ESSCODE ESSEND FILLER TRTAB SAV15 AKTDIST AKTIND DOPEN DCLOSE DOPNCON DCLSCON DGENACB DGENCCB DGENRPB DRECEIVE DSENDREC DW ACBAD CCBAD ENBAD RPBAD D R D U A ZA 4 OWNAPPL OWNPROZ PTNAPPL PTNPROZ LINKNAME ACBI 1 1 AREA1 AAREA1 DC DS DC DC DC DC DC DC DC EQU DS DC DS DS DS DS EQU DC EQU DC EQU DC EQU DC
88. Verbindungsnachricht FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte ACB Steuerblock mit g ltigem Kennzeichen AID CCB NEA ISO b Name des Parnters 8 Byte PTNNAME relexp 2 Name des Prozessors an dem der Partner an PRONAME relexp 2 geschlossen ist 8 Byte PTNCHA 1 2 DCAM gibt PEDIT 3 N zur ck PPROC 4 Adresse des Steuerblocks der den Aufruf beschreibt Die ersten vier Byte der Partnercharakteristika Nachrichtenaufbereitung vie vom Partner vorgeschlagen siehe Anhang Seite 291 Wenn der Partner mit der Daten bermittlung starten will ist der Inhalt PTNSTART Wird keine Angabe dar ber gemacht ist der Inhalt ANYSTART d CN 987 2135 8 95 YINQUIRE 96 Partnerinformation nach einer LOGON Meldung Es sollen die Partnerinformationen nach einer LOGON Meldung abgefragt werden Dazu mu angegeben werden 1 2 die Adresse eines Bereichs in den die Verbindungsnachricht geschrieben vverden soll die Adresse eines Steuerblocks CCB in den verschiedene Informationen eingetra gen werden sollen und in dem die Feldadressen f r den Partner und Prozessorna men stehen entweder die Adresse des ACB der das g ltige Kennzeichen AID der Anwendung enth lt oder ein Register welches das Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das Kennzeichen in den RPB eingetragen worden
89. als MAXLN Angabe interpretiert wird F r DCAM NEA Transport Service Anwendungen gilt Bei EDIT USER entspricht eine durch YSEND gesendete Nachricht 1 TSDU Bei EDIT SYSTEM und EDITOUT PHYS oder FORM mu die physikalische L nge der Nachricht um mindestens 9 Byte k rzer sein als MAXLN Die Beachtung der Kapazit t des Ger ts liegt beim Anwender bzw FHS Bei EDIT SYSTEM und EDITOUT LINE kann DCAM eine durch das System edi tierte Nachricht in Teilst cken der Gr e Min MAXLN Ger tekapazit t senden Beim Editiervorgang wird Die Nachricht abgeschnitten FDBK 04 00 2C 00 bzw die Aufbereitung abgelehnt FDBK 18 5C 00 00 wenn ein editierter logischer Satz l n ger als MAXLN ist Die mit einem YSEND Aufruf gesendete Nachricht darf bei ED T SYSTEM maximal 32767 Byte gro sein Hinweis Wird ein CCB f r mehrere YOPNCON Aufrufe benutzt mu der MAXLN Operand jedesmal aktualisiert werden da sonst der vorher von DCAM eingetragene Wert als gew nschtes MAXLN interpretiert wird 987 2135 8 175 YCCB 176 Makroaufrufe Hinvveis Editierte Daten sind immer l nger als Anvvender Daten da Kontrollzeichen umgevvan delt und Protokolletiketten hinzugef gt vverden Angeforderte MAXLN DCAMVER Ergebnis im MAXLN Feld mit DVR mit DAST Die Ergebnisse sind abh ngig von der HW SW Konfiguration siehe Handbuch Generierung eines Datenkommunikationssystems N N Bei DCAM ISO
90. asynchron ausgef hrte Befehl beendet wird Fehlt diese Angabe oder ist sie gleich dem Standardwert X 00000000 wird nur das erste Wort der Ereignisinformation bergeben Im Steuerblock CCB ist die Verbindung zu beschreiben siehe Seite 75 dabei ist falls erforderlich 13 82 das Kennwort zum Aufbau der Verbindung LOGPW wie es vom Partner vorge schrieben wurde wenn der Partner eine DCAM Anwendung ist anzugeben nur bei NEA Transport Service 987 2135 8 Auffordern zum Aufbau YOPNCON Beispiel Es soll mit dem Partner PTNT der an Prozessor PROZ angeschlossen ist eine Verbin dung aufgebaut werden Der Befehl soll asynchron ausgef hrt werden Der Benutzer will von der Beendigung des Befehls in einer Contingency Routine benachrichtigt werden Da schon mehrere asynchrone Befehle gegeben wurden m chte der Benutzer erken nen welcher von diesen beendet wurde Dazu hinterlegt er eine private Kennung im RPB Steuerblockfeld EIDREF z B die Zeichenfolge PT1 ENAEI EINAME EVENT EIIDRET EIDAD ENACO CONAME CONTGY COADAD COAD COIDRET COIDAD YOPNCON RPB RPBNAM SOLSIG EIID EIDAD COID COIDAD RPBNAM YRPB ACB ACBNAM CCB CCBNAM OPTCD ACQUIRE ASY EID EIDAD EIDREF C PT1 ACBNAM YACB CCBNAM YCCB PTNNAME NAMI PRONAME NAM2 DATA N iso RLTH iso EIDAD DS F COIDAD DS F NAM1 DC CL8 PTNI NAM2 DC CL8 PROZ COAD DS A CONTAD CONTAD RETCO
91. auf In den Steuerblock des Benutzers tr gt DCAM die R ckinforma tionen ein R ckmeldung Kennzeichen usw und beendet den Auf ruf Der Benutzer wertet die R ckinformationen aus indem er auf die von DCAM ausgef llten Steuerblockfelder bzw Registerinhalte zu greift Einen berblick ber die Grundschritte der Verarbeitung gibt das folgende Bild DCAM Assembler Schnittstelle Anwendungsprogramm 1 Generieren eines Steuerblocks und r gt Eintragen der Feldinhalte mira evtl Speicherbereiche mit Namen Datenfeldern etc 2 Aufruf an DCAM mit Adresse des entsprechenden evtl Adressierung Steuerblocks und ggf weiterer Steuerbl cke mit Eintrag aktueller Feldinhalte m DCAM 3 Bearbeitung des Aufrufs dazu evtl bernahme der aktuellen Operanden aus den Steuerbl cken in eine eigene Kopie 4 bergabe der R ckinformation und beenden des Aufrufs a 5 berpr fen oder Auswerten der 2 R ckinformation Anwendungsprogramm DCAM Assembler Schnittstelle 8 987 2135 8 2 1 Objekt Anwendung Ereignisse Verbindung Request Verteil parameter Verteil codegruppe Steuerbl cke erzeugen Steuerbl cke erzeugen Steuerbl cke sind Bereiche mit vorgegebenem Format die Operanden f r Aktionsauf rufe enthalte
92. aufgebaute Verbindung 19 Der Datenaustausch zvvischen ANVVL2 und ANVVR1 kann beginnen U987 U Z135 8 Anhang 987 2135 8 Verbindungsbehandlung durch den X 25 Port Gr nde f r Ablehnung eines Aufbauvvunsches Ablehnung durch das X 25 Netz Gegenstelle belegt gest rt Gegenstelle verveigert Geb hren bernahme ung ltiger Verbindungswunsch Zugang verhindert Betriebsmittelengpass Netz berlastet Betriebsmittelengpass Gegenstelle nicht erreichbar Ablehnung durch den X 25 Port Leitung f hrt nicht zu dem im Adre buch angegebenen Netz Datex P Euronet Netz inaktiv generierte DTE Adresse des Empf ngers ist ung ltig kein freier Supervisor Call SVC Name des Empf ngers ist nicht im X 25 Adre buch lokaler Betriebsmittelengpass Gr nde f r Verbindungsabbau Grund Abbau durch ferne DTE Ablauffehler der Gegenstelle rtlich X 25 Reset IDCAM Benutzerschnittstelle R ckmeldung nach YOPNCON siehe Anhang Seite 298 0C4 C 0 5 0C4 0C4 0C4 0C4 R ckmeldung nach YOPNCON siehe Anhang Seite 298 0C4 0C4 0C4 0C4 0C4 0C4 Cc Wert in Register 6 bei LOSCON X 007 X 087 X 087 379 Negative Transportquittungen Anhang 7 9 380 Gr nde f r negative Transportquittungen Dieser Anhang enth lt die am meisten vorkommenden typischen Gr nde f r negative Transportquittungen bei DCAM NEA Transport Service Anvvendungen
93. berpr ft welches anzeigt ob dieser Block gerade f r eine Befehl sausf hrung gebraucht wird TE Befehle Konstanten und Variable Veranlassung der bertragung Parameterliste der bertragung LA 5 TI YTESTCB BLK RPB MF L 4 FEHLR BLKADDR 5 LA 8 211 ERET 4 FLAG ACTIVE YTESTCB MF E 3 BLK RPB LTR 0 0 Steuerblock dessen Feld gepr ft wird BZ AKTIV R5 YRPB AREA AREALN Beispiel f r Pr fung eines Steuerblockfeldes Der Aufruf YTESTCB kann auch durch k rzere und schnellere Befehlsfolgen ersetzen werden bei denen die Felder ber die DSECTs YDDxxB adressiert werden Allerdings kann dann in einer neuen Version eine Neu bersetzung n tig werden 987 2135 8 Synchrone Ausf hrung Befehle ausf hren 2 7 2 7 1 987 2135 8 Ausf hrung der Befehle an Zwei Wege stehen dem Anwender zur Ausf hrung der Befehle an DCAM offen Synchrone Ausf hrung Einfache Handhabung wenig Angaben daf r keine opti male Ausnutzung von Wartezeiten Asynchrone Ausf hrung Optimale Ausnutzung der Wartezeiten daf r mehr Auf wand im Programm nur bei YOPNCON YRECEIVE YSENDREC und Datenflu kon trolle YSEND GO Tabellen zur Registerbelegung bei der Ausf hrung stehen im Anhang ab Seite 317 Synchrone Ausf hrung Bei der synchronen Ausf hrung Operand OPTCD SYN erh lt das Programm die Steuerung erst zur ck wenn der Befehl aus
94. der Prozessorname ermittelt werden CIDXLATE Bei DCAM NEA Transport Service Anwendungen k nnen zus tzlich die Charakteristika eines Partners PTNCHAR Informationen ber die Datenstation BTERMINF ber die Datensichtstation und die Zeichens tze MONCHARS ber die Peripherie und ber den VTSUCB ausgewertet werden Eine genaue Beschreibung der Statusinformationen und des VTSU Control Blocks finden Sie im Handbuch VTSU Diese unterschiedlichen Abfragen k nnen mit mehreren Varianten des Aufrufs YINQUIRE erfolgen 987 2135 8 Partnerinformation nach einer LOGON Meldung 3 2 2 1 Partnerinformation nach einer LOGON Meldung Besch Speicherbereiche im Makroaufrufe Steuerbl cke und Register Anwendungsprogramm YINQUIRE AAREALN register meld rk ae Forum oe aha gt Register n Nummer des Registers L nge der Verbindungsnachricht 5 AID register lann E gt Register m Nummer des Registers AID Kennzeichen der Anwendung 3 LID register gt Register o r Nummer des Registers LID Kennzeichen der LOGON Meldung 6 RPB addr1 uU YINQUIRE 1 RPB NEA ISO AAREA relexp 1 CCB relexp 2 ACB relexp 3 OPTCD REQLOGON 4 ARECLN L nge der Verbindungsnachricht FDBK R ckmeldung siehe Anhang Seite 298 DCAM gibt zur ck Register 15 siehe Anhang Seite 298
95. des Steuerblocks der den Aufruf beschreibt U987 J Z135 8 123 YCLSCON Verbindung abbauen Es soll eine Verbindung abgebaut werden Es mu angegeben werden 1 entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen der Anwendung AID enth lt oder ein Register welches das g ltige Kennzeichen ent h lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein 2 entweder die Adresse des Steuerblocks CCB der das g ltige Kennzeichen der Ver bindung CID enth lt oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein Beispiel Die Verbindung deren Kennzeichen CID in Register 3 steht soll abgebaut werden CLSCON RPB RPBNAM CID 3 RPBNAM YRPB 124 987 2135 8 3 3 987 2135 8 Makroaufrufe bezogen auf die Daten bermittlung Makroaufrufe bezogen auf die Daten bermittlung Nach erfolgtem Verbindungsaufbau k nnen Kommunikationspartner Daten bermitteln Ein Sende bzw Empfangsaufruf bedeutet immer bernahme der Daten aus dem Benut zerbereich in den Datenspeicher des Kommunikationssystems bzw umgekehrt So wird beispielsweise ein Sendeaufruf in dem Moment erfolgreich beendet in dem die zu sen denden Daten in den Datenspeicher des Kommunikationssystems bertragen worden sind Der Anwender kann ferner mit einem kombinie
96. die Adresse des Feldes in das den symbolischen Namen des eigenen zessors eintr gt die Adresse des Feldes in dem der Kettungsname steht 59 YOPEN 60 Erstmaliges Er ffnen Verwendung von Verteilcodes 14 da die Angaben im ACB mit den Informationen des CLT Eintrags CLT Communication Link Table berschrieben werden sollen der durch den Kettungsnamen identifiziert wird PERM permanente nderung Bei fehlender Angabe werden die Informationen des CLT Eintrags nur f r diesen Aufruf ausge wertet Die Angaben im ACB werden nicht ver ndert TEMP tempor re nde rung 15 die Nummer der DCAM Version wenn bei der Task die neuen Funktionen ab DCAM V8 0 verwendet werden sollen Sollen die neuen Funktionen verwendet wer den mu 8 0 angegeben werden Bei fehlender Angabe oder einer Angabe 8 0 wird eine DCAM Version lt 7 0 angenommen Beispiel Es wird eine DCAM Anvvendung er ffnet die mit Verteilcodes arbeitet Es soll berpr ft werden ob dies die erstmalige Er ffnung ist Sekund rtasks sollen das Kennwort X 0000FFFO angeben Transportquittungen sollen der anfordernden Task bergeben werden Der Verteilungs name f r diese Task sei PPRIMAER DCAM Meldungen sollen bearbeitet werden Der Verbindungsaufbau soll von den Partnern aus erfolgen ein Kennwort wird nicht festge legt Der Name der Anwendung ist BUCHUNG Prim rtasks YOPEN 1 1 APPNAME ADDRI
97. die Aufrufe in eine Warteschlange eingetragen Bei asynchroner Ausf hrung kann die Angabe nicht entfallen Q Fehlt die Angabe wird der Aufruf sofort beendet NQ auch wenn keine Aufforde rung vorliegt eine maximale Wartezeit jedoch nur wenn vorige Angabe gemacht wurde Die Angabe 0 bedeutet da unbegrenzt gewartet werden soll Ohne Angabe wird automatisch eine Zeit von 600 Sekunden eingestellt die Adresse eines Bereichs in dem die zu bermittelnde Verbindungsnachricht steht ferner die L nge dieser Nachricht h chstens 80 Byte bei DCAM NEA Transport Service Anwendungen und 32 Byte bei DCAM ISO Transport Service Anwendungen L ngere Verbindungsnachrichten werden ohne Warnung abge schnitten Diese Angabe wird nur ab DCAM Version 8 0 ausgewertet Operand DCAMVER f r den ACB 987 2135 8 Aufforderung annehmen YOPNCON Beispiel 1 Wenn der Partner mit Namen PTNT der am Prozessor mit Namen PROZ angeschlos sen ist zum Verbindungsaufbau auffordert soll die Aufforderung angenommen vverden YOPNCON RPB RPBNAI RPBNAM YRPB ACB ACBNAM CCB CCBNAM OPTCD SPEC 0 ACBNAM YACB CCBNAM YCCB PTNNAME PTNAD PRONAME PROAD MDATA Y iso PTNAD DC CL8 PTNI PROAD DC CL8 PROZ 987 2135 8 87 YOPNCON 88 Beispiel 2 Aufforderung annehmen Es soll asynchron vvenn irgendein Partner zum Verbindungsaufbau auffordert diese Aufforderung angenommen vverden R
98. die DCAM Anvvendung mit den Attributen SHARE und DISCO er ffnet worden ist siehe Seite 58 und Kapitel Katalog der Makroaufrufe Es werden hier nur die Unterschiede zu den vorherigen Abschnitten siehe 80 und Kapitel Anvvendung der Funktionen von DCAM gezeigt bei beiden Varianten ACCEPT oder ACQUIRE entf llt die Angabe OPTCD CS Es kann im CCB angegeben werden 14 die Adresse des Steuerblocks DIP der die Operanden der Verteilcodes beschreibt Diese Angabe kann entfallen wenn im CCB bereits ein g ltiges Kennzeichen DID steht Im Steuerblock DIP mu angegeben werden 15 die Position des Verteilcodes in der Nachricht 16 die Lange des Codes der vervvendet vvird bzvv der Codes die vervvendet vverden 18 die Adresse eines oder mehrerer maximal 16 Steuerbl cke DCG die eine oder mehrere auf dieser Verbindung zul ssige Verteilcodes beschreiben Es kann angegeben werden 17 das Zeichen das anzeigt ob ein impliziter Verteilcode verwendet wird In einem Steuerblock DCG k nnen stehen 19 einer oder mehrere Verteilcodes maximal 8 Die Angabe wird nicht ausgewertet wenn bereits fr her ein g ltiges Kennzeichen GID eingetragen wurde 90 987 2135 8 987 2135 8 Aufbau einer Verbindung Vervvendung von Verteilcodes Beispiel Die DCAM Anvvendung hei t APPL Es soll eine Verbindung mit einem Partner der den Namen PARTNEP hat und am Pro zessor mit dem Namen PROZT angeschlossen ist aufge
99. die Nachrichten die von diesem Partner kom men in die absenderspezifische Warteschlange CS eingetragen werden sollen Fehlt die Angabe wird die empf ngerglobale Warteschlange CA eingestellt Wird bei DCAM NEA Transport Service Anwendungen mit dem YRECEIVE eine Transportquittung empfangen wird dieser Operand nicht ausgewertet Die Angabe wird nur ausgewertet wenn ohne Verteilcodes gearbeitet wird ATTR NSHARE oder SHARE NDISCO beim YOPEN angegeben wie die zu langen Nachrichten l nger als in AAREALN angegeben zu behandeln sind Entweder da sie abgeschnitten und der zu lange Teil weggeworfen wird TRUNC oder da der zu lange Teil f r einen weiteren YRECEIVE aufgehoben wird KEEP Fehlt diese Angabe wird das angenommen was beim Aufbau der Verbindung fest gelegt wurde CCBTK siehe Seite 75 Bedingung f r die Ausf hrung von KEEP ist da sp testens hier die absenderspe zifische Warteschlange CS eingestellt wird da der Aufruf falls er nicht sofort bearbeitet werden kann in eine Warteschlange eingetragen wird Q Fehlt die Angabe wird er sofort beendet ggf mit Fehlermeldung Er wird dann sozusagen nur auf Verdacht gegeben und nicht in eine Warteschlange eingetra gen NQ Die Angabe mu gemacht werden wenn der Befehl asynchron ausgef hrt werden soll die maximale Verweilzeit TOVAL die der YRECEIVE in der Warteschlange blei ben soll Nach Ablauf dieser Zeit wenn die gew nschten Daten ni
100. dynamische Steuerblockerzeugung bietet hingegen Steuerbl cke k nnen im Klasse 5 Speicher eingerichtet werden d h der Anwender braucht sich um den Speicherplatz nicht zu k mmern Er liegt au erhalb seines Pro gramms Er kann aber statt dessen auch einen Bereich in seinem Programm reservieren und sich den Steuerblock an dieser Stelle erzeugen Die Verweisadressen auf Felder und andere Steuerbl cke k nnen in Registern ange geben werden Mit einem Aufruf k nnen mehrere Steuerbl cke eines Typs erzeugt werden Sonstige Feldbeschreibungen entsprechen den Angaben bei statischer Erzeugung Der Aufruf zur dynamischen Erzeugung YGENCB wie auch die Aufrufe zur Behandlung von Steuerbl cken YMODCB siehe Abschnitt nderungen mit einem eigenen Aufruf YSHOWGB siehe Abschnitt Steuerblockfelder lesen und sicherstellen und YTESTCB siehe Abschnitt Steuerblockfelder abfragen und testen werden in ihrer Form durch den MF Operand bestimmt Wird er nicht angegeben wird die Operandenliste des Aufrufs zusammen mit dem Befehl abgesetzt Dies ist jedoch insbesondere bei der ablaufinvarianten Programmie rung nicht erw nscht Der MF Operand erm glicht die getrennte Erzeugung von Operandenliste Listenform oder L Form des Makroaufrufs und Befehl Befehlsform oder E Form des Makroauf rufs Die Aufrufe YGENCB YMODCB YSHOWCB und YTESTCB k nnen nur benutzt werden wenn das DCAM Subsystem erfolgreich gelade
101. nnen Werte des RPB Steuerblocks wie auch mit dem Aufruf YMODCB aktuali siert werden 215 YRECEIVE 216 Makroaufrufe Folgende Angaben sind bei der Bearbeitung des YRECEIVE von Bedeutung schl sselwort neuer wert ACB 1 addr arp 2 register ccB 2 addr 2 register AAREA addr AAREALN value OPTCD SPEC ANY 1 Entweder ACB oder AID mu angegeben werden Werden sowohl wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird 2 Entweder CCB oder CID mu angegeben werden Werden sowohl CCB wie auch CID angegeben und passen CCB und CID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird 987 2135 8 Makroaufrufe YRECEIVE schl sselwort neuer wert EID addr EIDREF L register J EIDREF2 15005 Ki register J TOVAL value VCBADR relexp nur f r DCAM NEA Transport Service Anvvendungen Zur Beschreibung der einzelnen Felder siehe YRPB Seite 223 und die Tabelle der Steu erblockfelder Anhang Seite 291 Hinweis Ein YRECEIVE mit OPTCD ANY kann bereits gegeben werden wenn noch keine Verbindung aufgebaut worden ist Der erfolgreiche Abschlu setzt allerdings den Auf bau mindestens einer Verbindung voraus Wird mit OPTCD Q gearbeitet und OPTCD SYN mu beachtet werden da w h rend der Wartezeit eine Unterbrechung durch Ansto einer Contingency Rout
102. nnen aber auch bei jedem YSEND modifiziert bzw bei jedem YRECEIVE abgefragt werden 237 YSEND 4 22 238 Makroaufrufe YSEND Funktion Mit diesem Aufruf wird das bertragen Senden von Daten aus dem Benutzerbereich in den Datenspeicher des Kommunikationssystems eingeleitet Es k nnen Normal und f r DCAM NEA Transport Service Anwendungen auch Expre nachrichten gesendet werden siehe auch Seite 126 Format Name Operanden symbol YSEND RPB addr schl sselwort neuer wert Operanden RPB addr Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer wert Hiermit k nnen Werte des RPB Steuerblocks wie auch mit dem Aufruf YMODCB aktuali siert werden 987 2135 8 Makroaufrufe YSEND Folgende Angaben sind bei der Beschreibung des YSEND von Bedeutung 987 2135 8 hl sselvort neuer vert addr register addr register addr value NORMAL f EXPRESS Entweder ACB oder A D mu angegeben werden Werden sowohl ACB wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwen deten Makro ab welche Angabe ausgewertet wird Entweder CCB oder CID mu angegeben werden Werden sowohl CCB wie auch CID angegeben und passen CCB und C D nicht zusammen h ngt es vom verwen deten Makro ab welche Angabe ausgewertet wird SUBGROUP nur f r DCAM NEA Transport Service Anvvendungen nur f r DCAM NEA Transport Se
103. soll in den Partner und Prozessor namen bersetzt werden Ein YOPNCON mit OPTCD ACCEPT YRECEIVE oder YRESET Makroaufruf wird auf einen spezifischen Partner bezogen 987 2135 8 Makroaufrufe YRPB ANY Ein YOPNCON mit OPTCD ACCEPT YRECEIVE oder YRESET Makroaufruf vvird auf einen beliebigen Partner bezogen Dieser Operand wird ausgewertet bei YRECEIVE YRESET und YSENDREC Ebenso wird er ausgewertet bei YOPNCON mit OPTCD ACCEPT wenn im ACB Steuerblock der die DCAM Anvvendung beschreibt ATTR LOGON gesetzt wurde SYN OPTCD a SYN Die Steuerung des Programmablaufs wird nach der Beendigung des Makroaufrufs und Ausf hrung des enthaltenen Befehls an den Benutzer zur ckgegeben ASY Die Steuerung des Programmablaufs wird nach der Annahme des Makroaufrufs durch DCAM an den Anwender zur ckgegeben Nach Ausf hrung des enthaltenen Befehls wird durch DCAM eine vom An wender bestimmte Meldung f r ein Ereigniskennzeichen EID gegeben In diesem Fall mu auch OPTCD Q und ElD relexp gesetzt werden Dieser Operand wird ausgewertet bei YOPNCON YRECEIVE und YSENDREC o CCBTK TRUNC Wenn die Nachricht eine L nge hat die die L nge des im Empfangs Makroaufruf angegebenen Empfangsbereiches AAREALN berschreitet wird der berlange Teil abgeschnitten und gel scht Der Empfangsauf ruf wird erfolgreich beendet Es wird jedoch im FDBK Feld siehe Anhang Seite 298 des RPB Steuerblocks auf den sich der Empfang saufr
104. speziellen Partnern oder Prozessoren erlauben zus tzliche Aktionen veranlassen JOB s starten Meldungen ausgeben Die benutzerspezifische Exit Routine wird beim ffnen und Schlie en von Anwendungen sowie beim ffnen und Schlie en von Verbindungen aufgerufen Beim ffnen von Anwendungen und Verbindungen kann die Exit Routine den Aufruf annehmen ablehnen oder ggfs modifizieren Die Aufrufe beim Schlie en dienen nur zur Information der Exit Routine DCAM Exit Ereignisse Der DCAM Exit wird bei den im folgenden erl uterten Ereignissen aufgerufen Jedes Ereignis wird eindeutig gekennzeichnet durch den Hauptereignis Namen und den Unterereignis Namen Hauptereignis Namen APP Ereignis bezogen auf die Existenz von Anvvendungen CON Ereignis bezogen auf die Existenz von Verbindungen Unterereignis Namen definiert die einzelnen Ereignisse ffnen Schlie en Das Exit Hauptereignis APP wird bei jedem ffnen Prim r oder Sekund r einer An wendung und bei jedem Schlie en explizit durch YCLOSE oder implizit bei Program mende Shutdown aufgerufen 275 DCAM SYSTEM EXIT Das Exit Hauptereignis wird beim Verbindungsaufbau Verbindungsabbau in fol genden Fallen aufgerufen Auffordern zum Verbindungsaufbau YOPNCON ACQUIRE 1 Beim YOPNCON ACQUIRE Aufruf des Benutzers 2 nach erfolgreichem Verbindungsaufbau Annehmen einer Verbindungsaufforderung 1 Beim Eintreffen einer Aufforderu
105. statische 9 11ff Steuerblockfelder ndern 26 Steuerbl cke 326 Steuerzeichen logische 182 STOP 236 STOP Zustand 67 236 SVC supervisor call 15 SYN 231 Synchrone Ausf hrung 29 synchrone Verarbeitung 134 synchroner Aufruf 231 Synchroner SOLSIG 33 SYSCODE 183 System Exit 275 T TACK 45 125 198 236 Task beliebige 162 erster ffnende 162 nachfolgend er ffnende 162 Teilnachricht 233 Terminalstatus abfragen 185 TERMSTAT 185 TOPLOGON 94 230 TOVAL Wartezeit 29 232 transparenter Modus Bitmuster 76 184 Transportquittung 45 163 198 empfangen 130 positive 236 TRUNG 172 231 Typ des Steuerblocks 202 203 208 249 251 252 U Unterbrechungsroutine 38 USEPASS 161 166 USEPW 161 167 USERFLD 174 193 987 2135 8 Stichvv rter V VCBADR 237 Verbindung abbauen 123 aufbauen 74 beschreiben 75 Eigenschaften ndern 118 Verbindungsanzahl 110 VERIFY 162 Versionsnummer 162 Verteilcode L nge des 195 Position des 195 Verteilcode Zuordnung steuern 141 Verteilcodewert 194 Verteilungsname 164 167 Verweisadressen 13 VTSUCB 108 235 Ww WAREA 202 249 Warteschlange 229 absenderspezifisch 163 228 absenderspezifische 132 empf ngerglobal 163 229 empf ngerglobale 132 Wartezeit 31 TOVAL 29 232 Y YACB 157 YAPPL 145 YCCB 169 YCHANGE 73 118 186 YCLOSCON 73 189 YCLOSE 49 71 188 YCONN 145 191 YDCG 194 YDDACB 326 YDDCCB 333 YDDDCG 336 YDDDIP 338 YDDENB 340 YDDFDB 350 YDDRPB 342 U
106. tzt ist Wird es dennoch vergeben so ist es gleich dem Kennwort in der RDF zu setzen Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask jedoch nur wenn ATTR SHARE gesetzt wurde kennvvort1 kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante in der L nge von 4 Byte angegeben werden Der Standardwert ist X 00000000 gleichbedeutend mit Kennwort vorgegeben USEPW kennwort2 Angabe des Kennworts zum Anschlu an eine mehrfach benutzbare DCAM Anwendung Funktion des Kennworts Dieses Kennwort wurde von der Prim rtask unter dem Operan den USEPASS vorgegeben oder es existiert ein RDF Kennwort Jede weitere diese DCAM Anwendung er ffnende Sekund rtask mu dieses Kennwort unter dem Operan den USEPW angeben Wenn ein RDF Kennwort vorhanden ist mu es auch von der Prim rtask angegeben werden Dieser Operand wird nur ausgewertet bei YOPEN durch eine Prim rtask USEPW mu das RDF Kennwort enthalten falls vorhanden YOPEN durch eine Sekund rtask USEPW mu das RDF Kennwort falls vorhanden bzw das von der Prim rtask mit USEPASS angegebene Kennwort falls vorhanden enthalten Hinweis USEPASS und USEPW erhalten die analoge Bedeutung im YAPPL Makro bzw im APPLICATION Kommando Das APPLICATION Kommando kann auch im SDF For mat angegeben werden siehe Anhang Seite 360 987 2135 8 161 YACB 162 Makroaufrufe kennvvort 2 kann als Zeichenko
107. und R ckmeldungen F r eine von drei verschiedenen R ckmeldungen k nnen Adressen erzeugt werden FDBK CONT CBRC gibt an da die Namen f r R ckmeldungen nach Beendigung eines Makroaufrufs erzeugt werden sollen Inhalt des FDBK Feldes bzw von Register 15 fordert die Erzeugung von Namen an die auf Inhalte der Register 6 bei LOSCON bzw Register 4 bei COMEND und SECOND hinwei sen Die Werte werden gefunden sobald eine Contingency des ange gebenen Typs von DCAM gestartet wurde fordert die Erzeugung von Namen an die auf Inhalte des Registers 15 hinweisen Die Werte werden gefunden nach Beendigung eines der folgenden Makroaufrufe YGENCB YMODCB YTESTCB YSHOVVCB Auf den nachfolgenden Seiten vverden Aufl sungen der drei Varianten des Makroaufrufs YDDFDB gezeigt 351 Steuerbl cke und R ckmeldungen Anhang Variantel EXTERNAL SYMBOL DICTIONARY START YDDFDB YDDFDB D 1 YDDFDB DSECT 1 1 kkxkxkxkxkxkxkxkxkxkk kxxk kxxk FEEDBACK FIELD 1 k k k k k k k kkk k Ekt kkk kkk kA kkk kk kkk kA KH KH 1 YDDFFDB1 DS XL1 GENERAL RETURN CODE IN R15 TOO 1 1 YDDFSUCC EQU x 00 REQUEST SUCCESSFULLY 1 YDDFSUWA EQU X 04 REQUEST COMPLETED WITH WARNING 1 YDDFRAPS EQU X 08 REQUEST REJ DUE TO APP STATE 1 YDDFRPTS EQU X 0C REQUEST REJ DUE TO PART STATE 1 YDDFRDCS EQU X 10 REQUEST REJ DUE TO
108. vorangestellt 987 2135 8 Anhang U987 J Z135 8 Steuerbl cke und R ckmeldungen Pseudoabschnitt DSECT f r den Steuerblock DIP 7 KALA x K UUUUUUUUUUUDUDUDUDDD 362 A Zur ir Zr Er ir ar Zr Zr Ar 1245 1242 Ko k AXDI LA XALA XL A FAK A AK A AK A AK A A KA AK A EA KA XE EA EA KA XL KK KK x x IF RI KK x x xod DIP DH DH DH DH CB LN OUQU DCDPS DCDLN DCIND DRES DDID DDSN DDLN DCG DCG1 DCG2 DCG3 DCG4 DCG5 DCG6 DCG7 DCG8 DCG9 DCGA DCGB DCGC DCGD DCGE DCGEF DCGG DLEN START EXTERNAL SYMBOL DICTIONARY YDDDIP D DSECT DC DC DC DC DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS DS EQU END HEADER OF CONTROL BLOCK DIP CL3 DTP CL1 D 1402 TYPE OF CONTROL BLOCK DCAM CONTROL BLOCK DCAM INTERFACE VERSION AL2 YDDDLEN 2 YDDDHDTY LENGTH OF BODY BODY OF CONTROL BLOCK DIP LI LI LI X X X XL1 m O 21 YDDDHDTY YDDDIP 030 CODEPOS CODELN CODEIND RESERVED DISTRIBUTION IDENTIFIER D i DRESSES OF DCG S DCG1 tab LENGTH
109. wer zum Verbindungsaufbau aufge fordert hat Folgende Kennzeichen werden ihm bergeben In Register 3 AID In Register 4 LID In Register 5 L nge der Verbindungsnachricht LOGONADR YINQUIRE RPB RPBCONT AID 3 LID 4 AAREALN 5 RETCO RPBCONT YRPB AAREA BEREICH YCCB PTNNAME PTNAME PRONAME PRNAME PTNAME DS CL8 PRNAME DS CL8 BEREICH DS CL80 bei 1SO Anvendungen 32 Byte 97 YINQUIRE 3 2 2 2 Partnerinformation vor dem Verbindungsaufbau Steuerbl cke und Register Makroaufrufe Besch Partnerinformation vor dem Verbindungsaufbau Speicherbereiche im Anwendungsprogramm Fresse gt Register n Nummer des Registers AID Kennzeichen der Anwendung 4 RPB addr1 YINQUIRE RPB NEA ISO AAREA relexp 1 OPTCD TOPLOGON 2 CCB relexp 3 ACB relexp 4 1 AAREALN value ns80 value ns32 5 ARECLN L nge der Verbindungsnachricht DCAM gibt FDBK R ckmeldung siehe zur ck Anhang Seite 298 Register 15 siehe Anhang Seite 298 FDB 1 FDB 2 FDB 3 FDB 4 Verbindungsnachricht 1 Byte 1 Byte 1 Byte 1 Byte ACB Steuerblock mit g ltigem Kennzeichen AID CCB PTNNAME relexp 2 PRONAME relexp 2 R ckgaben vie bei REQLOGON 2 DCAM gibt zur ck Partnername 8 Byte Prozessorname 8 Byte 1 Adresse des Steuerblocks der den Aufruf beschrei
110. zum Verbindungsaufbau nicht bearbeitet werden sollen NLOGON Fehlt die Angabe werden sie bearbeitet nur bei NEA Transport Service 9 Transportquittungen an die anfordernde Task geleitet werden sollen REQTASK oder nicht weitergeleitet werden sollen Fehlt die Angabe werden sie an die Prim rtask bergeben PRIMTASK nur bei NEA Transport Service 10 bei Aufforderung zum Verbindungsaufbau an diese DCAM Anwendung ein Kenn wort angegeben werden soll das hier festgelegt wird Fehlt die Angabe ist es nicht erforderlich nur bei NEA Transport Service 987 2135 8 55 YOPEN 56 Mehrfach benutzbare Anvvendung Ferner kann man angeben 11 die Adresse des Feldes in das DCAM den symbolischen Namen des eigenen Pro zessors eintr gt 12 die Adresse des Feldes in dem der Kettungsname steht 13 da die Angaben im ACB mit den Informationen des CLT Eintrags CLT Communication Link Table berschrieben werden sollen der durch den Kettungsnamen identifiziert wird PERM permanente nderung Bei fehlender Angabe werden die Informationen des CLT Eintrags nur f r diesen Aufruf ausge wertet Die Angaben im ACB werden nicht ver ndert TEMP tempor re nde rung 14 die Nummer der DCAM Version wenn bei der Task die neuen Funktionen ab DCAM V8 0 verwendet werden sollen Sollen die neuen Funktionen verwendet wer den mu 8 0 angegeben werden Bei fehlender Angabe oder einer Angabe 8 0 wird eine DCAM Versio
111. 1 5 2 6 1 6 2 6 2 1 6 2 1 6 2 1 6 2 1 6 2 2 6 2 2 6 2 2 6 2 3 6 2 4 Katalog der Makroaufrufe YACB YAPPL YCCB YCHANGE YCLOSE YCLSCON YCONN YDCG YDIP YENB YFORBID YGENCB YINQUIRE YMODCB YOPEN YOPNCON YPERMIT YRECEIVE YREJLOG YRESET YRPB YSEND YSENDREC YSETLOG YSHOVVCB YTESTCB Beispiele DCAM NEA Transport Service DCAM ISO Transport Service Der DCAM System Exit System Exits Bedienung System Exits Programmsehnittstelle DCAM Exit Programmschnittstelle Registerversorgung DCAM Exit Parameterliste R ckkehrinformation DCAM Exit Ereignisse DCAM Datenstruktur R ckinformation f r die Exit Ereignisse Einschr nkungen f r DCAM Exit Routinen DSECT Makroaufrufe f r die DCAM Steuerbl cke Inhalt 153 157 165 169 186 188 189 191 194 195 197 199 201 205 207 210 210 213 215 219 221 223 238 242 246 248 251 255 255 266 275 280 280 281 281 281 284 285 285 287 288 289 401 nhalt 402 7 1 7 2 7 3 7 4 7 5 7 6 7 7 7 8 7 9 Anhang 2 Tabelle der Steuerblockfelder Tabelle der R ckmeldungen Registerbelegung Mnemotechnische Werte der Makroaufrufe Steuerbl cke und R ckmeldungen Namen f r Felder und Werte Kommandos f r die Namen Zuweisung Mnotes Auswirkungen der CCITT Empfehlung x 25 auf die IDCAM Benutzerschnittstelle Gr nde f r negative Transportquitt
112. 1 DC C YSEND EQU 561 DC C YRESET EQU ERRMSG1 DC C YCLOSE SPACE 3 DC C 0123456789ABCDEF SPACE 3 DS OH DS H DC 22 5 XL100 SPACE 3 DS F DS OH DS H DC sr DS XL200 SPACE 3 DCAM NEA 987 2135 8 DCAM NEA U987 J Z135 8 STARTMSG STARTTYP STARTMSE STARTIND RETRYIND ENDIND YACBO YCCBO YRPBO OWNAPPL OWNPROC PTNPROC PTNAPPL LINK DC Y STARTMSE STARTMSG DC Er CONSOLE SERVICE DC 065 DC ALI LOGNL NEUE ZEILE DC C PLEASE ENTER LOGON MESSAGE FOR CONSOLE OR END EQU SPACE 3 DC C START DC G RETRY DC C END SPACE 3 YGENCB BLK ACB DCAMVER 8 0 ATTR NLOGON LINKMOD PERM APPNAME OWNAPPL PRONAME OWNPROC LINK LINK MF L YGENCB BLK CCB EDIT SYSTEM LINK LINK LINKMOD PERM PTNNAME PTNAPPL PRONAME PTNPROC MF L YGENCB BLK RPB AREA INDATA AREALN 5 AAREA RECDATA AAREALN L RECDATA OPTCD ACQUIRE SYN Q SPEC CS MF L SPACE 3 DC C HUGO DC er DC er DC C SCONSOLE DC C CONSOLE SPACE 3 VTCSET LOG END CONSOLE Beispiele 265 Beispiele 5 2 266 DCAM ISO Transport Service DCAM ISO Transport Service Beispiell Dieses Beispiel zeigt einen normalen ISO Programmablauf PRINT NOGEN 150 501 STA TE DAS PROGRA IM PROGRA EROEFFNEN DIE DCAM I VERBINDUNG USS VOR IT HILFE VOR ABLAUF ABGESETZT DANACH WER
113. 2 2 4 Datensichtstation und Zeichens tze 255 3 2 2 5 Peripherie 55 3 2 2 6 Grundinformation ber die Datenstation gap a a 106 3 2 2 7 VTSU Control Block 108 3 2 2 8 Verbindungsanzahl r 17757777 1112 3 2 2 9 Kennzeichen der Verbindung CID 577727 77 777 3 2 2 10 Partner und Prozessornamen Mon x z 194 3 2 3 Aufforderung zum Verbindungsaufbau zur ckweisen 46 2 116 3 2 4 Eigenschaften einer Verbindung ndern u ee 3 2 5 Aufforderung zur cknehmen 121 3 2 6 Verbindung abbauen nen 00 3 3 Makroaufrufe bezogen auf die Daten bermittlung 2 3 3 1 Nachricht senden ad R 003 s s 1126 3 3 2 Nachricht oder Transportquittung empfangen bd mand ee 1190 3 3 3 Senden und Empfangen kombiniert Ep ee 9196 3 3 4 Empfangsaufrufe zur cknehmen und CS CA Zustand ndern 2 2 139 5 Verteilcode Zuordnung steuern 20 141 3 3 5 1 Verteilungsnamen einem Verteilcode Gruppenbiook zuordnen 2 ee 141 3 3 5 2 Zuordnung aufl sen en sn gx 143 3 4 Makroaufrufe bezogen auf die Namen Zuweisung gogua gde 2 145 3 4 1 Zuweisung f r die DCAM Anwendung S Av 520266 s 146 3 4 2 Zuweisung f r die Verbindung a re en A 987 2135 8 987 2135 8 4 1 4 2 4 3 4 4 4 5 4 6 4 7 4 8 4 9 4 10 4 11 4 12 4 13 4 14 4 15 4 16 4 17 4 18 4 19 4 20 4 21 4 22 4 23 4 24 4 25 4 26 5
114. 20 Vervvendung der Kennzeichen F r alle h ufig benutzten Objekte die ber einen l ngeren Zeitraum f r mehr als einen Request von Bedeutung sind vergibt DCAM beim Aufbau des Objekts ein Kennzei chen Ein Kennzeichen ist f r die Lebensdauer des Objekts g ltig und eindeutig An der Benutzeroberfl che kann dann nur noch ber dieses Kennzeichen auf das Objekt zuge griffen werden Solche Objekte sind Anwendungen Verbindungen Verteilstrukturen und Verteilcodegruppen Das Bild auf Seite 24 zeigt an einem typischen Ablauf wie die Kennzeichen eingesetzt werden k nnen Das zur ckgegebene Kennzeichen erlaubt es dem Anwender sich auf die an DCAM bergebenen Steuerblockinhalte zu beziehen Wird eine DCAM Anvvendung er ffnet oder eine Verbindung aufgebaut so enthalten die Steuerbl cke die dazu verwendet werden nach Ausf hrung des entsprechenden Aufrufs das g ltige Kennzeichen 987 2135 8 Objekt Name erzeugt mit Anwendung YOPEN Verbindung YOPNCON Verteil DID YOPNCON struktur Verteil GID YOPNCON code oder gruppe YPERMIT Kennzeichen von DCAM zur ck gegeben in AID Feld des ACB Steuerblocks CID Feld des CCB Steuerblocks und CID Feld des RPB Steuerblocks der beim Aufruf YOPNCON benutzt wird DID Feld des DIP Steuerblocks und DID Feld des CCB Steuerblocks GID Feld des DCG Steuerblecks 1 Mit YMODCB oder mit einem Aktionsaufruf nur f r DCAM NEA Transport Service Anvendungen
115. 291 R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung und der Tabelle der Meldungen zu ent nehmen siehe Seite 143 und Anhang Seite 298 987 2135 8 Makroaufrufe YGENCB 4 12 987 2135 8 YGENCB Funktion Der YGENCB Makroaufruf erzeugt einen oder mehrere identische Steuerbl cke und zwar w hrend des Programmablaufs Beachten Sie da der Aufruf YGENCB nur be nutzt werden kann wenn das DCAM Subsystem erfolgreich geladen wurde Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolgreich abgesetzt hat kann er trotz HOLD Subsystem oder DELETE Subsystem bis Taskende mit DCAM arbeiten gilt auch f r Wird ein Speicherplatz WAREA angegeben und die L nge des Bereiches LENGTH werden die Steuerbl cke an dieser Stelle im Programm Klasse 6 Speicher erzeugt Werden keine Angaben gemacht werden die Steuerbl cke in einem von DCAM verwal teten Bereich Klasse 5 Speicher erzeugt Format Name Operanden symbol YGENCB ACB CCB BLK 51 RPB 1 il integer WAREA addr LENGTHevaluel L 1 E addr schl sselwort anfangswert 201 YGENCB Makroaufrufe Operanden fACB CCB l Es RPB Es wird der Typ des Steuerblocks oder der Steuerbl cke angegeben der die erzeugt werden soll en s integerl Es vvird die A
116. 3 C END RECOK DS oY MVI AKTDIST 1 TRECEIVE BAL 14 FDBKTRC 256 987 2135 8 DCAM NEA Beispiele CLC AAREA 3 C END BE END AP ZAEHLER EINS UNPK AREA 5 ZAEHLER 3 MVC AREA 3 5 BDPB B LOOP ABBAU DER VERBINDUNG 5 OH CLSCON YCLSCON RPBERPBI MVI AKTDIST 1 TCLSCON BAL 14 FDBKTRC SCHLIESSEN DER APPLIKATION CLOSE YCLOSE 1 MVI AKTDIST 1 TCLOSE BAL 14 FDBKTRC TERM TERM FDBKTRC DS OH ST 15 YDDFDBK LH 8 AKTDIST LA 8 MSGTAB 8 VC MESSTEXT 0 8 UNPK MESSCODE 9 YDDFDBK 5 TR MESSCODE TRTAB C 07 VI MESSEND HKOMMA WROUT MESSAGE TERM PARMOD 31 BR 14 AKTDIST DC H 07 MSGTAB DS OH TOPEN EQU DC CL8 YOPEN TCLOSE EQU DC CL8 YCLOSE TOPNCON EQU DC CL8 YOPNCON EQU DC CL8 YCLSCON TINQUIRE EQU MSGTAB DC CL8 YINQUIRE TRECEIVE EQU MSGTAB DC CL8 YRECELVE TSEND EQU DC CL8 YSEND MSGTABE EQU K YDDFDBK YDDFDB C MESSAGE DC Y LMESSAGE DC CL3 MESSTEXT DC CL8 7 DC C FDBK X MESSCODE DC L 7 U987 J Z135 8 257 Beispiele 258 MESSEND LMESSAGE HKOMMA TRTAB 1 1 1 LNKO AREA AAREA ZAEHLER EINS BDPB D27X132 STATUS STALENG DCAM NEA D
117. 4 ATTR HOSTNAM DS XLI BYTE 2 FOR ATTR EQU X 04 ATTR REQTASK EQU X 02 ATTR PRIMTASK EQU x od ATTR NOTACK DS XLI BYTE FOR VERIFY EQU X 01 VERIFY NO EQU X 02 VERIFY PRIMARY EOU x 04 VERIFY SECONDARY DS CLI EQU X 02 LINKMOD PERM EQU X 04 FOR INTERNAL USE EQU X 087 een DS A A LINK DS A LOGPASS DS F USEPASS DS E USEPW YDDFDB YDDA DS OF AAAKrr FEEDBACK FIELD m kkkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkkxkkkxkkkkkkkkxkkkkkkkxk DS XLI GENERAL RETURN CODE IN R15 TOO 327 Steuerbl cke und R ckmeldungen Anhang 2 YDDASUCC EQU X 00 REQUEST SUCCESSFULLY 2 YDDASUWA EQU X 047 REQUEST COMPLETED WITH WARNING 2 YDDARAPS EQU X 087 REQUEST REJ DUE TO APP STATE 2 YDDARPTS EQU X 0C REQUEST REJ DUE TO PART STATE 2 YDDARDCS EQU X 10 REQUEST REJ DUE TO DCS STATE 2 YDDAINRU EQU X 14 INVALID REQUEST USAGE 2 YDDARPAR EQU X 18 REQUEST REJ DUE TO BAD PARAM 2 YDDABCBR EQU X 20 BAD CONTROL BLOCK PL REFERENCE 2 YDDACONS EQU X 24 CANNOT CONNECT TO SS 2 YDDASYSX EQU X cc RESERVED FOR SYSTEM EXITS 2 x 2 k k k k xx k xx 7k xx 7 xx kk FEEDBACK FIELD 2 kkkxkxkxkxkxkxkxkxkxkxkxkxkxkkkxkkkkkkkkkkkkkkkkkkkkxk 2 YDDAFDB2 DS XLI REASON FOR REJECTION 2 X xx kk ik iki 2 YDDAFD2N EQU X 00 NO
118. 7 2135 8 282 DCAM SYSTEM EXIT Beschreibung der Felder in der Parameterliste YDDEXPL YDDXPAR YDDXMAIN YDDXSUB YDDXLOGL YDDXLOGM YDDXPVV 987 2135 8 A DARPPAR Adresse eines DCAM internen Arbeitsbereichs In diesem Arbeitsbereich werden weitere aufrufspezifischen Informationen an die Exit Routine bergeben Exit Hauptereignis Main Case Indikator f r die Exit Routine YDDXAPPL Ereignis bezogen auf die Existenz von Anwendungen YDDXCONNEreignis bezogen auf die Existenz von Verbindungen Exit Unterereignis Sub Case Indikator f r die Exit Routine YDDXAOPNExit Ereignis APPOPN YDDXACLS Exit Ereignis APPCLS YDDXASHUFExit Ereignis APPSHU YDDXATRMEXit Ereignis APPTRM YDDXAFCL Exit Ereignis APPFCL YDDXCACGEXit Ereignis CONACQ YDDXCACCEKxit Ereignis CONACC YDDXCCPLExit Ereignis CONCPL YDDXCREQFxit Ereignis CONREQ YDDXCCLS Exit Ereignis CONCLS YDDXCFCL Exit Ereignis CONFCL YDDXCBADExit Ereignis CONBAD L nge der LOGON Message In diesem Feld wird die L nge der Verbindungsnachricht im Feld YDDXLOGM angegeben lt 80 Byte bei DCAM NEA Transport Service Anwendungen und lt 32 Byte bei DCAM ISO Transport Service Anwendungen YDDXLOGL bedeutet es ist keine Verbindungs nachricht angegeben Dieses Feld kann von der Exit Routine ver ndert werden LOGON Message In diesem Feld kann die Exit Routine beim R cksprung eine Verbin dungsnachricht LOGON MESSAGE bergeben Diese Verbindungs nach
119. 72 197 CONNECTION Kommando 361 Contingency 31 38 COPIES 202 U987 J Z135 8 987 2135 8 Stichvv rter COUNTPTN 94 110 230 CS Zustand 173 228 CS CA Zustand ndern 139 D Dateikommunikationssystem 38 Daten gesch tzt ausgeben 181 ungesch tzt ausgeben 181 Datenflu kontrolle 173 Datengruppe 233 Datenstation Format 179 180 Grundinformation 106 logische 178 180 physische 178 180 Daten bermittlung 125 184 Datenuntergruppe 233 DCAM Anwendung einfach benutzbare 51 er ffnen 50ff mehrfach benutzbare 54 schlie en 71 Zustand abfragen 69 DCAMVER 162 DCG 196 DIP 177 direkte Steuerblockerzeugung 9 17ff DISCO 163 DISNAME 164 167 Druckerausgabe 180 dynamische Steuerblockerzeugung 9 13 E E Form des Makroaufrufs Befehlsform 15 EDIT 178 EDITOUT 180 EID 226 EIDREF 227 EIDREF2 227 Eigenschaften der Verbindung ndern 118 Einfach benutzbare Anwendung 159 Einfach benutzbare DCAM Anwendung 51 Eintr ge ber Partner abfragen 94 Eintr ge ber Verbindung abfragen 94 391 Stichvv rter 392 empf ngerglobale Warteschlange 132 163 229 Empfangsaufrufe zur cknehmen 139 Empfangsl nge 172 ENB 159 197 Ereignis 38 Ereignis Meldungsblock 159 Ereigniskennzeichen 31 ERET 252 Er ffnen erstmalig 54 erstmalig Verteilcodes 58 nachfolgend 61 nachfolgend Verteilcodes 64 erster ffnende Task 162 Erstmalige Er ffnung 54 58 EXPR 44 125 198 EXPRESS 234 Expressnachricht 44 EXTEND 181 F FIELD
120. 8 Makroaufrufe 4 3 YCCB Funktion YCCB Es wird ein Verbindungssteuerblock CCB connection control block erzeugt siehe auch Seite 74 Format symbol YCCB PTNNAME relexp LINK relexp ROUTL relpex ROUTN absexp IAXLN absexp RLTH absexp 987 2135 8 PRONAME relexp PERM LINKMOD IL 1 1 507 KEEP PRIO i 2 ie lij USERFLD benutzerfeld 169 YCCB Makroaufrufe DIP relexp USER EDIT SYSTEM je Ess EDITIN LINEt IL IL 1 1 FORM NGETBS NGETFC NLCASE PHYS HCOPY HOM EXTEND EDITOUT SLINEf It FORM NHCOPY Asch NEXTEND LOGC LACK IL 1 5 1 1 NLOGC NLACK LOGPN kennvort41 75 5 PROC 1 Il Il 1 1 BINARY ANYSTART NTERMSTAT 170 987 2135 8 Makroaufrufe YCCB 987 2135 8 PTNNAME relexp Adresse des Feldes im dem der Name des Kommunikationspartners steht Dieser Operand wird ausgewertet bei YOPNCON wenn im RPB Steuerblock OPTCD ACQUIRE oder OPTCD ACCEPT SPEC gesetzt wurde Bei YOPNCON mit OPTCD ACCEPT ANY tr gt DCAM den Namen in das Feld ein YINQUIRE wenn im RPB Steuerblock OPTCD REQLOGON oder TOPLOGON gesetzt wurde DCAM tr gt den Namen in das Feld ein Wird bei YINQUIRE REQLOGON keine Auff
121. 8 Die Anvendung ist durch ein anderes Subsystem er ffnet x 08 5C Zu viele nicht vordefinierte Anwendungen x 08 60 Zu viele Verbindungen f r die nicht x vordefinierte Anwendung 08 64 Die DCAM Version entspricht nicht der durch die x Prim rtask angegebenen 987 2135 8 305 Tabelle der R ckmeldungen Anhang R ckmelde Feld Bedeutung Makroaufruf m z 4 ri 02 4 ZOQ ZU O K ZOCQ m O K Q O EH El 2 4 Q O 63 O 4 Q zm 4 d CO 63 2 0 4 FHWPO K 2 4 ri 2 64 0 UZ F K m rl o rl b 4 oc Der Makroaufruf ist wegen des aktuellen Zustandes des Partners zur ckgewiesen worden x oc oc oC oc oC 04 08 oc 10 14 18 IC 20 24 28 Der Partner ist mit der DCAM Anwendung nicht verbunden ung ltiges CID Der Partner ist bereits mit der DCAM Anwendung verbunden Bei DCAM ISO Transport Service Anwendungen ist eine Parallelverbindung wegen des verwendeten Transportprotokolls NEA nicht m glich Hinweis CID wird von DCAM im RPB und CCB wie bei einem Return Code 00 00 erg nzt Von diesem Partner wurde bereits eine Aufforderung in die Warteschlange eingereiht kein ACQUIRE m glich Der DIP Steuerblock ist nicht aktiv ung l
122. 9 FORBID REQUEST X 0A SEND REQUEST RECEIVE REQUEST X OC SEND RECEIVE REQUEST x 0D SESSION REQUEST XLI STATUS BYTE FOR CONTROL BLOCK X 01 RPB IS USED BY REQUEST XLI USED PARAMETER FOR R EQUEST X 807 CID IS USED X 40 AID IS USED XLI BYTE 1 FOR OPTCD X 80 SPEC X 40 OPTCD CS X 20 OPTOD Q X 10 OPTCD ASY X 087 OPTCD ACQUIRE X 047 X 02 X 01 OPTCD START XLI BYTE 2 FOR OPTCD X 00 OPTCD PTNCHAR X 01 OPTCD REQLOGON X 02 OPTCD TOPLOGON 343 Steuerbl cke und R ckmeldungen Anhang YDDRCOUN EQU X 03 OPTCD COUNTPN YDDRASTA EQU X 04 OPTCD APPSTAT YDDRCIDX EQU X 705 OPTCD CIDXLATE YDDRNAMX EQU X 06 OPTCD NAMXLATE YDDRMODX EQU X 09 OPTCD MODXLATE YDDRVTCB EQU X 0A OPTCD VTSUCB YDDRMONC EQU X OB OPTCD MONCHARS YDDRPOTE EQU X 0C OPTCD PEROTERM YDDRBTIN EQU X D OPTCD BTERMINF YDDROPC3 DS XLI BYTE 3 FOR OPTCD YDDRELEM EQU X 04 OPTCD ELEMENT YDDRSUBG EQU X 02 OPTCD SUBGROUP YDDRGRP EQU X 01 OPTCD GROUP YDDROPC4 DS XLI BYTE 4 FOR OPTCD YDDRTRUN EQU X 047 O YDDRKEEP EQU X 027 OPTCD KEEP YDDRCCBT EQU X 01 OPTCD CCBTK PTCD TRUNC 1 1 1 1 1 1 I 4 1 1 1
123. 987 2135 8 83 YOPNCON Aufforderung annehmen 3 2 1 3 Aufforderung annehmen Makroaufrufe Steuerbl cke und Register Speicherbereiche im Anwendungsprogramm AID register Den Register n Nummer des Registers AID Kennzeichen der DCAM Anwendung 2 RPBeaddr1 RPB NEA ISO CCB relexp 1 ACB relexp 2 OPTCD SPEC 3 OPTCD cs 4 OPTCD ASY 5 EID relexp 6 gt Ereigniskennzeichen 4 Byte EIDREF konstante 2 7 EIDREF2 konstante 2 7a OPTCD Q 8 TOVAL absexp 0 lt m lt 32767 9 AREA relexp 10 AREALN absexp 10 CID Kennzeichen der Verbindung USER Begleitinformation vie sie in USERFELD des CCB festgelegt vurde ARECLN Lange der empfangenen Verbindungs nachricht oder bei zu langer Nachricht L nge des abgeschnittenen Restes FDBK R ckmeldung siehe Anhang Seite 298 1 Register 15 siehe Anhang Seite 298 72 DCAM gibt zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte Steuerblocks mit g ltigem Kennzeichen AID CCB NEA ISO Angaben zur Verbindung 1 12 15 18 CID Kennzeichen der Verbindung MAXLN Maximale L nge der auf dieser Verbindung sendbaren Nach DCAM gibt richten Dateneinheiten 3 zur ck PTCHA 1 4 84 987 2135 8 Aufforderung annehmen YOPNCON Adresse des Steuerblocks der den Aufruf beschreibt konstante kann als Zeichenkonstante C
124. 987 J Z135 8 397 Stichvv rter 398 YDIP 195 YFORB D 125 143 199 YGENCB 16 201 YINQUIRE 73 94 205 YINQURE 49 YLOSCON 121 YMODCB 26 121 124 207 YOPCON 210 YOPEN 49 50 210 YOPNCON 19 73 74ff YPERMIT 125 141 213 YRECEIVE 125 130 137 215 YREJLOG 73 116 219 YRESET 125 136 221 YRPB 223 YSEND 125 126ff 137 238 YSENDREC 125 242 YSETLOG 49 246 YSHOVVCB 27 248 YTESTCB 28 251 Z Zeichensatz 102 Zeile logische 181 Zum Aufbau auffordern 80 Zustand abfragen 69 ver ndern 67 U987 J Z135 8 Inhalt 987 2135 8 co 21 21 2 21 3 2 2 2 3 24 2 4 1 2 4 2 2 5 2 6 2 7 2 7 1 2 7 2 2 8 2 8 1 2 8 2 2 8 3 2 8 4 2 8 5 2 8 6 2 8 7 Einleitung Konzept der Handb cher m nderungen gegen ber Vorg ngerausgabe Verwendete Metasprache DCAM Assembler Schnittstelle Steuerbl cke erzeugen Steuerbl cke w hrend der Assemblierung erzeugen Steuerbl cke w hrend des Programmablaufs erzeugen Steuerbl cke durch den Anwender erzeugen Verwendung der Steuerbl cke bei der Ausf hrung von Aufrufen Vervvendung der Kennzeichen Inhalte von Steuerblockfeldern ver ndern nderungen bei Verwendung des Steuerblocks nderungen mit einem eigenen Aufruf Steuerblockfelder lesen und sicherstellen Steuerblockfelder abfragen und testen Ausf hrung der Befehle an DCAM Synchrone Ausf hrung Asynchrone Ausf hrung
125. AL information kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante Festpunktkonstante F konstante oder Adre konstante A konstante oder V konstante angegeben vverden Zeichenkonstanten und Sedezimalkonstanten vverden rechtsb ndig ausge richtet und von links mit X 0 aufgef llt Der Standardvvert ist X 0C000000 Das 1 Byte wird in jedem Fall mit X 0C berschrieben EIDREF2 information Diese Angabe ist das zweite Wort einer benutzereigenen Referenz das der Anwender zur ckerh lt wenn das Ereignis eingetreten ist EIDREF2 wird von DCAM nicht ver n dert Hinweis Ist EIDREF2 4X 00 wird nur eine benutzereigene Referenz zur ckgegeben 987 2135 8 227 YRPB 228 Makroaufrufe Bei synchron abgesetztem SOLSIG Aufruf vervveist der Anvvender mit den Operanden RPOSTAD und RPOSTL auf den Bereich in den EIDREF und EIDREF2 eingetragen wer den sollen Wird EIDREF2 verwendet und ist RPOSTL 1 erh lt der SOLSIG Aufruf einen entsprechenden Return Code Bei asynchron abgesetztem SOLSIG Aufruf wird das zweite Wort der Anwenderreferenz in Register 4 der Contingency Routine bergeben Dieser Operand wird ausgewertet bei YOPNCON YRECEIVE YSEND und YSENDREC Bei YOPNCON YRECEIVE und YSENDREC nur wenn OPTCD ASY Q gesetzt wurde In diesem Fall mu der Operand angegeben werden siehe OPTCD ASY OPTCD Q Bei YSEND nur wenn die Verbindungseigenschaft PROC SIGNAL im CCB
126. AL I 10 NUMBER OF 10 CODEIND I 10 LID NOT 10 PRONAME 10 LINKMOD 10 LINKMOD 10 LINK NOT 10 DID NOT C D INCO I N I N 10 DID NOT I 10 FLAG INCO 10 FLAG NOT 10 AID NOT C 10 AID NOT I 10 CID NOT C 10 CID NOT I 10 PARAM NOT 160 LINK MIS 160 LINK INC 10 APPNAME I 10 DISNAME I 10 USEPASS I RRECT ORRECT OPERAND CO CORRECT CORRECT OF RANGE INCORRECT O RANGE ORRECT REG STER CODEVAL E CORRECT CORRECT REG STER ORRECT PATIBLE REG STER RRECT COMPATIBLE REG STER REG STER DCG S EXCEEDS LIMIT T C T COMPATIBLE WITH BLK VALUE O M OVED FROM THE DCAM INTERFACE FLICT FLICT NOTATION S EXCEEDS LIMIT 8 16 OTATIO COMPATIBLE WITH BLK VALUE WITH BLK VALUE PATIBLE WITH BLK VALUE OTATIO WITH BLK VALUE OMPATIBLE WITH BLK VALUE OTATIO OMPATIBLE WITH BLK VALUE OTATIO COMPATIBLE WITH BLK VALUE SING ORRECT NCORRECT NCORRECT NCORRECT 10 USEPW INCOR RECT 10 LOGPASS INCORRECT 160 RPB PARAM ISSING 987 2135 8 Anhang Mnotes MACRO NOTE YCLOSE NOTE 160 PARAMETER MISSING OTE 160 AID NOT IN REGISTER NOTATION YCLSCON NOTE 160 RPB PARA ISSING YCONN NOTE 160 LINK PARAMETER MISSING OTE 160 LINK INCORRECT OTE 10 PTNNAME INCORRECT OTE 10 PRONAME INCORRECT OTE 10 USERFLD INCORRECT OTE 10 LOGPW I
127. ALN L AAREA OPTCD SPEC TOVAL 30 MVI AKTDIST 1 TRECEIVE BAL 14 FDBKTRC CLM 15 8 ALI YDDFSUCC BNE 1 CLM 15 2 ALI YDDFTSTA BE CONTINUE DER TERMINALBEDIENER HAT VOR DEM ABFRAGEN DER STATUSNACHRICHT EINE NACHRICHT EINGEGEBEN SIE WURDE TROTZ FEHLENDER STATUS NACHRICHT EMPFANGEN UND KOENNTE HIER AUSGEWERTET WERDEN 1 BCT 2 WAIT STATUSNACHRICHT NICHT ERHALTEN VERBINDUNG WIEDER SCHLIESSEN B CLSCON CONTINUE DS OH S EEE x INFORMIEREN UEBER DIE MOEGLICHEN ZEICHENSAETZE V YINQUIRE RPB RPB1 OPTCD MONCHARS AAREA STATUS AAREALN STALENG VI AKTDIST 1 TINQUIRE BAL 14 CLI STADIM4 Y BE DIMO2 DIMO1 DS OH VI AREA NP NEUE BILDSCHIRMSEITE B DIMO3 DIMO2 DS OH VC AREA 8 D27X132 NEUE SEITE amp DIM 27X132 DIMO3 DS OH Ku SENDEN UND EMPFANGEN VON NACHRICHTEN p AAREA 8 OWNNAME AAREA49 8 OWNPROZ AAREA 432 8 PTNNAME AAREA441 8 PTNPROZ LOOP DS OH x SENDEN NACHRICHT A o o 4 4 SEND YSEND RPB RPBI AREA AREA AREALN L AREA L AAREA MVI AKTDIST 1 TSEND BAL 14 MVI AAREA C MVC AAREAH1 L AAREA 1 AAREA EINGABENACHRICHT EMPFANGEN p RECEIVE YRECEIVE RPB RPBl AAREA AAREA AAREALN L AAREA TOVAL 120 CLM 015 8 ALI YDDFSUCC BE RECOK MVC AAREA
128. AN DEN PARTNER ISOBS01 AB gt DIE APPLIKATION 150 501 USS VOR DE ERBINDUNGSWUNSCH VON 150 502 EROEFFNET WERDEN IT HILFE DES LINKNAMENS KOENNEN DIE EIGENEN UND DIE PARTNERNAMEN O B A Sc R ABLAUF NOCH GEAENDERT WERDEN WIRD KEIN SET DCAM CONNECTION LINK GESETZT SO ERWARTET DAS PROGRAMM DEN PARTNER IM EIGENEN RECHNER NACH EMPFAENGT DAS PROGRA NACHRICHTEN AUF EIN ENDEKENNZEICHEN HIN SENDET DAS PROGRAMM EINE ANTWORT WARTET AUF VERBINDUNGSABAU DURCH DEN PARTNER FDBK WERTE WERDEN NACH SYSOUT AUSGEGEBE EEEO x x O x YDDACB D EQU N EGECT YDDCCB D EGECT YDDRPB D EGECT ISOBS02 CSECT BALR 10 0 USING 10 USING YDDACB 5 USING YDDCCB 6 USING YDDRPB 7 LA 5 ACBl LA 6 CCBI LA 7 RPBI EROEFFNEN DER ANWENDUNG YOPEN ACB 5 MVI AKTIND DOPEN BAL 14 DUMPRC AUFBAU DER VERBINDUNG L 2 YDDAAID YOPNCON RPB 7 AID 2 MVI AKTIND DOPNCON BAL 14 DUMPRC 9 9 RECCYCLE DS OH YRECEIVE RPB 7 L 4 YDDRARCL CVD 4 DW UNPK RECLN DW OI RECLN L RECLN 1 X FO 987 2135 8 DCAM ISO Transport Service Beispiele U987 J Z135 8 MVI _ AKTIND DRECEIVE BAL 14 CLI 1 YDDRSUWA FEHLER AUFGETRETEN BH ENDERR DCAM FDBK AUSWERTEN CLI AAREAL C E ENDE DER DATEN BE ENDREC EMPFANGENE NACHRICHT
129. Aufforderung zum Verbindungsaufbau gemeldet durch Aktivieren einer LOGON Contingency Routine vom Kommunikationspartner mit dem Namen PARTNER der am Prozessor mit dem Namen PROZ angeschlossen ist soll zur ckgewiesen werden 1 1 PRONAM BEREICH 987 2135 8 LOGON Contingency YINQUIRE YREULOG YRPB YCCB DC DS BAR ONAI gaauyap IWW 2 T Q w Routine BEREICH Bl m PTNNAM RONAM 32 bei ISO 117 YCHANGE Eigenschaften einer Verbindung ndern 3 2 4 Eigenschaften einer Verbindung ndern Makroaufrufe Steuerbl cke und Register Besch Speicherpereiche im Anwendungsprog AID register r gt Register n Nummer des Registers AID Kennzeichen der Anwendung 2 RPB addr1 GE CCB relexp 1 ACB relexp 2 VCBADR relexp 3 FDBK R ckmeldung siehe Anhang Seite 298 Register 15 siehe Anhang Seite 298 g DCAM gibt FDB 1 FDB 2 FDB 3 FDB 4 zur ck 1 Byte 1 Byte 1 Byte 1 Byte ACB Steuerblock mit g ltigem Kennzeichen AID CCB NEA ISO PROC SYSCODE BINARY 5 C USERFLD onstante 2 2 PROC TRUNC KEEP 3 falls EDIT USER gesetzt wurde EDITIN Se falls 7 EDIT SYSTEM gesetzt wurde EDITOUT ola falls 9 EDIT SYSTEM gesetzt wurde
130. B TERMINAL STATUS INCOMPLETE TERMINAL STATUS COMPLETED THE FOLLONING EQUATES ARE VALID IF SUWA IS SET IN FEEDBACK FIELD 1 04 NN 347 Steuerbl cke und R ckmeldungen 348 NNNNNNNNNONNNONNNNNNNNNNNNNNNONYNNNNNNNNNNNNNONNNONONNNNNNNNNNNNNONNDODNNNNANN YDDRTRYL YDDRBSHO YDDRWTGO YDDRNOCB YDDRNOID YDDRNMEM YDDRPTSH YDDRNMAX YDDREDPE YDDRDVHD YDDRMSGL YDDRVTNA YDDREVTS YDDRENPT EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU RBCAI RBCAA RBCAS RBCAO EQU EQU EQU EQU AKAKAKAKK RFDB4 DS RFD4N EQU RMSG RGO RPTCK RNTCK REXPD EQU EQU EQU EQU EQU Anhang X 04 CONTRADICTION IN DATA CODE X 087 NO INPUT AVAILABLE x 0c NO LOGON REQUEST QUEUED X 10 REQUEST CANCELED BY TIMEOUT X 14 LOSS OF DATA DUE TO TIMEOUT X 18 LOGON REQUEST CANCELED TIMEOUT X 20 LOGO ESSAGE TRUNCATED X 24 EDIT ERROR OCCURRED X128 PTNCHAR TRUNCATED XK 2C OUTPUT TRUNCATED X 30 INVALID EDIT OPTIONS X 34 REQUEST TERMINATED BY YRESET X 44 LOCAL HARDCOPY NOT ASSIGNED X 48 NEW LINE CHAR WHILE EXTEND Y THE FOLLOWING EQUATES ARE VALID IF RDCS IS SET IN FEEDBACK FIELD 1 AND SHOR IS SET IN FEEDBACK FIELD 2 X 1004NN X 047 BCAM TRY 1 0 LATER X 087 BCAM
131. B das g ltige Kennzeichen in den RPB eingetragen worden sein 2 die Adresse des Steuerblocks CCB der Adressen von Feldern mit Partner und Pro zessornamen enth lt Wartet eine Verbindungsaufforderung zu dem dort adressier ten Partner auf die Annahme wird sie gel scht 987 2135 8 121 YCLSCON 122 Beispiel Aufforderung zur cknehmen Der Verbindungswunsch der an einen im Steuerblock CCB an Adresse CCBNAM adres sierten Partner gerichtet war soll aufgehoben werden RPBNAM CCBNAM PTNAD PROAD YCLSCON YRPB YCCB DC DC C PTNNAME PTNAD P C C RPB RPBNAM CB CCBNAM RONAME PROAD L87PARTI L8 PROZO 987 2135 8 Verbindung abbauen YCLSCON 3 2 6 Verbindung abbauen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register PT gt Register n Nummer des Registers AID Kennzeichen der Anwendung il CID register Register m Nummer des Registers CID Kennzeichen der Verbindung 2 RPB addr1 YCLSCON RPB NEA ISO ACB relexp 1 CCB relexp 2 FDBK R ckmeldung siehe Anhang Seite 298 A DCAM gibt zur ck Register 15 siehe Anhang Seite 298 FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte CCB Steuerblock mit g ltigem Kennzeichen CID ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse
132. BUF TERM 100 MOD INDATA 4 ENDIND CLSAPPL ZU CONSOLE AUFBAU 2 ARECRPB 3 AIDO 4 ACCB 5 INLEN 5 CORRLEN 3 NAREAZAID LENGTH 4 FIELDS AID N TIMEOUT RUECKSETZEN E LINE ICFD Y S EN PNCON RPB 2 AID 3 CCB 4 AREALN 5 TOVAL 30 I LR SVCIND DOPNCON 6 7 PROGSTA ENDPROG CLSAPPL PROGSTA NOCONN TIMEOUT RETRY 987 2135 8 DCAM NEA Beispiele CID IN SICHERSTELLEN MVI GSVCIND DSHONCB YSHOWCB BLK CCB BLKADDR 4 WAREA CID0 LENGTH 4 FIELDS CID BALR 6 7 AID UND CID AUCH IN SENDERPB EINTRAGEN 4 CIDO L 5 ASNDRPB YMODCB BLK RPB BLKADDR 5 AID 3 CID 4 MVI GSVCIND DMODCB BALR 6 7 EJECT STXIT ROUTINE DEKLARIEREN STXIT ESCPBRK STX 0 EJECT LOOP DS OH XC RECLEN RECLEN NI PROGSTA 255 TIMEOUT RUECKSETZEN SPACE 3 YRECEIVE VON CONSOLE YRECEIVE RPB 2 TOVAL 600 MVI _SVCIND DRECEIV BALR 6 7 T PROGSTA NOCONN ENDPROG BNZ CLSAPPL T PROGSTA TIMEOUT BNZ LOOP LAENGE DER EMPFANGENEN DATEN ERMITTELN YSHOWCB BLK RPB BLKADDR 2 WAREA RECLEN LENGTH 4 z FIELDS ARECLN MVI GSVCIND DSHOMNCB BALR 6 7 SPACE 3 NACHRICHT AUSGEBEN UND NEUEN YRECEIVE ABSETZEN z 8 RECLEN LTR 8 8 BZ LOOP LA 8 5 0 8 STH 8 WRLEN WROUT RECAREA TERM B LOOP SPACE 3 U987 J Z135 8 261 Beispiele 262 ANWENDUNG HUGO SCHLIESSEN CLSAPPL M
133. Beschreibung der VTSU Schnittstelle mit dem VTSU Control Block den logischen Steuer zeichen und den Statusinformationen finden Sie im Handbuch VTSU R ckmeldungen Die Tabelle der R ckmeldungen wurde um neue R ckmeldungen erweitert Readme Datei Funktionelle nderungen und Nachtr ge der aktuellen Produktversion zu diesem Hand buch entnehmen Sie bitte ggf der produktspezifischen Readme Datei Sie finden die Readme Datei auf Ihrem BS2000 Rechner unter dem Dateinamen SYSDOC produkt version READ ME D Die Benutzerkennung unter der sich die Readme Datei befindet erfragen Sie bitte bei Ihrem zust ndigen Systemverwalter Die Readme Datei k nnen Sie mit dem Kommando sHow FILE oder mit einem Editor ansehen oder auf einem Standarddrucker mit folgendem Kommando ausdrucken PRINT FILE FILE NAME dateiname LAYOUT CONTROL PARAMETERS CONTROL CHARACTERS EBCDIC 987 2135 8 1 3 987 2135 8 Vervvendete Metasprache Einleitung Um eine m glichst einfache Handhabung zu bieten sind in dieser Beschreibung Zei chen als sogenannte Metasymbole vervvendet die bereits vveitgehend aus anderen Benutzerhandb chern des BS2000 bekannt sind Sie sind in der folgenden Tabelle erl u tert Zeichen Konstanten sind in GroB buchstaben dargestellt die der Anvender in dieser Form angeben mu GROSSBUCHSTABEN Variablen sind in Klein buchstaben dargestllt deren Inhalt von Fall zu Fall verschieden sein kann Der
134. C Kr EQU MESSAGE EQU cC r DC C 0123456789ABCDEF DCAM STEUERBLOECKE YACB APPNAME OWNNAME PRONAME OWNPROZ LINK LNKO LINKMOD TEMP YCCB PTNNAME PTNNAME PRONAME PTNPROZ LINK LNKO LINKMOD PERM EDIT SYSTEM PROC TERMSTAT YRPB 1 1 AREA AREA AAREA AAREA OPTCD 5 KONSTANTEN DS OF DC CL8 TERMSTA1 DC L qE DC CL50 VERBUNDEN MIT Rs DC PL2 0 DC Pole DC Cr 5 0 CL8 DC ALI NP ALI EXT ALI DIM DC 27122 DCSTA C TYPE MONCS EQU STATUS VTCSET END 987 2135 8 DCAM NEA Beispiele Beispiel2 In diesem Beispiel wird die Kommunikation mit der Systemanwendung 6CONSOLE sowie die Verwendung von YGENCB demonstriert Das Programm eroeffnet die Anwendung HUGO und versucht nach Eingabe der LOGON MESSAGE eine Verbindung zu aufzubauen Bei Gelingen wird eine STXIT Routine zur Behandlung von Break und Escape Unterbre chungen aktiviert im Fehlerfall wird wieder zur Eingabe der LOGON MESSAGE aufgefor dert Anschliessend wird ein synchroner YRECEIVE abgesetzt Falls der Aufruf ohne Fehler beendet werden konnte wird die Laenge der Nachricht mit YSHOWCB geholt und die Nachricht am Bildschirm ausgegeben bei Zeitablauf erfolgt in einer Schleife ein neuerlicher YRECEIVE bei anderen Fehlern wird das Programm beendet Bei Eintritt des STXIT Ereignisses wird vom Benutzer eine Eingabe erwartet
135. CAM Anvendung R cknahme einer Aufforderung oder Abbau einer Verbindung Speichern von Angaben zur Verbindung in der CLT und auch L schen dieser Angaben Erzeugen eines Verteilcode Gruppenblocks bei DCAM NEA Transport Service Anwendungen Erzeugen eines Verteilungsparameterblocks bei DCAM NEA Transport Service Anwendungen Erzeugen eines Ereignis Meldungsblocks der asynchrone Meldungen mit Contingency Routinen verkn pft Aufhebung einer Zuordnung des Verteilungsnamens zu einer Verteilcodegruppe bei DCAM NEA Transport Service Anwendungen Erzeugen eines oder mehrerer Steuerbl cke einer beliebigen Art Abfrage von Informationen ber Anwendungen und Verbindungen ndern von Feldern in bestehenden Steuerbl cken Er ffnen einer DCAM Anwendung Aufbau einer Verbindung 155 Makroaufrufe 156 Makroaufruf YPERMIT YRECEIVE YREJLOG YRESET YRPB YSEND YSENDREC YSETLOG YSHOWCB YTESTCB Daten ber mittlung Daten ber mittlung Verbindung Dater ber mittlung Daten ber mittlung Daten ber mittlung Existenz Beschreibung Zuordnung des Verteilungsnamens zu einer Verteilcodegruppe bei DCAM NEA Transport Service Anwendungen Empfang einer Nachricht Expre nachricht oder Transportquittung bei DCAM NEA Transport Service Anwendungen Empfang einer Nachricht bei DCAM 1SO Transport Service Anwendungen Zur ckweisen einer Aufforderung zum Verbindungsaufba
136. CAM Fehlers xixixixixixix x x x x x ix ix 08 2c Erzvungene Beendigung der DCAM Anvendung wegen der Angabe eines ung ltigen Contingency Ereigniskennzeichens durch die Prim rtask 08 30 Erzvungene Beendigung der DCAM Anvendung wegen der Angabe eines ung ltigen Contingency Ereignis Kennzeichens d d Sekund rtask x x x 08 34 Erzwungene Beendigung der DCAM Anwendung durch die Beendigung der Prim rtask xix x x x x 08 38 Beendigung der DCAM Anwendung durch eine Anforderung der Prim rtask x 304 987 2135 8 Anhang Tabelle der R ckmeldungen R ckmelde Feld Bedeutung Makroaufruf F F F E Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OT O G TI TI I I R T N N G G E R T D V E E E C 08 3C Beendigung der DCAM Anwendung durch eine Anforderung einer Sekund rtask x x 08 40 F r diese Task wurden zu viele Aufrufe gleichen Typs gleichzeitig gegeben max 8 bei YOPNCON ACQUIRE 128 erlaubt x x x 08 44 Die DCAM Anwendung ist nicht aktiv x 08 48 ung ltiges Kennwort USEPW x 08 4C Die Task hat zu viele Anwendungen er ffnet x 08 50 Zu viele nicht vordefinierte Anvendungen f r eine Task x 08 54 ung ltige Kennvort bei existierenden RDF Kennvort x 08 5
137. CB in den RPB Steuerblock eingetragen worden sein Beispiel In einer DCAM Anvvendung soll die Task die beim Er ffnen den Verteilungsnamen BETA angegeben hat Nachrichten ber die Verteilcodes erhalten die im Verteilcode Gruppenblock DCG an der Adresse DCGAD beschrieben sind YPERMIT RPB RPBAD RPBAD YRPB ACB ACBAD AREA DISNAM2 AAREA DCGAD ACBAD YACB DCGAD YDCG RE Beschreibung wie z B beim YOPNCON festgelegt DISNAM2 DC CL8 BETA 142 987 2135 8 Verteilcode Zuordnung steuern YFORBID 3 3 5 2 Zuordnung aufl sen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anvendungsprogramm AID register mer nm Register n Nummer des Registers AID Kennzeichen der Anwendung 2 RPB addr1 YFORBID RPB NEA ISO AREA relexp 1 Verteilungsname 8 Byte ACB relexp 2 FDBK R ckmeldung siehe Anhang Seite 298 1 Register 15 siehe Anhang Seite 298 DCAM gibt zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der den Aufruf beschreibt Es soll die Zuordnung zum Verteilungsnamen aufgehoben werden Dazu mu angegeben werden 1 die Adresse des Feldes in dem der Verteilungsname steht f r den die Zuordnung aufgehoben werden soll 2 entweder die Adresse des ACB Steuerblocks de
138. CON OPTCD ACQUIRE ggf mit einer maximalen Zeitangabe TOVAL Der Auftrag bleibt in der Warteschlange bis der Befehl ausgef hrt werden kann z B bergabe der Nachricht bei YRECEIVE oder die maximale Wartezeit abl uft oder ein Fehler auftritt z B der Partner baut die Verbindung ab 987 2135 8 31 Befehle ausf hren 32 4 Schritt Asynchrone Ausf hrung Ferner mu das Ereigniskennzeichen EID angegeben werden wenn ein YSEND oder YSENDREC auf einer Verbindung ausge f hrt werden soll die mit YOPNCON PROC SIGNAL aufgebaut wurde Kann die Nachricht infolge eines Datenstaus auf der Verbin dung nicht an den Partner bermittelt werden so bricht DCAM den Aufruf mit FDBK X 10040C00 Wait for GO ab DCAM gibt nach Behebung des Datenstaus das GO Signal Bis zur Beendigung des Auftrags bzw Eintreffen des GO Signals bleibt der RPB gesperrt Zur Auswertung der R ckmeldung sollte Register 15 verwendet werden da das Feld FDBK im RPB unter Umst nden bereits das Ergebnis des Auftrags enth lt F r das Ereigniskennzeichen EID wird DCAM einen Eintrag Ereignis Signal machen sobald die Ausf hrung erfolgreich oder nicht erledigt ist z B die Nachricht im Benutzerspeicher einge tragen wurde oder die Wartezeit abgelaufen ist Mit dem Aufruf SOLSIG solicit signal kann der Anwender das Ereignis bzw Signal zur Verarbeitung anfordern Dieser SOLSIG Aufruf kann wiederum synchron oder asynchron abgesetzt werden
139. D YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD RRDCS RINRU RRPAR RBCBR RCONS RSYSX RFDB2 RFD2N RNOTO RALRO RNOSH RONEO RVERO RSECO RDIS RFCLW RFCL RFCLD RFCEP RFCSE RFC R R 1 RFDIS RPCSP RPCSS RPCST RPCA RMESL RWRCP RSQUS RNOEX RNUSD EQU EQU EQU EQU EQU EQU AKAAKAKAKK DS EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU X 10 X 14 X 18 X 20 X 24 X FEEDBACK FIELD 2 XLI X 007 THE FOLLONING EQUATES ARE VALID IF IN FEEDBACK FIELD 1 Steuerbl cke und R ckmeldungen REQUEST REJ DUE TO DCS STATE INVALID REQUEST USAGE REQUEST REJ DUE TO BAD PARAM BAD CONTROL BLOCK PL REFERENCE CANNOT CONNECT TO SS RESERVED FOR SYSTEM EXITS kkkxkxkkxkkxkxkxkxkkxkkkkkkkkkkkkkkkkkkxk REASON FOR REJECTION X xx kkkox NO DICATION IN FDBK FIELD 2 RAPS IS SET k k iki x 08 X 047 APPLICATION NOT OPENED X 087 APPLICATION ALREADY OPENED X 0C APPLICATION IS NON SHARABLE X 10 NO MORE THAN ONE OPEN IS ALL
140. DCAM NEA Transport Service Anvvendungen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register peia gt Register n Nummer des Registers AID Kennzeichen der Anwendung 4 CID register px m gt Register m Nummer des Registers CID Kennzeichen der Verbindung 5 RPB addr1 YINQUIRE RPB NEA AAREA relexp 1 AAREALN absexp 2 OPTCD PEROTERM 3 ACB relexp 4 CCB relexp 5 FDBK R ckmeldung siehe Anhang Seite 298 DCAM gibt zur ck Register 15 siehe Anhang Seite 298 Feld f r Peripherie FDB 1 FDB 2 FDB 3 FDB 4 siehe Handbuch VTSU 1 Byte 1 Byte 1 Byte 1 Byte Kapitel Statusinformation 8 Byte CCB Steuerblock mit g ltigem Kennzeichen CID ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der die DCAM Anwendung beschreibt 104 987 2135 8 Peripherie YINQUIRE Es sollen Informationen ber die Peripherie abgefragt werden Dazu mu angegeben werden 1 die Adresse eines 8 Byte langen Bereichs in den Informationen ber die Peripherie eingetragen werden sollen siehe Handbuch VTSU Kapitel Statusinformation die L nge des Bereichs in den DCAM die Information eintr gt Ist die Information l nger als der Bereich wird der YINQUIRE abgewiesen DCAM gibt den Returncode FDBK 04 00 28 z
141. DDANMAX EQU YDDAEDPE EQU YDDADVHD EQU YDDAMSGL EQU YDDAVTNA EQU YDDAEVTS EQU YDDAENPT EQU YDDABCAI EQU YDDABCAA EQU YDDABCAS EQU YDDABCAO EQU k k k k Xx k xx k xx 7k xx x x YDDAFDB4 DS YDDAFD4N EQU YDDAMSG EQU Steuerbl cke und R ckmeldungen X 807 TERMINAL STATUS COMPLETED THE FOLLONING EQUATES ARE VALID IF SUWA IS SET IN FEEDBACK FIELD 1 X 04 NN X 047 CONTRADICTION IN DATA CODE X 087 NO INPUT AVAILABLE KOCH NO LOGON REQUEST QUEUED X 10 REQUEST CANCELED BY TIMEOUT X 14 LOSS OF DATA D E TO TIMEOUT XA LOGON REQUEST CANCELED TIMEOUT X 20 LOGON MESSAGE TRUNCATED X 24 EDIT ERROR OCCURRED X 28 PTNCHAR TRUNCATED XTZ OUTPUT TRUNCATED X 30 INVALID EDIT OPTIONS X 34 REQUEST TERMINATED BY YRESET X 44 LOCAL HARDCOPY NOT ASSIGNED X 48 NEW LINE CHAR WHILE EXTEND Y THE FOLLOWING EQUATES ARE VALID IF RDCS IS SET IN FEEDBACK FIELD 1 AND SHOR IS SET IN FEEDBACK FIELD 2 X 1004NN X 047 BCAM TRY 1 0 LATER 087 BCAM SHORTAGE OF RESOURCES X 0C BCAM WAIT FOR GO X 20 DCAM NO CONTROL BLOCK AVAILABLE X 24 DCAM NO ID ENTRY AVAILABLE X 287 DCAM NO MEMORY AVAILABLE X 2c DCAM SH RES AT PTN S SYSYTEM X 30 NAME MANAGER MAX NAME THE FOLLONING EQUATES ARE VALID IF RPAR IS SET IN FEEDBACK FIELD 1 AND EDER IS SET IN FEEDBACK F
142. DDCPCL5 YDDCACL5 YDDCPERM YDDCDIFL YDDCLINK YDDCMXLN YDDCED YDDCEDUS YDDCEDSY YDDCEDSM 987 2135 8 EQU DS EQU EQU EQU EQU EQU EQU EQU DS DS EQU EQU EQU EQU EQU EQU EQU DS DS DS DS EQU EQU EQU DS DS DS DS DS DS DS DS DS DS DS EQU END X 01 XLI Xx 807 X 40 X 20 X 10 2027 X 047 X 067 X 80 X 407 X 20 X 087 X 047 X 02 X 01 x X 01 X 047 X 087 OCL8 LI L3 L4 DOO m m x 8XL1700 YDDCHDTY YDDCCB 030 R R R PD D FO DI Al BYTE ED ED ED PA PA PA FO FO RO Al LE 910919 ROC ROC APPSTART ROC ROC ACTIVE PEDIT LINKMOD LINK AXIMAL LENGTH Steuerbl cke und R ckmeldungen LAGBYTE 2 BINARY SIGNAL TERMSTAT IO 1 IO 2 3 FLAG FLAGBYTE 3 PROT SYSTEM SYSTE ROC PTNSTART R INTERNAL USE PER D IS USED OF MESSAGE RESERVED FOR EDIT IT USER IT SYSTEM IT DSSIM RTNER CHARACTERISTIC RTNER TYP
143. DFIPCA EQU YDDFBATR EQU YDDFNVCB EQU YDDFBVCB EQU YDDFIVCB EQU YDDFIROU EQU YDDFIRLN EQU kkkxkxkxkxkxkxkxkxkxk kxx xx x YDDFFDB3 DS YDDFFD3N EQU X 14 207 DCS ERROR DCAM IS LOC THE FOLLOWING EQUATES ARE VALID IF IN FEEDBACK FIELD 1 x 04 X 087 X 0C X 10 X 14 X 18 X 14 kkkxkf INVALID REQ NOT ALLOWED NOT ALLOWED EQUIVALENT APPICATION SYN REQUEST Anhang KED INRU IS SET UEST FOR SECONDARY FOR NONSHARE APPL WITH ATTR NLOGON REQUEST PENDING OT AUTHORIZED ALREADY QUEUED THE FOLLOWING EQUATES ARE VALID IF RPAR IS SET IN FEEDBACK FIELD 1 X 047 X 087 X 0C X 10 X 14 X 18 XLC X 20 X 24 X 28 x 2C X 30 X 34 X 38 x 3c X 40 X 44 X 48 X 4C X 50 X 54 X 587 X X 60 X 64 X 687 X T8 Nxrxxx INVALID ACB ADDRESS INVALID CCB ADDRESS INVALID DCG ADDRESS INVALID DIP ADDRESS INVALID ENB ADDRESS INVALID APPNAME ADDRESS INVALID DISNAME ADDRESS INVALID PTNNAME ADDRESS INVALID AREA ADDRESS INVALID AAREA ADDRESS INVALID APPLICATION NAME INVALID DISTRIBUTION NAME INVALID PARTNER NAME INVALID PROCESSOR NAME SEQUENCE NUMBER TOO HIGH AAREALN LESS THA INVALID SUBFUNCTION INVALID PRONAME ADDRESS NEGATIVE AREALN EDITING ERROR INVALID CODELN PTNCH
144. EF2 INCORRECT OTE 1 SUBOPERAND CONFLICT YPLI NOTE 10 MF INCORRECT STANDARD FORM ASSUMED OTE 10 FIELDS SUBOPERAND INCORRECT T OTE 10 FIELDS SUBOPERAND NOT COMPATIBLE WITH BLK OTE 10 USEPASS CORRECT OTE 10 USEPW INCORRECT OTE 10 LOGPASS INCORRECT OTE 10 ISO INCORRECT OTE 10 ATTR INCORRECT OTE 10 ATTR SUBOPERAND CONFLICT OTE 10 VERIFY INCORRECT OTE 10 DCAMVER INCORRECT OTE 10 LOGPW INCORRECT OTE 0 PARAMETER DEPROT REMOVED FROM THE DCAM INTERFACE 987 7135 8 365 Mnotes MACRO YAPPL YCHANGE 366 NOTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE OTE NOTE OTE OTE OTE OTE OTE OTE NOTE 10 EDIT INCO RRECT 10 EDITIN INCORRECT 10 EDITIN SUBOPERAND CONFLICT 10 EDITOUT I 10 EDITOUT S 10 10 10 PRIO AXLN OVE INCO 10 PTNTYPE I CORRECT UBOPERAND CONFLICT REFLOW DATA INCORRECT RRECT CORRECT Anhang 0 PARAMETER PDEPROT RE 10 PEDIT 10 PPROC 10 PROC 10 PROC 10 PTNCH D D D D INCOR INCOR SUBOPE LN OVE RECT RECT INCORRECT RAND CON REFLOW 10 USER 10 OPTCD INC 10 OPTCD SUB 10 EIDREF IN 10 EIDREF2 I 10 TOVAL OUT 160 REQTYPE 10 SEQNO OUT 10 USERFLD I 10 GID NOT I 10 NUMBER OF 10 CODEV
145. EN START YDDDCG D DSECT DC CL3 DCG DC CL1 D DC 071 DS H DS CLI EQU X 807 DS 1 DS 0CL8 DS XL8 DS XL8 DS XL8 DS XL8 DS XL8 DS XL8 DS XL8 DS XL8 DS OF DS H DS H EQU YDDGHDTY x YDDDCG END EXTERNAL SYMBOL DICTIONARY HEADER OF CONTROL BLOCK DCG BODY OF CONTROL BLOCK L2 YDDGLEN 2 YDDGHDTY 910919 TYPE OF CONTROL BLOCK DCAM CONTROL BLOCK DCAM INTERFACE VERSION DCG LENGTH OF BODY NUMBER OF DISTRIBUTION CODES PICATION DISTRIBUTION CODES FLAGBYTE CODE MODI 1 CODEVAL 2 CODEVAL 3 CODEVAL 4 CODEVAL 5 CODEVAL 6 CODEVAL 7 CODEVAL 8 CODEVAL IDENTIFIER OF DCG LENGTH OF CONTROL BLOCK 55616017 337 Steuerbl cke und R ckmeldungen Anhang 338 Makro YDDDIP Mit dem Makroaufruf YDDDIP kann ein Pseudo Abschnitt CSECT oder DSECT f r den Steuerblock DIP angelegt werden Format Name Operanden symbol YDDDIP E lc prefix Operanden symbol gibt die symbolische Adresse f r den Makroaufruf an Wird keine Adresse angegeben so wird die Adresse YDDD P erzeugt gibt an was generiert werden soll Pl D verlangt die Generierung eines Pseudoabschnitts c verlangt die Generierung eines Code Abschnitts prefix gibt eine Zeichenfolge von maximal 4 Zeichen an die den Namen vorangestellt wird Ohne diese Angabe wird die Zeichenfolge YDDD jeweils dem symbolischen Namen
146. EONO register Die Zuordnung einer Nachricht zu der dazugeh rigen Transportquittung wird ber diese Nummer hergestellt Die Nummer wird wenn eine TACK Contingency Routine definiert worden ist im Register 7 bergeben Andernfalls kann die Nummer beim Empfang der Quittung im TACKNO Feld siehe Anhang Seite 291 des RPB Steuer blocks auf den sich der Empfangsaufruf bezieht abgeholt werden Die Nummer der Nachricht kann vom Partner im ASEQNO Feld siehe Anhang Seite 291 des RPB Steuerblocks auf den sich der Empfangsaufruf bezieht abgeholt werden Dort steht entweder die im SEQNO Operanden angegebene Nummer DCAM Anwendung oder eine vom Datenkommunikationssystem erzeugte wenn der Absender eine Datenstation war VCBADR relexp nur bei NEA Transport Service und EDIT SYSTEM Adresse eines Bereiches in den der VTSUCB bergeben wird Ist VCBADR NULL wird der VTSUCB des Anwenders in die DCAM interne Datenstruktur kopiert Die Nachrichte naufbereitung erfolgt nach den Optionen die im VTSUCB festgelegt wurden Ist VCBADR NULL so wird die interne Kopie des VTSUCB gel scht Die Nachrichte naufbereitung erfolgt nach den Optionen die im CCB festgelegt wurden Dieser Operand wird ausgewertet bei YCHANGE YINQUIRE YSEND YRECEIVE und YSENDREC mit OPTCD VTSUCB Hinweis Bei gleichbleibenden EDIT Optionen reicht es den VTSUCB einmal an DCAM zu bergeben z B mit YCHANGE RPB OPTCD VTSUCB VCBADR Die EDIT Optionen des VTSUCB k
147. EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ X 0C X 10 X 14 X 18 X 1C X 20 X 24 X 28 X 2C X 30 X 34 X138 xX 3c X 40 X 44 X 48 X 4C X 50 X 54 X 587 X 5C X 60 X 64 X 687 X 6C 27 07 X 74 X 78 X 80 X 84 X 887 X 8C X 90 X 94 X 98 X 9C X A4 X A8 X AC X B X B4 X B8 X BC X co x ca x c8 X EC X D X D4 Steuerbl cke und R ckmeldungen LOGON R INVALID INVALID CNNECTI PARTNER PARTNER CHANGE PARTNER PARTNER ESSAGE WRONG C SEQUENC EXPRESS NO USER INVALID SYSTEM PARTNE PARTNE PARTNE INVALI REQUES HA I N N PTNC INVAL PARTNER N I A 5 U APPLICA INVALID PROPOSE PROP N D C D E U 5 N W TN PRO ONN RE ROTOCO XPEDIT NRECOV TATION ROCESS O TASK RONG C INTERNAI EQUEST QUEUED DID LID ON CLOSED BY USER REQUEST FORCED DISCONNECTED IN CS STATE PENDING TO CA NOT ALLOWED IN CS FOR ANOTHER TASK IN CA STATE IS TOO LONG ODE POSITION E ALREADY USED OT ALLOWED DATA WITH REJLOG DEPROT EDIT TIMEOUT OT AVAILABLE IN STOP STATE IN NLOGON STATE LOGPW REJECTED OT
148. EQU DC EQU DC EQU DC EQU DC EQU DC DS DS DS DS DS DC DC DC DC DC YACB YCCB YRPB DS DS END CL8 H MESSEND MESSAGE m n Lg v Bart LBE Gr x C 0123456789ABCDEF 0 Y C C C C F OH x AKTDIST C YOPEN AKTDIST C YCLOSE AKTDIST C YOPNCON AKTDIST C YCLSCON AKTDIST C YGENACB AKTDIST C YGENCCB AKTDIST C YGENRPB AKTDIST C YRECEIVE AKTDIST C YSENDREC D A A A A C 150 502 150 501 ce F C ISOBS02 APPNAME OWNAPPL PRONAME OWNPROZ DCAMVER 8 0 ISO Y LINK LINKNAME LINKMOD PERM PTNNAME PTNAPPL PRONAME PTNPROZ RLTH 500 MDATA Y LINK LINKNAME LINKMOD PERM AAREA AAREAIl AAREALN L AAREA1l ACB ACB1l CCB CCBl OPTCD Q CS ACQUTRE SPEC SYN TOVAL 240 C L32 11024 U987 J Z135 8 987 2135 8 DCAM SYSTEM EXIT Der DCAM System Exit Einleitung Der DCAM System Exit bietet dem Anvvender die M glichkeit DCAM Funktionen zu erweitern zu ndern und eigene spezielle Funktionen hinzuzuf gen Solche Funktionen sind beispielsweise ber TRANSDATA hinausgehender Datenschutz durch erweiterte Berechtigungspr fungen z B abh ngig von der USERID das ffnen von Anwendungen zulassen oder f r eine Anwendung einen Verbindungsaufbau nur mit
149. F F F Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OT O G T TI I I R T N N G G E R T D V E E E C 04 Makroaufruf mit Warnung beendet x x xix 04 04 s u Widerspr che in der Datenverschl sselung BINARY SYSCODE x x 20 1 wie f r 1 00 x x 7 2 1 04 08 keine Eingabedaten vorhanden OPTCD NO x x 04 oc keine Aufforderung oder keine Aufforderung mit passender EDIT Option zum Verbindungsaufbau in der Warteschlange x x 04 10 Makroaufruf beendet wegen Zeitablauf TOVAL x x x 04 14 Verlust von Daten vegen System Zeitablauf veil die Nachricht als gest rt gekennzeichnet var 04 18 In einer Warteschlange stehende Aufforderung zum Verbindungsaufbau annulliert wegen System Zeitablauf x 04 20 Verbindungs Nachricht abgeschnitten x x 04 24 Fehler in der Nachrichtenaufbereitung x x x 04 28 Information nicht vollst ndig bergeben YINQUIRE abgebrochen 22 04 2C Ausgabe wurde gek rzt aufbereitete Nachricht war zu lang x x 04 30 Ung ltige Angaben f r Nachrichtenaufbereitung Anderung wurde nicht ausgef hrt x 04 34 Aufruf beendet durch YRESET 04 44 Kein Drucker f r Datenausgabe betriebsbereit x x 04 48 Unzul ssiges Kontrollzeichen NL wurde einge geben bei EXTEND bei 3270 un
150. F xx Kennzeichen wurde nach YOPEN sichergestellt Kennzeichen wurde nach YOPNCON sichergestellt Beispiel f r nderung von Steuerblockfeldern mit YMODCB Zum ndern der Inhalte eines oder mehrerer Felder eines Steuerblocks kann der Aufruf YMODCB verwendet werden Der Aufruf YMODCB kann nur benutzt werden wenn das DCAM Subsystem erfolgreich geladen wurde Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolgreich abge setzt hat kann er trotz HOLD Subsystem oder DELETE Subsystem bis Taskende mit DCAM arbeiten gilt auch f r Welche Felder ge ndert werden k nnen ist der Tabelle im Anhang Seite 291 zu ent nehmen Beachtet werden mu da ein Steuerblock nur ge ndert werden soll wenn er nicht gerade zur Ausf hrung eines Befehls FLAG ACTIVE verwendet wird vgl Seite 18 Zur Unterst tzung der ablaufinvarianten Programmierung ist der MF Operand siehe Seite 13ff verwendbar Die Operandenliste der nderungen kann damit vom Aufruf getrennt im Programm definiert werden Der Aufruf YMODCB kann auch durch k rzere und schnellere Befehlsfolgen ersetzen werden bei denen die Felder ber die DSECTs YDDxxB adressiert werden Allerdings kann dann in einer neuen Version eine Neu bersetzung n tig werden 987 2135 8 2 5 987 2135 8 Steuerblockfelder lesen und sicherstellen Steuerb
151. GON haben x 4 10 Gleichuertige Makroaufrufe stehen bereits zur Bearbeitung an OPTCD ACQUIRE ASY oder OPTCD ACCEPT SPEC ASY x 4 14 Die DCAM Anwendung ist nicht berechtigt diesen Makro Aufruf zu geben x 4 18 Ein synchroner Aufruf ist bereits in der Warteschlange f r diese Tasks eingetragen OPTCD SYN O x x x 312 987 2135 8 Anhang Tabelle der R ckmeldungen R ckmelde Feld Bedeutung Makroaufruf F F F E Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OT O G T TI I I R T N N G G E R T D V E E E C 8 Der Makroaufruf vurde vegen falscher Operanden zur ckgeviesen x 8 04 ung ltige ACB Steuerblockadresse 8 08 ung ltige CCB Steuerblockadresse 8 oc ung ltige DCG Steuerblockadresse x x 8 10 ung ltige DIP Steuerblockadresse x x 8 14 ung ltige ENB Steuerblockadresse x 8 18 ung ltige APPNAME Adresse x 8 1C ung ltige DISNAME Adresse x 8 20 ung ltige PTNNAME Adresse xix xix 8 24 ung ltige Adresse des Contingency Kennzeichens x 8 28 ung ltige Adresse des Ereigniskennzeichens x 8 2C ung ltige AREA Adresse x 8 30 ung ltige AAREA A
152. IELD 2 X 185CNN X 00 EDIT PARAM ERROR X 047 INVALID DEVICE HEADER X 087 LENGTH OF RECEIVED MESSAGE 0 X 0C VTSU NOT AVAILABLE X 10 ERROR IN VTSUCB X 14 ERROR IN NEABT PROTOCOL THE FOLLONING EQUATES ARE VALID IF RDCS IS SET IN FEEDBACK FIEI DCSE IS SET IN FEEDBACK FIEI X 047 X 087 X 0C X 10 UNEX UNEX UNEX OTHE LD 1 AND LD 2 x 1014 PECTED BCINF PECTED APINF PECTED STINF R UNEXPECTED kir RC RC RC BCAM RC FEEDBACK FIELD 4 kkkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkkxkkkkkkkxkkkkxkkkkkkkxk XL1 X 007 DATA INDICATORS NO INDICATION IN FDBK FIELD 4 THE FOLLONING EQUATES ARE VALID IF SUCC OR SUWA ARE SET IN FEEDBACK FIELD 1 X 00 NN X 0477 NN MESSAGE adlun 331 Steuerbl cke und R ckmeldungen 332 aa EY ON N ND N N YDDAGO YDDAPTCK YDDANTCK YDDAEXPD YDDAELMT YDDASGRP YDDAGRUP YDDALNF YDDAPCN YDDADVER YDDAV70 YDDAV80 YDDARES5 YDDALEN EQU EQU EQU EQU EQU EQU EQU EQU DS DS EQU EQU DS EQU END X 02 X 047 X 087 X 10 X 20 X 40 X 80 YDDAFDBI1 YDDFDB A Y Xx 00007 X 08007 10XL1 007 YDDAHDTY YDDACB GO SIGNAL POSITIVE TACK NEGATIVE TACK EXPRESS DATA DATA ITEM 15 A LAST ELEMENT O LAST ELEMENT O LENGTH OF FEED
153. INDICATION IN FDBK FIELD 2 2 x 2 THE FOLLONING EQUATES ARE VALID IF RAPS IS SET 28 IN FEEDBACK FIELD 1 X 08NN x 2 YDDANOTO EQU X 047 APPLICATION NOT OPENED 2 YDDAALRO EQU X 087 APPLICATION ALREADY OPENED 2 YDDANOSH EQU X 0C APPLICATION IS NON SHARABLE 2 YDDAONEO EQU X 10 NO MORE THAN ONE OPEN IS ALLOWED 2 YDDAVERO EQU X 14 WRONG OPEN FOR PRIMARY TASK 2 YDDASECO EQU X 18 WRONG OPEN FOR SECONDARY TASK 2 YDDADIS EQU X 1C DISTRIBUTION ALREADY PERMITTED 2 YDDAFCLW EQU X 20 FORCED APPL CLOSING WARNING 2 YDDAFCL EQU X 24 FORCED APPL CLOSING 2 YDDAFCLD EQU X 287 FORCED CLOSING DCAM ERROR 2 YDDAFCEP EQU X 2c FORCED CLOSING INV CONT BY PRIM 2 YDDAFCSE EQU Xx 30 FORCED CLOSING INV CONT BY SEC 2 YDDAFCLT EQU X 34 FORCED CLOSING TERM OF PRIMARY 2 YDDAFCLP EQU X 38 FORCED CLOSING BY PRIMARY TASK 2 YDDAFCRS EQU X 3c FORCED CLOSING BY SECONDARY TASK 2 YDDATMAR EQU X 407 TOO MANY REQUESTS PENDING 2 YDDANACT EQU X 44 APPLICATION NOT ACTIVE 2 YDDAIUPW EQU X 487 INVALID USEPW 2 YDDAANUM EQU X 4C TOO MANY APPL OPENED 2 YDDANPRE EQU X 50 TOO MANY NON PREDEFINED APPL TASK 2 YDDAIRDF EQU X 54 INVALID PASSWORD FOR RDF 2 YDDAOPSS EQU X 587 APPL OPENED BY ANOTHER SUBSYSTEM 2 YDDANPRD EQU X 5C TOO MANY NON PREDEF APPL 2 YDDACNPA EQU X 60 TOO MANY CONN NONPREDEF APPL 2 YDDAISVR EQU X 647 INVALID DCAMVER OF
154. INF Die Basisinformation der Datenstation wird abgefragt Dieser Operand wird ausgewertet bei YINQUIRE OPTCD VTSUCB nur bei NEA Transport Service und EDIT SYSTEM VTSUCB Der VTSU Control Block wird in dieser Verbindung zur Nachrichtenauf bereitung benutzt Der Operand kann in Verbindung mit VCBADR benutzt werden bei YCHANGE um die DCAM interne Kopie des VTSUCB zu erzeugen modifizieren VCBADR A VTSUCB und zu l schen VCBADR 0 YINQUIRE und YRECEIVE um den DCAM internen VTSUCB in den Programmspei cher zu kopieren Die Aufrufe schreiben den aktuellen VTSUCB an die im RPB Steu erblock angegebene Adresse VCBADR zur ck Dadurch kann der Anwender die von VTSU im VTSUCB gelieferten R ckinformationen auswerten YSEND und YSENDREC um die DCAM interne Kopie des VTSUCB zu erzeugen bzw zu l schen VCBADR 0 oder zu modifizieren VCBADR A VTSUCB und nach Bearbeitung durch den VTSU wieder in den Programmspeicher zu bertragen 987 2135 8 235 YRPB Makroaufrufe START nur bei NEA Transport Service STOP START Der Zustand der DCAM Anvvendung vvird auf START gesetzt STOP Der Zustand der DCAM Anvvendung wird auf STOP gesetzt Dieser Operand wird ausgewertet bei YSETLOG jedoch nur wenn die Anwendung mit ATTR LOGON er ffnet wurde Der Zustand gibt an ob Aufforderungen zum Verbindungsaufbau bearbeitet werden START oder nicht STOP Nach YOPEN vor der ersten Abgabe eines YSETLOG ist der START Zustand ein
155. ION NOT ACTIVE 1 YDDFIUPW EQU 48 INVALID USEPW 1 YDDFANUM EQU X 4C TOO MANY APPL OPENED 1 YDDFNPRE EQU X 50 TOO MANY NON PREDEFINED APPL TASK 1 YDDFIRDF EQU X 54 INVALID PASSWORD FOR RDF 1 YDDFOPSS EQU X 58 APPL OPENED BY ANOTHER SUBSYSTEM 1 YDDFNPRD EQU X 5C TOO MANY NON PREDEF APPL 1 YDDFCNPA EQU X 60 TOO MANY CONN NONPREDEF APPL 1 YDDFISVR EQU X 64 INVALID DCAMVER OF SECONDARY 1 1 THE FOLLOWING EQUATES ARE VALID IF RPTS IS SET 1 IN FEEDBACK FIELD 1 X OCNN x 1 YDDFNCON EQU X 047 PARTNER NOT CONNECTED TO APPL 1 YDDFACON EQU X 08 PARTNER ALREADY CONNECTED 352 987 2135 8 Anhang YDDFLOGQ YDDFIDID YDDFILID YDDFCLUR YDDFFDIS YDDFPCSP YDDFPCSS YDDFPCST YDDFPCA YDDFMESL YDDFWRCP YDDFSQUS YDDFNOEX YDDFNUSD YDDFIPAR YDDFSYTI YDDFPNAV YDDFPSTP YDDFPNLG YDDFILPW YDDFREJL YDDFPCNA YDDFISSE YDDFPSTR YDDFPNVT YDDFPDED YDDFNDCG YDDFIDIS YDDFSYER YDDFNONA YDDFAPCO YDDFIPSW YDDFRCOS YDDFRPRI YDDFPPRE YDDFRAD YDDFPERD YDDFEXNA YDDFUPER YDDFUSNP YDDFUPNP YDDFUNOT YDDFUCID YDDFUIER YDDFUNOE YDDFUVER YDDFUNCT YDDFUNNP YDDFUNCS YDDFUKVP R D R D YDDFSHOR YDDFSHUT YDDFOSHU YDDFIACT eerrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr rre U987 J Z135 8 EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ
156. IST AKTIND DOPEN DCLOSE DOPNCON DCLSCON DGENCB DSHOWCB DSEND DSENDREC DENAEI DSOLSIG DCAMFDBK DW AIDSAVE GOEID SENDLEN EIREF EIREF2 WAITGO A CCB RPB AAREA1 AREA1 AREAILN DC DS DS DS EQU DC EQU DC EQU DC EQU DC EQU DC EQU DC EQU DC EQU DC EQU DC EQU DC YDDFDB DS EJECT DS DC DC DC DS DS DS DC DS DS DS DS DS DS EQU END C 0123456789ABCDEF OH d N L EN GB g bar ev 2 D r OzZUQUZUmDUZU s Sal Q xOQ xOQ xO xO xox x 0 64 64 64 C X D F o F o F o OCL8 L4 L4 LI YDDFRDCS AL1 YDDFSHOR AL1 YDDFWTGO E AUSRICHTUNG AUF WORTGRENZE L100 BEREICH FUER ACB UND CCB AUSRICHTUNG AUF WORTGRENZE L120 BEREICH FUER RPB L32 100CL8 SENDE UND EMPFANGSBEREICH Beispiele 271 Beispiele 272 DCAM ISO Transport Service Beispiel2 PRINT NOGEN 150 502 START DAS PROGRAMM ERZEUGT DIE STEUERBLOECKE ACB CCB UND RPB STATISCH IM PROGRAMMSPEICHER UND MODIFIZIERT DIE STEUERBLOECKE UEBER DSECTS D H IN EINER SPAETEREN DCAM VERSION MUSS DAS PROGRAI U U NEU EBERSETZT WERDEN DAS PROGRAMM EROEFFNET DIE DCAM ISO APPLIKATION 150 502 UND SETZT EINE VERBINDUNGSAUFFORDERUNG
157. L nge der Namen unter dem mit Verteilcodes gearbeitet werden soll Verteilungsname Er steht ebenfalls in einem hier adressierten Feld von 8 Byte L nge das Kennwort wenn die DCAM Anvvendung durch ein solches gesch tzt ist durch die Angabe von USEPASS in der Prim rtask bzw durch ein Kennwort in der RDF wie in der Prim rtask das Attribut SHARE die Nummer der DCAM Version wenn dies in der Prim rtask geschehen ist Die DCAM Versionsnummer mu in Prim r und Sekund rtask bereinstimmen Weiterhin kann angegebenen werden 6 987 2135 8 da DCAM Meldungen siehe Seite 38 bearbeitet werden sollen Dazu wird die Adresse des ENB angegeben Fehlt die Angabe werden sie nicht bearbeitet die Adresse des Feldes in das DCAM den symbolischen Namen des eigenen Pro zessors eintr gt die Adresse des Feldes in dem der Kettungsname steht da die Angaben im ACB mit den Informationen des CLT Eintrags CLT Communication Link Table berschrieben werden sollen der durch den Ket tungsnamen identifiziert wird PERM permanente nderung Bei fehlender An gabe werden die Informationen des CLT Eintrags nur f r diesen Aufruf gewertet Die Angaben im ACB werden nicht ver ndert TEMP tempor re nderung da die Task eine Sekund rtask ist Fehlt die Angabe wird keine diesbez gliche Pr fung durchgef hrt d h die Task kann auch eine Prim rtask sein 65 YOPEN Nachfolgendes Er ffnen Vervvendung von Vert
158. LN LESS 4 BYTES APTNCH INVALID THE FOLLOWING EQUATE IS VALID IN CASE OF PROBLEMS WITH ISO APPLICATIONS x 6C X 70 X 74 XOTE X 7C X 80 CONTRADICTION ISO ATTR INVALID CONTINGENCY ID ADDRESS INVALID EVENT ITEM ID ADDRESS Ri CCB REFERRED TO BY ASYNCHR 8 AREALN 0 VTSUCB NOT USED ON THIS CONN VTSUCB NOT ALLOWED EDIT USER INVALID VTSUCB ADDRESS ICONSISTENT ROUT PARAM SPECIFIED INVALID ROUTLIST FEEDBACK FIELD 3 kkxkxkxkxkxkxkxkxkxkkxkxkxkxkxkxkxkkkkkkkkkkkxkkkkkkkkkxk XL1 X 007 INDICATORS NO INDICATION IN FDBK FIELD 3 THE FOLLONING EQUATES ARE VALID IF SUCC IS SET IN FEEDBACK FIELD 1 X 00xNN 987 2135 8 Anhang U987 J Z135 8 ererrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr rre YDDFPTSK YDDFSTSK YDDFNORM YDDFMTRN YDDFMKEP YDDFRVCB YDDFNSTA YDDFTSTA YDDFCODE YDDFNOIN YDDFNOLO YDDFTOUT YDDFLDAT YDDFLOCT YDDFLMTR YDDFEDTE YDDFPTTR YDDFOUTR YDDFEDIV YDDFTRES YDDFILHC YDDFINLC YDDFTRYL YDDFBSHO YDDFWTGO YDDFNOCB YDDFNOID YDDFNMEM YDDFPTSH YDDFNMAX YDDFEDPE YDDFDVHD YDDFMSGL YDDFVTNA YDDFEVTS YDDFENPT YDDFBCAS YDDFBCAO EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU EQU
159. LOGPW kennwort4 nur bei NEA Transport Service Angabe des Kennworts zum Aufbau einer Verbindung Funktion des Kennworts Dieses Kennwort ist von dem Kommunikationspartner einer DCAM Anwendung unter dem Operanden LOGPASS im entsprechenden ACB Steu erblock vorgegeben worden Jeder zum Verbindungsaufbau auffordernde Partner mu dieses Kennwort angeben Dieser Operand wird ausgewertet bei YOPNCON mit OPTCD ACQUIRE im RPB kennwort4 kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante in der L nge von 4 Byte angegeben werden Der Standardwert ist X 00000000 gleichbedeutend mit Kenn wort angegeben SYScopE PROC nur bei NEA Transport Service BINARY SYSCODE Die Benutzerdaten sind im EBCDI Code verschl sselt D h zu sen dende Nachrichten sind im EBCDI Code verschl sselt und empfan gene Nachrichten werden im EBCDI Code erwartet Wenn die emp fangene Nachricht in einem anderen Code verschl sselt ist leitete DCAM die Nachricht weiter und beendet den YRECE IVE Aufruf mit einer Warnung bei der R ckmeldung siehe Anhang Seite 298 Der Datentransport im Kommunikationssystem ist nicht transparent Wenn n tig wird eine Code bersetzung in den Code des Kommuni kationspartners vor der Weiterleitung der Daten durchgef hrt z B bei Ausgabe auf eine Datenstation 987 2135 8 183 YCCB 184 Makroaufrufe BINARY Die Benutzerdaten sind in einem beliebigen Code verschl sselt
160. M Meldungen DCAM gibt bestimmte Ereignisse im Datenkommunikationssystem spontan an den Anvvender vveiter vvenn dieser daf r eine Unterbrechungsroutine Contingency defi niert hat Dies geschieht beim Er ffnen der DCAM Anvvendung siehe Kapitel Makroauf rufe bezogen auf die Existenz einer DCAM Anvvendung Seite 49ff Im Steuerblock ENB gibt der Anwender dabei die Kennzeichen der Contingency Routinen an die er bei ihrer Definition mit dem Makroaufruf ENACO zur ckerhalten hat Diese Contingency Routinen sind einer Task fest zugeordnet Ihre Kennzeichen k nnen aber von mehreren DCAM Anwendungen benutzt werden wenn diese von der gleichen Task er ffnet werden Die einmal getroffene Zuordnung zwischen DCAM Anwendung und Contingency Routine kann f r die Lebensdauer der DCAM Anwendung nicht mehr ge ndert werden Soll eine Contingency nicht oder nur unter Ber cksichtigung anderer Routinen zum Ablauf kommen kann ihr gezielt eine Priorit t von 1 niedrigste bis 127 h chste zugeordnet werden Makroaufruf LEVCO siehe Handbuch BS2000 Makroaufrufe an den Ablaufteil Der Standardwert ist 1 Die Hauptroutine kann damit schon unterbrochen werden da sie standardm ig die Priorit t 0 hat Aber auch sie kann ihre Priorit t h her setzen und damit ggf die Unterbrechung zeitlich hinausschieben An dem Beispiel der LOGON Contingency wird im folgenden Bild gezeigt welche Anga ben zur Definition unbedingt notwendig sind 38 987
161. NCORRECT YDCG NOTE 10 CODEVAL INCORRECT OTE 10 NUMBER OF CODEVAL S EXCEEDS LIMIT 8 YDIP NOTE 10 CODEIND INCORRECT OTE 10 NUMBER OD DCG S EXCEEDS LIMIT 16 YFORBID NOTE 160 RPB PARAM MISSING YGENCB NOTE 160 BLK PARAM MISSING OTE 10 CB IDENTIFIER NOT ALLONED FOR GIVEN BLK YINQUIRE NOTE 160 RPB PARAM MISSING YMODCB NOTE 160 BLK AND OR BLKADDR MISSING YOPEN NOTE 160 ACB MISSING YOPNCON NOTE 160 RPB PARA ISSING YPERMIT NOTE 160 RPB PARA ISSING YRECEIVE NOTE 160 FORMAT PARAM INCORRECT OTE 160 RPB PARAI ISSING YREULOG NOTE 160 RPB PARA ISSING YRESET NOTE 160 RPB PARA ISSING YSEND NOTE 60 FORMAT PARAM INCORRECT OTE 160 RPB PARA ISSING YSENDREC NOTE 160 FORMAT PARAM INCORRECT OTE 160 RPB PARA ISSING YSETLOG NOTE 160 RPB PARA ISSING YSHONCB NOTE 160 PARA ISSING YTESTCB NOTE 160 BLK AND OR BLKADDR MISSING 987 2135 8 367 IDCAM Benutzerschnittstelle Anhang 7 8 368 Auswirkungen der CCITT Empfehlung X 25 auf die IDCAM Benutzerschnittstelle Nach der CCITT Empfehlung X 25 lassen sich Datenendeinrichtungen an Datenpaket Vermittlungsnetze DPVN anschlie en In TRANSDATA erfolgen diese Anschl sse unter Verwendung des Produktes X 25PORT im PDN des Anschlu rechners Damit kann ein heterogener Verbund mit TRANSDATA Systemen oder Fremdsystemen hergestellt wer den Heterogen hei t da oberhalb der X 25 Ebene keine TRANSDATA Protokolle zwi s
162. NNAME ANWR1 YRECEIVE CID PRONAME XAR 1 17 gt 04 CONNECTED WITH ANVL2 3 0 INDEC PLEASE START DIALOG YOPNCON ACCEPT YSEND CID 19 376 987 2135 8 Anhang IDCAM Benutzerschnittstelle Erkl rung zu Beispiel 1 1 Einzelverbindung 2 3 4 5 3 outgoing call Aufforderung zum Aufbau einer Verbindung ber X 25 Als Prozessor der Partnerverbindung wird der nahe X 25 Anschlu rechner XAR 1 angegeben In der X 25 Stationstabelle von XAR 1 verweist der Name des zu verbinden den Partners ANVVR1 als Stellvertreter einer fernen Anwendung auf die zu erreichende ferne DTE Adresse 45890008 Diese ist die Zieladresse f r den outgoing call incoming call Der incoming call ber X 25 enth lt die Ursprungs DTE Adresse 45890007 Diese identifiziert in der X 25 Stationstabelle des nahen Anschlu rechners XAR 2 den stellvertretenden Namen ANWL1 des fernen Partners sowie den zuzuordnenden nahen TRANSDATA Partner ANVVR1 Die nahe Partner Anwendung erh lt eine Verbindungs Aufforderung Auskunft ber Verbindungs Aufforderung Als Prozessor der Partner Anwen dung erscheint der nahe Anschlu rechner XAR 2 Der Partnername ANVVL1 entspringt dem Eintrag in der X 25 Stationstabelle von XAR 2 2 Verbindungsaufforderungen an verschiedene nahen Partner einer DTE 6 7 8 3 9 710 987 2135 8 ncoming 15 von verschiedenen fernen DTE Adressen oder verschied
163. Name Operanden symbol YENB COMEND relexp LOGON relexp LOSCON relexp PROCON relexp SECOND relexp EXPRerelexpl TACKerelexpl Operanden COMEND relexp Adresse eines Feldes in dem das COMEND Contingency Kennzeichen steht Dieser Operand wird ausgewertet bei YOPEN LOGON relexp Adresse eines Feldes in dem das LOGON Contingency Kennzeichen steht Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask LOSCON relexp Adresse eines Feldes in dem das LOSCON Contingency Kennzeichen steht Dieser Operand wird ausgewertet bei YOPEN 197 YENB 198 Makroaufrufe PROCON relexp Adresse eines Feldes in dem das PROCON Contingency Kennzeichen steht Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask SECOND relexp Adresse des Feldes in dem das SECOND Contingency Kennzeichen steht Dieser Operand wird ausgewertet bei YOPEN durch die Prim rtask EXPR relexp nur bei NEA Transport Service Adresse eines Feldes in dem das EXPR Contingency Kennzeichen steht Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask YOPEN durch eine Sekund rtask mit ATTR NDISCO im ACB TACK relexp nur bei NEA Transport Service Adresse eines Feldes in dem das TACK Contingency Kennzeichen steht Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask mit ATTR PRIMTASK im ACB YOPEN durch eine Sekund rtask mit ATTR REQTASK im ACB Hinweis Die jeweiligen Contingen
164. Netzdatei RDF 52 NORMAL 234 Operandenliste 15 26 P Partner beliebiger 231 spezifischer 230 Partnercharakteristika 100 Partnername 114 171 192 Peripherie 104 PEROTERM 104 235 physikalische Nachrichtenl nge 175 physische Datenstation 178 180 positive Transportquittung 236 PRIO 173 Priorit t der Nachricht 79 234 der Verbindung 173 PROCON 43 73 198 Programmablauf 7 Programmierung 26 ablaufinvariante 13 reentrante 13 PRONAME 159 171 192 Prozessorname 114 159 171 192 PTNCHAR 94 100 235 PTNNAME 171 987 2135 8 987 2135 8 Q Quittung logische 182 R reentrante Programmierung 13 Registerbelegung 317 Registerinhalt 7 REMOVE DCAM APPLICATION LINK 362 REMOVE DCAM CONNECTION LINK 362 REQLOGON 94 230 RLTH 177 Routen Namen 174 Routenanzahl 174 ROUTL 174 ROUTN 174 RPB 186 189 200 205 211 215 219 221 238 242 246 R ckmeldefeld 298 R ckmeldung 18 298 326 S SECOND 46 198 SEQNO 237 SET DCAM APPLICATION LINK 363 SET DCAM CONNECTION LINK 364 SHARE 159 SIGNAL 173 SOLSIG 32 SPEC 230 spezifischer Partner 230 Standardwerte 25 47 START 236 START Zustand 67 236 statische Steuerblockerzeugung 9 11 Steuerblock 291 adresse 208 anzahl 202 typ 202 203 208 249 251 252 abfragen 28 erzeugen 9ff lesen 27 sicherstellen 27 testen 28 ver ndern 24 Stichw rter 395 Stichvv rter 396 Steuerblockerzeugung direkte 9 17ff dynamisch 13ff dynamische 9
165. Nummer des Registers welches das Kennzeichen AID der zu schlie enden DCAM Anwendung enth lt 987 2135 8 Makroaufrufe YCLSCON 4 6 987 2135 8 YCLSCON Funktion Der YCLSCON Makroaufruf nimmt eine vorher gegebene Aufforderung zum Verbindungs aufbau YOPNCON ACQUIRE zur ck wenn der Aufbau noch nicht erfolgte oder er baut die Verbindung zu einem Kommunikationspartner ab siehe auch Abschnitt Seite 121 YCLSCON kann nur von einer Prim rtask aufgerufen werden Daten die sich nach die sem Aufruf noch in Pufferspeichern des Systems befinden sind nicht mehr erreichbar Format Name Operanden symbol YCLSCON RPB addr schl sselwort neuer wert Operanden RPB addr Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer wert Hiermit k nnen Werte des RPB Steuerblocks wie auch mit dem Aufruf YMODCB aktuali siert werden 189 YCLSCON Makroaufrufe Folgende Angaben sind bei der Bearbeitung des YCLSCON von Bedeutung schl sselwort neuer wert ACB 1 addr 1 AID register 2 addr 2 CID register 1 Entweder ACB oder A D mu angegeben werden Werden sowohl ACB wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird 2 Entweder CCB oder CID mu angegeben werden Werden sowohl CCB wie auch CID angegeben und passen CCB und CID nicht zusammen h ngt es vom verwende ten M
166. ODCB etc Diese Makros beschreiben das Format der Steuerbl cke DSECT bzw CSECT Sie sind im Anhang auf Seite 326ff ausf hrlich beschrieben Hinweis Resevierte oder nicht verwendete unbenannte Felder m ssen mit bin ren Nullen aufgef llt sein Vervvendung der Steuerbl cke 2 2 18 Vervvendung der Steuerbl cke bei der Ausf hrung von Aufrufen Nachdem ein Steuerblock erzeugt vvurde kann er zur Ausf hrung eines Aktionsmakros verwendet werden Zu diesem Zweck mu er alle Eintragungen enthalten die zur Aus f hrung des Aufrufs notwendig sind Im Kapitel Anwendung der Funktionen von DCAM Seite 47ff werden alle Aufrufe mit den entsprechenden Operanden gezeigt Es kann ein Steuerblock Eintragungen enthalten die sich nicht auf den aktuellen Aktionsmakro beziehen jedoch werden nur die ausgewertet die f r den entsprechenden Aufruf ge braucht werden Bis zur Beendigung des Aufrufs synchrone Ausf hrung bzw bis zur Beendigung des Befehls asynchrone Ausf hrung wird ein RPB oder CCB als belegt gekennzeichnet Die Anzeige steht im FLAG Feld des Steuerblocks siehe Anhang Seite 291 FLAG ACTIVE Der Steuerblock wird gerade verwendet ist belegt Diese Anzeige dient vor allem dazu da ein bereits als belegt gekennzeichneter Steuerblock nicht erneut f r einen Aufruf verwendet werden kann FLAG INACTIVE Der Steuerblock wird gerade f r keinen Aufruf verwendet Der Inhalt des Steuerblocks mu jedoch noch nicht vom Pr
167. OPEN 52 Einfach benutzbare Anwendung Es soll eine DCAM Anvvendung er ffnet werden die nur einfach benutzbar ist Es mu angegeben werden 1 3 ISO Y als Anzeige da mit dem ISO Transportdienst gearbeitet werden soll Bei DCAM ISO Transport Service Anwendungen ist diese Angabe eine Pflichtangabe F r DCAM NEA Transport Service Anvvendungen ist diese Funktion nicht verf gbar Fehlt die Angabe wird standardm ig mit dem NEA Transportdienst gearbeitet der Name der DCAM Anvvendung wenn eine in der Netzdatei RDF vordefinierte Anwendung er ffnet werden soll Wird kein Name angegeben so wird er von DCAM erzeugt Der Bezug zu dieser Anwendung mu dann ber das Kennzeichen AID hergestellt werden das von DCAM zur ckgegeben wird das Kennwort wenn eine vordefinierte Anwendung durch ein Kennwort gesch tzt ist Weiterhin kann angegeben werden 4 9 die Adresse des Steuerblocks ENB Fehlt die Angabe vverden keine DCAM Meldun gen bearbeitet siehe Seite 38 da Aufforderungen zum Verbindungsaufbau nicht bearbeitet werden sollen NLOGON Fehlt die Angabe werden Aufforderungen bearbeitet LOGON nur bei NEA Transport Service das Kennwort das bei Aufforderung zum Verbindungsaufbau vom Partner angege ben werden mu Fehlt diese Angabe wird kein Kennwort verlangt nur bei NEA Transport Service die Adresse des Feldes in das DCAM den symbolischen Namen des eigenen Pro zessors eintr gt die Ad
168. OWED X 14 WRONG OPEN FOR PRIMARY TASK X 18 WRONG OPEN FOR SECONDARY TASK XLC DISTRIBUTION ALREADY PERMITTED X 20 FORCED APPL CLOSING WARNING x 24 FORCED APPL CLOSING X 28 FORCED CLOSING DCAM ERROR x 2C FORCED CLOSING INV CONT BY PRIM X 30 FORCED CLOSING INV CONT BY SEC X 34 FORCED CLOSING TERM OF PRIMARY x 38 FORCED CLOSING BY PRIMARY TASK x 3c FORCED CLOSING BY SECONDARY TASK X 40 TOO MANY REQUESTS PENDING X 44 APPLICATION NOT ACTIVE X 48 INVALID USEPW X 4C TOO MANY APPL OPENED X 50 TOO MANY NON PREDEFINED APPL TASK X 54 INVALID PASSWORD FOR RDF X 587 APPL OPENED BY ANOTHER SUBSYSTEM X TOO MANY NON PREDEF APPL X 60 TOO MANY CONN NONPREDEF APPL X 64 INVALID DCAMVER OF SECONDARY THE FOLLONING EQUATES ARE VALID IF RPTS IS SET IN FEEDBACK FIELD 1 X OCNN xx X 047 PARTNER NOT CONNECTED TO APPL X 08 PARTNER ALREADY CONNECTED X 0C LOGON REQUEST QUEUED X 10 INVALID DID X 14 INVALID LID X 18 CNNECTION CLOSED BY USER REQUEST X 16 PARTNER FORCED DISCONNECTED 420 PARTNER IN CS STATE PENDING X 24 CHANGE TO CA NOT ALLOWED X 28 PARTNER IN CS FOR ANOTHER TASK X 2C PARTNER IN CA STATE X 30 ESSAGE IS TOO LONG X 34 WRONG CODE POSITION X 387 SEQUENCE ALREADY USED x 3c EXPRESS NOT ALLOWED X 40 NO USER DATA WITH REJLOG 345 Steuerb
169. PASS kennwort 3 NEA Die Bedeutung der Operanden ist beim Makroaufruf YAPPL beschrieben 987 2135 8 Anhang Kommandos f r die Namen Zuweisung 2 CONNECTION Kommando Das CONNECTION Kommando wird von DCAM Benutzern verwendet um in einer pro ze spezifischen Tabelle der CLT communication link table Angaben ber eine Verbin dung zu speichern bzw zu l schen W hrend die Verbindung aufgebaut wird erg nzen oder ersetzen die Werte dieser Tabelle die entsprechenden Angaben im Verbindungssteuerblock CCB Assembler bzw in der Verbindungsstruktur COBOL Die Verkn pfung des CLT Eintrags mit diesem Pro grammbereich wird durch den Kettungsnamen hergestellt der dazu sowohl im Kom mando als auch im Programm angegeben werden mu Beachten Sie da das CONNECTION Kommando nur benutzt werden kann wenn das DCAM Subsystem erfolgreich geladen wurde Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolgreich abge setzt hat kann er trotz HOLD Subsystem oder DELETE Subsystem bis Taskende mit DCAM arbeiten gilt auch f r Format partnernamel CONN J LINK kettungsname PRONAME prozname USERFLD benutzerfeld 1 LOGPW kennwort4 NEA Die Bedeutung der Operanden ist beim Makroaufruf YCONN beschrieben 987 2135 8 361 Kommandos f r die Namen Zuweisung Anhang Dies
170. PBNAM ACBNAM CCBNAM IDAD PTNAD PROAD ENAEI YOPNCON SOLSIG YRPB YACB YCCB DS DS DS EINAME EVENT EIIDRET IDAD RPB RPBNAM EIID IDAD COND IMMED ACB ACBNAM CCB CCBNAM OPTCD ASY Q EID IDAD U987 J Z135 8 Aufbau einer Verbindung Vervvendung von Verteilcodes 3 2 1 4 Aufbau einer Verbindung Vervvendung von Verteilcodes L Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm CCB DIP und DCG CCB NEA werden nur von anderen Steuer Angaben zur Verbindung 1 1 13 bl cken 15 16 adressiert DIP relexp 14 DID Kennzeichen des DIP wenn nicht schon fr her eingetragen DCAM gibt zur ck weitere R ckgaben 2 DIP NEA COPDEPOS 0 255 b CODELN m 1xms8 16 CODEIND character 17 DCG relexp max 16 Adressen 18 DID Kennzeichen des DIP venn nicht schon fr her eingetragen DCAM gibt N zur ck DCG NEA CODEVAL C konstante max 8 konstante Angaben 19 X konstante GID Kennzeichen des DCG venn nicht schon fr her eingetragen DCAM gibt zur ck X 1 siehe Abschnitt Seite 75 2 siehe Abschnitt Seite 80 987 2135 8 89 Aufbau einer Verbindung Vervvendung von Verteilcodes Es soll eine Verbindung aufgebaut vverden die mit Verteilcodes arbeitet Vorraussetzung ist da
171. PNCON explizit mit dem Schl ssel wort CCB ccbnam verwendet wird 74 987 2135 8 Verbindung aufbauen YOPNCON 3 2 1 1 Beschreibung der aufzubauenden Verbindung Makroaufrufe Steuerbl cke und Register Speicherbereiche im Anwendungsprogramm Der CCB wird nicht CCB NEA ISO durch einen Makro 4 Name des Kommunikations aufruf adressiert PTNNAME relexp 1 gt partners 8 Byte sondern im RPB der den Makroauf PRONAME relexp 1 Name des Prozessors ruf beschreibt des Partners 8 Byte USERFELD konstante 1 2 PROC KEEP 3 PROC SIGNAL 4 PROC TERMSTAT BINARY 6 PROC APPSTART 7 EDIT SYSTEM 8 EDITIN PHYS FORM 9 EDITIN GETBS 10 EDITIN GETFC 10 EDITIN LCASE 10 EDITOUT PHYS FORM 11 EDITOUT HCOPY 12a EDITOUT HOM 120 EDITOUT EXTEND 12c EDITOUT LOGC 12 EDITOUT LACK 12e LOGPW konstante 1 13 DIP relexp 14 LINK relexp 15 gt Kettungsname LINKMOD PERM 16 MAXLN absexp 17 RLTH absexp 18 MDATA dE r 19 ROUTL relexp 20 ROUTN absexp 21 PRIO 1 2 3 22 Die Eintragungen sind f r die Variante des YOPNCON unterschiedlich DCAM gibt zur ck Beschreibung des Verteilcodes 987 2135 8 75 YOPNCON 76 Verbindung aufbauen 1 konstante kann als Zeichenkonstante C konstante o
172. R DASHUT DAOSHU DAIACT DADCSE DADCLK DAIRSE DAIRNS DAIRNL DAERPE DANAUT D S D R EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ X 34 X 38 X 3C X 40 X 44 Steuerbl cke und R ckmeldungen WRONG CODE POSITION SEQUENCE ALREADY USED EXPRESS NOT ALLOWED NO USER DATA WITH REJLOG INVALID DEPROT EDIT X 48 X 4C X 507 X 547 X 587 X C X 60 X 647 X 687 X 6C X 70 X 74 X 78 X 80 X 847 X 887 X 8C x 907 X 947 298 XF ICA X A0 X A4 X A8 X AC X B X B4 X B8 X BC Xx co X TAT X cc X D X D4 THE IN FEEDBACK FIELD 1 X 047 X 087 ZOG X 10 X 14 X 20 SYSTEM TIMEOUT PARTNER NOT PARTNER IN PARTNER INVALID REQUEST PTNCHAR NOT INVALID PTN IN STOP AVAILABLE STOP STATE IN NLOGON STATE LOGPW REJECTED ACCEPTED BY PTN STAT SERV ELMT DATA REOCON FOLLOWS DCG MEDIATELY PPLICATIO NVALID PAS ROP TN PROCESS ONN REO ROTOCOL I XPEDITED TATION NOT ROCESSOR O TASK FOR WRONG CID INTERNAL NO N I A S U A I P P P C P E U S p N
173. R MAX NAME f THE FOLLONING EQUATES ARE VALID IF RPAR IS SET IN FEEDBACK FIELD 1 AND EDER IS SET IN FEEDBACK FIELD 2 X 185CNN X 00 EDIT PARAM ERROR X 047 INVALID DEVICE HEADER X 087 LENGTH OF RECEIVED MESSAGE 0 X 0C VTSU NOT AVAILABLE X 10 ERROR IN VTSUCB X 14 ERROR IN NEABT PROTOCOL THE FOLLONING EQUATES ARE VALID IF RDCS IS SET IN FEEDBACK FIELD 1 AND DCSE IS SET IN FEEDBACK FIELD 2 X 1014NN X 047 UNEXPECTED BCINF RC X 087 UNEXPECTED APINF RC X 0C UNEXPECTED STINF RC X 10 OTHER UNEXPECTED BCAM RC 355 Steuerbl cke und R ckmeldungen Anhang 1 1 1 kkxkxkxkxkxkxkxkxkxkxk kxk kxxk FEEDBACK FIELD 4 1 YDDFFDB4 DS XL1 DATA INDICATORS 1 1 YDDFFD4N EQU X 00 NO INDICATION IN FDBK FIELD 4 1 1 THE FOLLOWING EQUATES ARE VALID IF SUCC OR SUWA 1 ARE SET IN FEEDBACK FIELD 1 X 00 NN X 04 1 YDDFMSG EQU X 01 ESSAGE 1 YDDFGO EQU X 02 GO SIGNAL 1 YDDFPTCK EQU X 04 POSITIVE TACK 1 YDDFNTCK EQU X 08 NEGATIVE TACK 1 YDDFEXPD EQU X 10 EXPRESS DATA 1 YDDFELMT EQU X 20 DATA ITEM IS A ELEMENT 1 YDDFSGRP EQU X 40 LAST ELEMENT OF SUBGROUP 1 YDDFGRUP EQU X 80 LAST ELEMENT OF GROUP 1 YDDFLNF EQU 1 LENGTH OF FEEDBACK INFO 1 1 1 x YDDFDB 034 920624 55616014 END Variante2 EXTERNAL SYMBOL DICTIONARY
174. S 249 FLAG FELD 18 Format Datenstation 179 180 Funktionstastencode logischer 179 G GETBS 179 GETFC 179 GO Signal 76 173 Grundinformation der Datenstation 106 H HCOPY 180 HOM 181 ISO Anwendung 158 K KEEP 231 Kennwort 164 167 183 193 Kennzeichen 20 121 sicherstellen 27 Kennzeichen CID 112 Kettungsname 160 166 171 192 987 2135 8 987 2135 8 Klasse 5 Speicher 13 Kleinbuchstaben umsetzen 179 Kommunikationspartner 73 L LACK 182 Laufnummer 237 LCASE 179 LENGTH 202 LINK 160 166 171 192 LINKMOD 160 172 Listenform 15 LOGC 182 logische Datenstation 178 180 Quittung 182 Steuerzeichen 182 Zeile 181 logischer Funktionstastencode 179 LOGON 40 73 163 197 LOGON Contingency 38 LOGPASS 164 167 LOGPW 183 193 LOSCON 42 73 197 M Makroaufrufe 153ff maximal erwartete Nachrichtenl nge 177 maximale Nachrichtenl nge 175 MAXLN 175 MDATA 176 mehrfach benutzbare Anwendung 159 Mehrfach benutzbare DCAM Anwendung 54 MF Operand 13 203 208 249 252 Mnemotechnischer Wert 322 Mnotes 365 MONCHARS 102 235 More Data Funktion 176 N nachfolgend er ffnende Task 162 Nachfolgendes Er ffnen 61 64 Stichw rter 393 Stichvv rter 394 Nachricht empfangen 130 nicht bersetzen 184 senden 126 bersetzen 183 Nachrichtenaufbereitung 178 Nachrichtencode 183 Nachrichtenlange maximal ervvartete 177 maximale 175 physikalische 175 NAMXLATE 94 112 230
175. T UME FTBAL HZ Text Ein Textoperand wird als Folge von alphanumerischen Zeichen geschrieben die in Apo strophe eingeschlossen vverden Leerzeichen und spezielle Zeichen sind erlaubt Text operanden d rfen nicht mehr als 127 Zeichen enthalten inclusive der Apostrophe z B BEREICH PCB 132 1256 Zeichen Der Zeichenoperand wird wie eine Zeichenfolge geschrieben Kommas oder Leerzei chen sind nicht erlaubt Die Zeichenfolge darf nicht in Apostrophe eingeschlossen wer den z B CUBTDAVE HEINZ JOHN 830PMOT 325 Steuerbl cke und R ckmeldungen Anhang 7 5 326 Steuerbl cke und R ckmeldungen Namen f r Felder und VVerte Makro YDDACB Mit dem Makroaufruf YDDACB kann ein Pseudo Abschnitt CSECT oder DSECT f r den Steuerblock ACB angelegt vverden Format symbol YDDACB D er prefix x un Operanden symbol gibt die symbolische Adresse f r den Makroaufruf an Wird keine Adresse angegeben so wird die Adresse YDDACB erzeugt gibt an was generiert werden soll D D verlangt die Generierung eines Pseudoabschnitts verlangt die Generierung eines Code Abschnitts prefix gibt eine Zeichenfolge von maximal 4 Zeichen an die den Namen vorangestellt wird Ohne diese Angabe wird die Zeichenfolge YDDA jeweils dem symbolischen Namen vorangestellt EQU Y bedeutet da f r alle m glichen Werte des Feedback Feldes symboli sche Gr en vergeben werden siehe auch YDDFDB EQU N es w
176. TES APTNCH INVALID Ri R THE FOLLONING EQUATE IS VALID IN CASE OF PROBLEMS WITH ISO APPLICATIONS X e67 X 70 X 74 X 78 XALLA X 807 CONTRADICTION ISO ATTR VTSUCB NOT USED ON THIS CONN VTSUCB NOT ALLOVED INVALID VTSUCB ADDRESS EDIT USER Anhang INVALID CONTINGENCY ID ADDRESS INVALID EVENT ITEM ID ADDRESS 0 ICONSISTENT ROUT PARAM SPECIFIED INVALID ROUTLIST FEEDBACK FIELD 3 kkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkkxkxkkkkkkkkxkkkxkxkkkkkkxk XL1 X 007 INDICATORS NO INDICATION IN FDBK FIELD 3 THE FOLLOWING EQUATES ARE VALID IF SUCC IS SET IN FEEDBACK FIELD 1 Xx 007 X 047 X 007 X 047 X 087 X 10 X 40 X 00YNN TASK IS PRIMARY TASK IS SECONDARY YOPEN YOPEN MESSAGE NOT TOO LONG MESSAGE TRUNCATED REMAINDER OF MESSAGE IS KEPT RECEIVE OK NO VTSUCB TERMINAL STATUS INCOMPLETE 987 2135 8 Anhang U987 J Z135 8 1 1 1 1 1 0 III DIDI 0 0 DNDID 0 NND NN NND NND NND NND YDDATSTA EQU YDDACODE EQU YDDANOIN EQU YDDANOLO EQU YDDATOUT EQU YDDALDAT EQU YDDALOCT EQU YDDALMTR EQU YDDAEDTE EQU YDDAPTTR EQU YDDAOUTR EQU YDDAEDIV EQU YDDATRES EQU YDDAILHC EQU YDDAINLC EQU YDDATRYL EQU YDDABSHO EQU YDDAWTGO EQU YDDANOCB EQU YDDANOID EQU YDDANMEM EQU YDDAPTSH EQU Y
177. TY LENGTH OF BODY OF CNT BLOCK BODY OF CONTROL BLOCK ENB DS A A COMEND CONTINGENCY ID DS A A EXPR CONTINGENCY ID DS A A LOGO CONTINGENCY ID DS A A LOSCON CONTINGENCY ID DS A A PROCON CONTINGENCY ID DS A A TACK CONTINGENCY ID DS A A SECOND CONTINGENCY ID EQU YDDEHDTY LENGTH OF CONTROL BLOCK YDDENB 030 910919 55616016 END 341 Steuerbl cke und R ckmeldungen Anhang Makro YDDRPB Mit dem Makroaufruf YDDRPB kann ein Pseudo Abschnitt CSECT oder DSECT f r den Steuerblock RPB angelegt vverden Format Name Operanden symbol YDDRPB D is lc prefix al N Operanden symbol gibt die symbolische Adresse f r den Makroaufruf an VVird keine Adresse angegeben so wird die Adresse YDDRPB erzeugt gibt an was generiert werden soll Pl D verlangt die Generierung eines Pseudoabschnitts Le verlangt die Generierung eines Code Abschnitts prefix gibt eine Zeichenfolge von maximal 4 Zeichen an die den Namen vorangestellt wird Ohne diese Angabe wird die Zeichenfolge YDDR jeweils dem symbolischen Namen vorangestellt EQU Y bedeutet da f r alle m glichen Werte des Feedback Feldes symboli sche Gr en vergeben werden siehe auch YDDFDB EQU N es werden keine symbolischen Gr en f r die Werte des Feedback Feldes vergeben 342 987 2135 8 Anhang U987 J Z135 8 Steuerbl cke und R ckmeldungen Pseudoabschnitt DSECT f r den Steuerblock RPB
178. VI GSVCIND DCLOSE YCLOSE AID 3 BALR 6 7 TERM TER EJECT SPACE 3 STXIT ROUTINE ESCPBRK BEHANDLUNG STX DS OH BALR 11 0 BASISREGISTER USING 11 L 7 FDBCHK ADRESSE DER FDBK AUSWERTUNG L 2 ASNDRPB ADRESSE DES RPB FUER SENDEN RDATA INBUF TERM 100 MODE LINE CLC INDATA 4 ENDIND BE STX0 s EINGABE AN 7 CONSOLE SENDEN LH 5 INLEN SH 5 CORRLEN YSEND RPB 2 AREALN 5 MVI SVCIND DSEND BALR 6 7 m PROGSTA ENDPROG NOCONN BZ EXIT PROGRAMM BEENDEN EVTL NOCH OFFENEN YRECEIVE RUECKSETZEN DAMIT BASISROUTINE NICHT WEITER WARTET STXO OI PROGSTA ENDPROG YRESET RPB 2 VI SVCIND DRESET BALR 6 7 AUSGANG AUS STXIT ROUTINE b EXIT EXIT DROP 11 EJECT l CHECKERR UNTERROUTINE DIE DEN DCAM FDBK AUSNERTET 5 USING CHECKERR 7 STCM 15 15 YDDFDB DCAM NEA 987 2135 8 DCAM NEA 987 2135 8 l FALLS FALLS x FALLS CHECKO1 RETURNCODE 2 CHECKOS FDBK 0 ZURUECK CLI YDDFFDB1 YDDFSUCC BE CHECKEND ZEITABLAUF ANZEIGE SETZEN CLI YDDFFDBl YDDFSUNA BNE CHECKO2 CLI YDDFFDB3 YDDFTOUT BNE CHECKO1 OI PROGSTA TIMEOUT B CHECKEND SPACE 3 YRECEIVE DURCH YRESET RUECKGESETZT RETURN CLI YDDFFDB3 YDDFTRES BE CHECKEND AUSGEBEN DS OH LH 8 SVCDIST LA 8 ERRMSG1 8 ERRIND 0 8 UNPK RCODE 9 YDDFDB 5 TR RCODE TRTAB
179. Verbindung USER Begleitinformation vie sie in USERFELD des CCB festgelegt vurde ARECLN Lange der empfangenen Verbindungs nachricht oder bei zu langer Nachricht L nge des abgeschnittenen Restes FDBK R ckmeldung siehe Anhang Seite 298 Register 15 siehe Anhang Seite 298 gibt zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte Steuerblock mit g ltigem Kennzeichen AID 4 Fortsetzung siehe Seite 81 80 987 2135 8 Auffordern zum Aufbau Fortsetzung YOPNCON CCB NEA ISO Angaben zur Verbindung 1 10 14 22 LOGPW konstante 3 13 CID Kennzeichen der Verbindung MAXLN Maximale L nge der auf dieser Verbindung sendbaren Nach richten Dateneinheiten 4 PTNCHA 1 5 EDIT 6 DCAM gibt PROC 7 X zur ck RLTH 8 1 Adresse des Steuerblocks der die DCAM Anwendung beschreibt 2 konstante kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante A konstante X konstante 00 1 o Un 987 2135 8 oder Festpunktkonstante F konstante oder Adre konstante V konstante definiert werden 3 konstante kann als Zeichenkonstante C konstante oder Sedezimalkonstante definiert werden 4 abh ngig von der maximalen Paketl nge bei Transfer zu einem angeschlossenen Rechner bzw von einer Systemkonstanten bei bermittlung innerhalb d
180. XoF X08 XC Beispiel Die Anwendung ist er ffnet und verarbeitet Aufforderungen zum Verbindungs aufbau ATTR LOGON Zustand START Die Anwendung ist er ffnet und verarbeitet momentan keine Aufforderungen zum Verbindungsaufbau ATTR LOGON Zustand STOP nur bei NEA Trans port Service Die Anwendung ist er ffnet und verarbeitet keine Aufforderungen zum Verbin dungsaufbau ATTR NLOGON nur bei NEA Transport Service Die Anwendung wurde noch nicht erzeugt von einer Prim rtask er ffnet d h sie existiert nicht Die Prim rtask der DCAM Anvvendung deren Kennzeichen AID sich im Register 9 befindet m chte Informationen ber den Zustand der DCAM Anvvendung mit dem sym bolischen Namen APPL einholen RPB2 APPNAME INFFELD 70 YINQUIRE RPB RPB2 AID 9 YRPB OPTCD APPSTAT AREA APPNAME AAREA INFFELD DC CL8 APPL DS CL8 987 2135 8 Anwendung schlie en YCLOSE 3 1 4 DCAM Anwendung schlie en Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register F 05 Register n Nummer des Registers AID Kennzeichen der Anwendung 1 ACB addr1 YCLOSE ACB Steuerblock mit aktuellem Kennzeichen 1 der DCAM Anwendung AID FDBK R ckmeldung siehe Anhang Seite 298 A DCAM gibt zur ck Register 15 siehe Anhang Seite 298 FDB 1 1 Byte FDB 2 1 Byte FDB 3 1 Byte
181. YDDFDB siehe Anhang Seite 326 symbolische Adressen generiert werden 253 DCAM NE A Transport Service 5 Beispiele 5 1 DCAM NE A Transport Service Beispiell DAS PROGRAMM EROEFFNET s x NACH EINTREFFEN DER 2257 AUS me xo TERMSTA1 START BASR 10 0 USING 10 B START TITLE TERMSTAl OPNCON ACCEPT ANY SYN TE STATUSANTWORT UND ABFRAGEN D EICHENSAETZE GIBT DAS PROGRAMM EINGABEN WIEDER ON DEN DCAM RETURNCODES WERDEN NUR DIE FUER DEN BEDINGT NOTWENDIGEN ABGEFRAGT DAS PROGRAMM GI CAM RETURNCODES NACH SYSOUT AUS APPNAME PRONAME UND PTNNAME PTNPRO L8 TERMSTA1 R APPLIKATION Bl MVI AKTDIST 1 TOPEN KTRC AUFBAU DER VERBINDUNG 1 45 MVI AKTDIST 1 TOPNCON OWNNAME DC c OWNPROZ DS CL8 PTNNAME DS CL8 PTNPROZ DS CL8 START DS OH EROEFFNEN DE YOPEN 14 OPNCON RPB BAL 14 U987 J Z135 8 KTRC RMSTAT AN DAS TE DIE ANWENDUNG TERMSTA1 UND WARTET AUF ERBINDUNGSAUFBAU VON EINEM TERMINAL ER VERFUEGBAREN RMINAL PROGRAMMLAUF BT ABER ALLE Beispiele 255 Beispiele DCAM NEA f WARTEN AUF YRECEIVE MIT FDBK STATUSNACHRICHT DA J 2 3 STATUS NACH MAX 3 YRECEIVE WAIT YRECEIVE RPB RPB1 AARE
182. YNQ EQU DATACB EQU DAICCB EQU DAIDCG EQU DAIDIP EQU DATENB EQU DATAAD EQU DAIDAD EQU DAIPAD EQU DAICOI EQU DAIEVI EQU DATARA EQU DATAAR EQU DATAPN EQU DAIDIN EQU DAIPTN EQU DAIPRO EQU DACCBA EQU DASEQH EQU DANRLN EQU DAISUB EQU DAIPRN EQU DANGAR EQU DAEDER EQU DAICDL EQU DAIPCL EQU DAIPCA EQU DABATR EQU DANVCB EQU DABVCB EQU DAIVCB EQU DAIROU EQU DAIRLN EQU xx kk DAFDB3 DS DAFD3N EQU DAPTSK EQU DASTSK EQU DANORM EQU DAMTRN EQU DAMKEP EQU DARVCB EQU DANSTA EQU X 18 SYN REQUEST ALREADY QUEUED THE FOLLONING EQUATES ARE VALID IF RPAR IS SET IN FEEDBACK FIELD 1 X 047 087 KOCH x 10 x 14 X 18 x cr X 20 X 24 X 28 X 2C X 30 X 347 X 38 X 3C X 407 X 44 X 48 X 4C xr 507 XSA KS XICA X 60 X 64 X 68 3218 Nxrxxxr INVALID ACB ADDRESS INVALID CCB ADDRESS INVALID DCG ADDRESS INVALID DIP ADDRESS INVALID ENB ADDRESS INVALID APPNAME ADDRESS INVALID DISNAME ADDRESS INVALID PTNNAME ADDRESS INVALID AREA ADDRESS INVALID AAREA ADDRESS INVALID APPLICATION NAME INVALID DISTRIBUTION NAME INVALID PARTNER NAME INVALID PROCESSOR NAME CCB REFERRED TO BY ASYNCHR SEQUENCE NUMBER TOO HIGH AAREALN LESS THAN 8 AREALN INVALID SUBFUNCTION INVALID PRONAME ADDRESS NEGATIVE AREALN EDITING ERROR INVALID CODELN PTNCHLN LESS 4 BY
183. YSHOWCB und YTESTCB k nnen nur benutzt werden wenn das DCAM Subsystem erfolgreich geladen wurde Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolgreich abge setzt hat kann er trotz HOLD Subsystem oder DELETE Subsystem bis Taskende mit DCAM arbeiten gilt auch f r F r den Aufruf YSHOVVCB ist die erforderliche L nge des Benutzerbereichs f r jedes mit YSHOVVCB behandelbare Feld angegeben in Byte Die mnemotechnischen Werte value und addr in den im folgenden angegebenen Feldern erlauben auch eine Registerangabe 291 Tabelle der Steuerblockfelder Anhang Sehl ssel Wert oder mnemotechnischer Wert Steuer vort des Feld block Steuer Makro Auf lange Erkl rung block ruf zur YGENCB YMODCB YTESTCB f r feldes statischen YSHOWCB Steuerblock erzeugung ACB APPNAME Anwendungsname DISNAME relexp addr addr addr 4 Adresse Verteilungsname ENB von Ereignis Meldungsblock LINK Kettungsname PRONAME Symbolischer Prozessorname Y ISO Setzen des ISO Attributes N LINKMOD PERM bernahme des CLT Eintrags TEMP ATTR SHARE DISCO PRIMTASK LOGON Eigenschaften der 1 IL 11 JREOTASK f11 1 DCAM Anvendung NSHARE NDISCO NOTACK NLOGON VERIFY NO Pr fangabe PRIMARY SECONDARY USEPASS kennvort kennvort kennvort 4 Anwendungskennwort Vorgabe USEPW kennwort Anwendungs
184. act and support addresses will now be offered by Fujitsu Technology So lutions and have the format rs fujitsu com The Internet pages of Fujitsu Technology Solutions are available at http ts fujitsu com and the user documentation at hrip manuals ts fujitsu com Copyright Fujitsu Technology Solutions 2009 Hinweise zum vorliegenden Dokument Zum 1 April 2009 ist Fujitsu Siemens Computers in den alleinigen Besitz von Fujitsu bergegangen Diese neue Tochtergesellschaft von Fujitsu tr gt seit dem den Namen Fujitsu Technology Solutions Das vorliegende Dokument aus dem Dokumentenarchiv bezieht sich auf eine bereits vor l ngerer Zeit freigegebene oder nicht mehr im Vertrieb befindliche Produktversion Bitte beachten Sie dass alle Firmenbez ge und Copyrights im vorliegenden Dokument rechtlich auf Fujitsu Technology Solutions bergegangen sind Kontakt und Supportadressen werden nun von Fujitsu Technology Solutions angeboten und haben die Form ts fujitsu com Die Internetseiten von Fujitsu Technology Solutions finden Sie unter http de ts fujitsu com und Unter http manuals ts fujitsu com finden Sie die Benutzerdokumentation Copyright Fujitsu Technology Solutions 2009
185. akro ab welche Angabe ausgewertet wird Zur Beschreibung der einzelnen Felder siehe YRPB Seite 223 oder die Tabelle der Steuerblockfelder Anhang Seite 291 R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung und der Tabelle der Meldungen zu ent nehmen siehe Seite 121 und Anhang Seite 298 190 987 2135 8 Makroaufrufe YCONN 4 7 987 2135 8 Funktion Der Makroaufruf YCONN wird verwendet um in der taskspezifischen Tabelle CLT communication link table Angaben ber eine Verbindung zu speichern oder zu 1 schen Dieser Makro wendet die Namen Zuweisungsfunktion an siehe auch Seite 145 Format symbol YCONN partnername register kettungsname register prozname 1 register fbenutzerfeldl register kennwort4 LOGPW register J 191 YCONN 192 Makroaufrufe Operanden partnername register partnername gibt den Namen des Kommunikationspartners an Er kann maximal 8 Byte lang sein und mu alphanumerisch und links b ndig ausgerichtet sein Das erste Zeichen mu alphabetisch sein A Z d h der Name mu den Konventionen f r Assembler Namen entsprechen register enth lt die Adresse eines 8 Byte langen Feldes in dem der Partner name linksb ndig steht Nach rechts sind freie Bytes mit Leerzeichen X 40 aufzuf llen Me LINK register kettungsname gibt den Kettungsnamen an
186. alsche CID f r diese OP ID 1 x BC Interner UCON Fehler Authenizitaets Pr fung x nicht m glich oc co ein Eintrag mehr in ECRNAM Tabelle verf gbar 1 x oc C4 DCAM Version ist kleiner als 10 1 x oc c8 ein Chipkarten Terminal 1 x oc cc Protokoll inkonsistent 1 x oc DO Chipkarten Subsystem nicht verf gbar 1 x oc D4 Fehler im KVP Protokoll 1 x 1 Diese Meldungen verden gegeben venn eine Aufforderung zum Verbindungsaufbau an die Systemanven dung CONSOLE von dieser zur ckgeviesen vird 310 987 2135 8 Anhang Tabelle der R ckmeldungen R ckmelde Feld Bedeutung Makroaufruf F F F E Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OT O G TI TI I I R T N N G G E R T D V E E E C 10 Der Makroaufruf ist vegen des aktuellen Zustandes des Kommunikationszugriff Systems DCM zur ckgeviesen vorden xixixixixixix x x x x x x x 10 04 s u Mangel an Speicherplatz x x x x s u Gr nde 04 BCAI Ein Ausgabe spater versuchen 08 BCAI Mangel an Speicherplatz oc BCAI Warten auf das GO Signal 20 DCAI Kein Steuerblock verf gbar 24 DCAI Kein ID Eintrag verf gbar 28 DCAI Kein Speicherplatz verf gbar 2C DCAI berlast
187. ange Teil weggeworfen wer den Die Nachricht soll in den Bereich mit der Adresse EMPFANG geschrieben wer den RPBNAM ACBNAM CCBAD EMPFANG IDAD ENAEI YRECEIVE SOLSIG YRPB YACB YCCB DS DS EINAME EVENT EIIDRET IDAD RPB RPBNAM EIID COND IDAD ACB ACBNAM CCB CCBAD AAREA EMPFANG AAREALN 100 OPTCD TRUNC ASY Q EID IDAD CL100 E 135 YSENDREC Senden und Empfangen kombiniert 3 3 3 Senden und Empfangen kombiniert Makroaufrufe Steuerbl cke und Register Speicherbereiche im Anwendungsprogramm AID register DT Register n Nummer des Registers AID Kennzeichen der Anwendung 35 CID register per gt Register m Nummer des Registers CID Kennzeichen der Verbindung 45 NEA ISO Text der zu sendenden relexp Nachricht Dateneinheit n Bytel AREALN absexp O lt n lt MAXLN 2S Bereich f r Aufnahme AAREA relexp 2 gt der empfangenen Nachricht Dateneinheit n Byte AAREALN absexp n28 1 35 GOB relexp 4S OPTCD EXPRESS 58 OPTCD ELEMENT GROUP ELEMENT SUBGROUP 65 SEQNO absexp 15 0xnx65535 OPTCD TACK 85 5 95 OPTCD TRUNC KEEP 65 7R TOVAL absexp 0 lt m lt 32767 8R OPTCD ASY 9R EID relexp 10R Ereigniskennzeichen 4 Byte EIDREF konstante 2 11R EIDREF2 konstant
188. ansport Service register J kennwort4 gibt das Kennwort zum Aufbau einer Verbindung an gegeben vom Kommunikationspartner der dazu auffordert Das Kennwort ist 4 Byte lang und ist eine Zeichenkonstante C konstante oder eine Sedezimal konstante X konstante register enth lt die Adresse einer 4 Byte langen Adre konstanten in der das Kennwort rechtsb ndig steht R ckmeldung Von DCAM zur ckgegebene Informationen Register R ckinformation Bedingung 15 X 007 Der Aufruf vurde vie links gev nscht ausgef hrt b ndig X 047 Der Aufruf wurde nicht ausgef hrt weil nicht genug Speicherplatz vor handen war X 087 Der angegebene Kettungsname vurde nicht vervendet X 0C Der Aufruf konnte vegen eines Systemfehlers nicht ausgef hrt verden X 247 Das Subsystem DCAM ist nicht verf gbar 987 2135 8 193 YDCG 4 8 194 Makroaufrufe YDCG ik Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen Funktion Es wird ein Verteilcode Gruppenblock DCGs distribution code group block erzeugt Er enth lt die Beschreibung von einem oder mehreren Verteilcodes siehe auch Seite 89 und 118 Format symbol YDCG CODEVAL codevert Operanden CODEVAL codewert Liste von Verteilcodewerten Es k nnen bis zu 8 Werte in der Liste stehen codewert kann eine Folge von maximal 8 Zeichen sein und als fC konstante 1 Zeichenkonstante konstante
189. baut werden Die Verbindung soll die folgenden Eigenschaften haben Auf dieser Verbindung sollen Nachrichten anhand von Verteilcodes verteilt werden Der Code besteht aus einem Zeichen J K oder L und befindet sich in der Nach richt an dritter Stelle Ab dem vierten Zeichen folgt Nachrichtentext YOPNCON RPB RPBNAI RPBNA YRPB ACB ACBNAM CCB CCBNAM OPTCD ACQUTRE CCBNA YCCB PTNNAME PTNAD PRONAME PROAD DIP DIPNA ACBNA YACB APPNAME APPAD DISNAME DISAD ATTR SHARE DISCO DIPNAME YDIP CODEPOS 2 CODELN 1 DCG DCGAD DCGAD YDCG CODEVAL C U C K C L PTNAD DC CL8 PARTNER PROAD DC CL8 PROZ1 DISAD DC CL8 PRIM APPAD DC CL8 APPL 91 YOPNCON Anschlie en an eine vordefinierte Verbindung 3 2 1 5 Anschlie en an eine vordefinierte Verbindung L Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register Pr Register n Nummer des Registers AID Kennzeichen der Anwendung 3 a ACB HEE Hs RPB NEA CCB relexp 1 OPTCD ACQUIRE 2 ACB relexp 3 OPTCD cs 4 OPTCD ASY 5 EID relexp 6 Ereigniskennzeichen 4 Byte EIDREF konstante 2 7 EIDREF2 konstante 2 CID Kennzeichen der Verbindung USER Begleitinformation vie sie in USERFELD de
190. bereiches AAREALN absexp value value value 4 L nge der alternativen Pufferbereiches TOVAL 2 Zeitintervall f r Warte schlangeneinreihung von Ma Makroaufrufen SEQNO 2 fortlaufende Nummer der zu sendenden Nachricht EIDREF information infor 1 finfor l finfor 4 erstes Wort der benutzerei mation i ik genen Information nach Be register register register endigung eines asynchronen Aufrufs EIDREF2 information finfor 1 finfor finfor 4 zweites Wort der benutzerei pasio x genen Information nach Be register register register endigung eines asynchronen Aufrufs OPTCD ACCEPT cs ELEMENT NORMAL 1 11 11 SUBGROUP 1 ACQUIRE CA GROUP EXPRESS REQLOGON TOPLOGON Q NAMXLATE SPEC START 11 COUNPTN 1 m Ey 1 Anforderungskennungen NQ APPSTAT ANY STOP CIDXLATE PTNCHAR VTSUCB MONCHARS PEROTERM BTERMINF SYN TACK TRUNC BELL 11 11 1KEEP 11 1 ASY NTACK CCBTK NBELL 296 987 2135 8 Anhang Tabelle der Steuerblockfelder Sehl ssel Wert oder mnemotechnischer Wert Steuer vort des Feld block Steuer Makro Auf lange Erkl rung block ruf zur YGENCB YMODCB YTESTCB f r feldes statischen YSHOWCB Steuerblock erzeugung LID register register register 4 Kennzeichen der Aufforderun zum Verbindungsaufbau AID register register register 4 Kennzeichen d DCAM Anwendg CID Kennzeichen der Verbindung ARECLN 4 L nge der im alternat
191. blocks CCB in dem das g ltige Kennzeichen der Verbindung CID steht oder ein Register in dem das g ltige Kennzeichen steht Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen der Ver bindung in den RPB eingetragen worden sein Die Angabe kann weggelassen werden wenn 3 nicht angegeben ist Ferner kann angegeben werden 3 da alle anstehenden YRECEIVE SPEC Aufrufe der im CCB gekennzeichneten Ver bindung zur ckgenommen werden sollen Fehlt die Angabe werden alle anstehen den YRECEIVE ANY Aufrufe dieses Prozesses innerhalb der im ACB genannten Anwendung zur ckgenommen da nach der Ausf hrung eines YRESET SPEC Aufrufs Nachrichten von dieser Ver bindung in die absenderspezifische Warteschlange eingetragen werden sollen Zus tzlich ist bei DCAM NEA Transport Service Anwendungen Bedingung da ohne Verteilcodes gearbeitet ATTR NDISCO wird beim YOPEN im ACB und OPTCD SPEC in 3 987 2135 8 Verteilcode Zuordnung steuern YPERMIT 3 3 5 Verteilcode Zuordnung steuern 2 Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen F r die Steuerung der Verteilcodezuordnung stehen der Prim rtask zwei Aufrufe zur Ver f gung Mit dem einen kann sie eine Zuordnung von Verteilungsnamen und Verteilcode Gruppenblock DCG herstellen oder einen Verteilcode Gruppenblock modifizieren YPERMIT mit dem zweiten l st sie diese Zuordnung wieder auf YFORBID ohne eine neue Zuordnung zu tr
192. bt 2 nur bei DCAM NEA Transport Service Anwendungen 98 siehe Abschnitt Seite 95 987 2135 8 Partnerinformation vor dem Verbindungsaufbau YINQUIRE 987 2135 8 Es sollen die Partnerinformationen vor dem Verbindungsaufbau abgefragt vverden Dazu mu angegeben werden die Adresse eines Bereichs in den die Verbindungsnachricht geschrieben werden soll da Informationen vom ersten der zur Verbindung auffordernden Partner gebraucht wird die Adresse eines Steuerblocks CCB in den verschiedene Informationen eingetra gen werden sollen und in dem die Feldadressen f r Partner und Prozessornamen stehen entweder die Adresse des ACB der das g ltige Kennzeichen der Anwendung AID enth lt oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein Ferner kann angegeben werden 9 die L nge des Bereichs in den DCAM die Verbindungsnachricht eintr gt h ch stens 80 Byte bei DCAM NEA Transport Service Anvvendungen und 32 Byte bei DCAM ISO Transport Service Anwendungen Ist die Verbindungsnachricht l nger als dieser Bereich wird sie abgeschnitten und in der R ckmeldung eine Warnung ausgegeben Fehlt die Angabe wird keine Verbindungsnachricht bergeben 99 YINQUIRE Partnercharakteristika 3 2 2 3 Partnercharakteristika Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvve
193. c Ung ltiges Kennwort 1 x oc 90 Die vorgeschlagene Transport Serviceklasse wurde x vom Partner nicht angenommen oc 94 Die vorgeschlagene Datennetz Priorit t wurde x vom Partner nicht angenommen oc 98 Fehler bei der Verarbeitung x z B St rung bei X 25 oc 9C Die Aufforderung zum Verbindungsaufbau wurde von x der Vervaltung zur ckgeviesen In diesem Fall mit dem Systemvervalter Verbin dung aufnehmen 1 Diese Meldungen verden gegeben dung a 987 2135 8 venn eine Aufforderung zum Verbindungsaufbau an eine Systemanven SCONSOLE von dieser zur ckgewiesen vird 309 Tabelle der R ckmeldungen Anhang R ckmelde Feld Bedeutung Makroaufruf F F F E Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OT O G T TI I I R T N N G G E R T D V E E E C oc AO Verbindungsabbau wegen Protokollfehler oder x x x Inkonsistenz durch Kommunikationspartner 4 OPTCD EXPRESS nicht erlaubt da mit dem x x ommunikationspartner nicht vereinbart A8 icht behebbarer UCON Fehler x Falscher Anvendungsname erstes Zeichen nicht 62 BO Falscher Prozessor nicht der eigene Prozessor x oc B4 Task zur berpr fung konnte nicht kreiert x werden oc B8 F
194. chen lt X 40 werden durch SUB Schmierzeichen ersetzt NLOGC Es werden keine logischen Steuerzeichen ausgewertet Alle Zei chen die im EBCDIC Code lt X 40 sind werden durch SUB Schmierzeichen ersetzt Dieser Operand findet nur Anwendung bei EDITOUT LINE LACK EDITOUT nur bei NEA Transport Service NLACK Es vverden logische Quittungen von der Druckerstation angefordert LACK Es werden positive und negative logische Quittungen angefordert Der Operand OPTCD TACK wird davon nicht betroffen d h es kommen ggf logische Quittungen und Transportquittungen an Das Steuerblockfeld SEQNO im RPB wird als Bezugsfeld f r logi sche Quittungen und f r Transportquittungen verwendet Dabei m s sen die beiden Bytes der SEQNO abdruckbar und in den ASCI Code umsetzbar sein Im ASCI Code mu f r die beiden Bytes gelten 20 lt SEQNO x 7F z B die abdruckbaren Zeichen NLACK Weder positive noch negative logische Quittungen kommen an Postive und negative Transportquittungen kommen entsprechend dem Anforderungskennzeichen im RPB an TACK NACK Dieser Operand findet nur Anwendung bei EDITOUT LINE Logische Quittungen k nnen ber den Makroaufruf YRECEIVE wie normale Meldun gen empfangen werden 182 987 2135 8 Makroaufrufe YCCB Aufbau einer logischen Quittung Byte 0 Logische nformation Byte 1 2 Bezugsfeld SEQNR Byte 3 nformation ber Drucker Status Dieser Operand wird ausgewertet bei YSEND
195. chen dem X 25 Anschlu rechner XAR und einer Datenendeinrichtung auf der anderen Seite des DPVN XAR oder Fremdsystem ausgetauscht werden siehe auch Handbuch TRANSDATA Anschlu an ein Datenpaket Vermittlungsnetz X 25 X 29 Einschr nkungen f r die IDCAM Schnittstelle Wenn beide Kommunikationspartner in eine TRANSDATA Umgebung eingebettet sind m ssen X 25 spezifische Funktionen nicht gesteuert werden Anders im Stationsmodus Hier ist eine DCAM Anwendung in eine TRANSDATA Umge bung eingebettet der andere Kommunikationspartner in eine TRANSDATA fremde Umge bung eingebettet Dadurch ergeben sich einige Einschr nkungen f r die IDCAM Schnitt stelle 987 2135 8 Anhang IDCAM Benutzerschnittstelle IDCAM Funktion X 25 Funktion Einschr nkung gegen ber TRANSDATA 1 Verbindungs anforderung YOPNCON ACQUTRE Verbindungsnachricht AREA im YCCB bzv LOGON Contingency Nachrichten aufbereitung EDIT USER im YCCB Nachrichten Code PROC SYSCODE im YCCB Initiative bei der Daten bermittlung PROC ANYSTART Partner charakteristika PTNCHAl im YCCB Verbindungsabbau LOSCON Contingency Aufbau der virtuellen Verbindung Steuerung der wahlfreien Leistungsmerkmale R cksetzanforderung RESET bzw Abbau der virtuellen Ver bindung siehe Format der DCAM Verbindungsnachricht Abh ngig von der Generierung siehe Makro XSTAT Operand 1X25 Bestimmte Strukt
196. chen mu alphabetisch sein A Z d h der Name mu den Konventionen f r Assembler Namen entsprechen register enth lt die Adresse eines 8 Byte langen Feldes in dem der Kettungs name linksb ndig steht Nach rechts sind freie Bytes mit Leerzeichen X 40 aufzuf llen Wenn dieser Operand alleine angegeben ist werden fr here Eintragungen der CLT unter gleichem Kettungsnamen gel scht fkennvort1 register kennvvort1 eine Prim rtask definiert hiermit das Kennwort f r den Anschlu einer Sekund rtask an die Anwendung siehe auch Makroaufruf YACB Das Kennwort ist 4 Byte lang und ist eine Zeichenkonstante C konstante oder eine Sedezimalkonstante X konstante register enth lt die Adresse einer 4 Byte langen Adre konstanten in der das Kennwort rechtsb ndig steht 987 2135 8 Makroaufrufe YAPPL fkennvort2 1 s register kennvvort2 gibt das Kennwort f r den Anschlu einer Sekund rtask an eine Anwendung an gegeben in der Sekund rtask oder das RDF Kennwort siehe auch Makro YACB Das Kennwort ist 4 Byte lang und ist eine Zeichenkonstante C konstante oder eine Sedezimalkonstante X konstante register enth lt die Adresse einer 4 Byte langen Adre konstanten in der das Kennwort rechtsb ndig steht DISNAME nur bei NEA Transport Service register J verteilungsname gibt den Namen an unter dem diese Task eine Verteilcodegruppe zugeordne
197. chl sselwort neuer wert AREA addr AREALN value AAREA addr AAREALN value LID register VCBADR relexp OPTCD APPSTAT OPTCD REQLOGON OPTCD TOP LOGON OPTCD COUNTPTN OPTCD PTNCHAR OPTCD CIDXLATE OPTCD AMXLATE OPTCD ONCHARS OPTCD PEROTERM OPTCD BTERMINF OPTCD VTSUCB nur f r DCAM NEA Transport Service Anvvendungen Makroaufrufe Zur Beschreibung der einzelnen Felder siehe YRPB Seite 223 und die Tabelle der Steu erblockfelder Anhang Seite 291 R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung und der Tabelle der Meldungen zu ent nehmen siehe Seite 69 und Anhang Seite 298 987 2135 8 Makroaufrufe 4 14 987 2135 8 Funktion Mit diesem Aufruf k nnen eines oder mehrere Felder in Steuerbl cken des Benutzerbe reichs ge ndert werden siehe Seite 26 Die Anderung hat keine Auswirkung auf die Kopien die DCAM bernommen hat Es gelten die folgenden Einschr nkungen f r den Gebrauch von YMODCB Der Aufruf YGENCB kann nur benutzt werden wenn das DCAM Subsystem erfolg reich geladen wurde Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolgreich abgesetzt hat kann er trotz HOLD Subsystem oder DELETE Subsystem bis Taskende mit DCAM arbeiten gilt auch f r Ein RPB Steuerblock darf nicht ge ndert werden w hrend er gera
198. cht eingetroffen sind wird der Aufruf beendet Wird keine Angabe gemacht wird eine Zeit von 600 Sekunden eingestellt Die Angabe 0 bedeutet Festlegung einer unbegrenzten Wartezeit Die Angabe wird nicht ausgewertet wenn kein Eintrag in die Warteschlange vorge sehen ist NQ da der Befehl asynchron ausgef hrt werden soll ASY Fehlt die Angabe wird er synchron ausgef hrt SYN die Adresse des Feldes in dem das Ereigniskennzeichen steht jedoch nur wenn der Befehl asynchron ausgef hrt werden soll Dann jedoch kann die Angabe nicht entfallen siehe Seite 30 987 2135 8 Nachricht oder Transportquittung empfangen YRECEIVE 11 das erste Wort der Ereignisinformation die bergeben werden soll wenn der asynchron ausgef hrte Befehl abgeschlossen vvurde Das erste Byte vvird bei der R ckgabe mit X 0C berschrieben Fehlt diese Angabe wird der Standardwert X 00000000 bergeben 11a das zweite Wort der Ereignisinformation die bergeben werden soll wenn der asynchron ausgef hrte Befehl abgeschlossen wurde Fehlt diese Angabe oder ist sie gleich dem Standardwert X 00000000 wird nur das erste Wort der Ereignisinformation bergeben 12 die Adresse im Anwendungsprogramm an die der interne VTSUCB kopiert wird nur bei NEA Transport Service Die Angabe wird nur ausgewertet wenn OPTCD VTSUCB gesetzt wurde Hinweis f r DCAM ISO Transport Service Anwendungen R ckmeldung von DCAM ISO Tran
199. cy Kennzeichen werden nach Ausf hrung des Makroaufrufs ENACO enable contingency zur ckgegeben Operand COIDRET 987 2135 8 Makroaufrufe YFORBID 4 11 YFORBID m Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen Funktion Mit diesem Aufruf wird eine Zuordnung von einer Verteilcode Gruppe wie sie in einem DCG Steuerblock beschrieben ist zu einem Verteilungsnamen wieder gel st Die Task die den betreffenden Verteilungsnamen definiert hat ist ab diesem Zeitpunkt nicht mehr in der Lage Nachrichten zu empfangen siehe auch Seite 143 YFORBID kann nur von einer Prim rtask aufgerufen werden Format Name Operation Operanden symbol YFORBID RPB addr schl sselwort neuer vert l 987 2135 8 199 YFORBID 200 Makroaufrufe Operanden RPB addr Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer wert Hiermit k nnen Werte des RPB Steuerblocks wie auch mit dem Aufruf YMODCB aktuali siert werden Folgende Angaben sind bei der Beschreibung des YFORBID von Bedeutung schl sselwort neuer wert ACB 1 addr arp 2 register AREA addr 1 Entweder ACB oder A D mu angegeben werden Werden sowohl ACB wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird Zur Beschreibung der einzelnen Felder siehe YRPB Seite 223 und die Tabelle der Steu erblockfelder Anhang Seite
200. d EXTEND auch nicht alle Felder bertragen Nachricht verk rzt 987 2135 8 303 Tabelle der R ckmeldungen Anhang R ckmelde Feld Bedeutung Makroaufruf F F F F Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OT O G T TI I R T N N G G E R T D V E E E C 08 Makroaufruf zur ckgewiesen wegen des aktuellen Zustands der DCAM Anwendung 08 04 Die DCAM Anvendung ist von der aufrufenden Task nicht er ffnet ung ltiges AID 08 08 Die DCAM Anvendung ist schon er ffnet ATTR NSHARE ist gesetzt x 08 oc Die DCAM Anwendung ist schon er ffnet Sie ist nur einfach verwendbar x 08 10 Die DCAM Anwendung ist bereits durch die an fordernde Task er ffnet worden x 08 14 Die DCAM Anwendung ist schon er ffnet VERIFY PRIMARY ist gesetzt 2 08 18 Die DCAM Anvendung ist nicht er ffnet VERIFY SECONDARY ist gesetzt x 08 1C Verteilungsname Verteilcodes sind schon zugelassen x 08 20 Warnung Erzwungene Beendigung der DCAM Anwendung x x x 08 24 Erzwungene Beendigung der DCAM Anwendung 08 28 Erzvungene Beendigung der DCAM Anvendung vegen eines D
201. d die L nge der ber mittelten Nachricht gr er als der im AAREALN Feld angegebene Wert ist Die im Makroaufruf YRECEIVE gemachte Angabe ber die Daten berlaufsbehandlung OPTCD TRUNG oder KEEP im RPB hat vor der hier gemachten Angabe Vorrang 987 2135 8 Makroaufrufe YCCB 987 2135 8 Hinvveis n einfach benutzbaren DCAM Anvvendungen oder in mehrfach benutzbaren DCAM Anvvendungen bei DCAM NEA Transport Service Anvvendungen mit ATTR NDISCO im ACB vvird die KEEP Funktion nur ausgef hrt vvenn der Partner im CS Zustand siehe Seite 223 ist oder vom YRECEIVE Aufruf der den ersten Teil der Nachricht empfangen hat in den CS Zustand versetzt wird Der Rest der Nachricht kann nur mit einem YRECEIVE OPTCD SPEC im RPB empfangen werden der von der Task angegeben wird die den CS Zustand verursachte Wenn diese Task vorzeitig been det wird geht der Rest der Nachricht verloren In DCAM NEA Transport Service Anvvendungen mit dem Attribut ATTR DISCO im ACB kann der Rest der Nachricht mit einem YRECEIVE OPTCD SPEC im RPB empfangen werden der von irgendeiner Task der DCAM Anwendung ausgegeben wird Der Anwender mu selbst sicherstellen da die richtige Task bedient wird SIGNAL 1 nas NSIGNAL SIGNAL DCAM steuert die Nachrichten bermittlung durch ein GO Signal Nach einer berlastung der Verbindung wird der sendenden Task durch ein GO Signal mitgeteilt da sie mit dem Senden fortfahren kann Der Anwender mu be
202. da diese DCAM Anvvendung Aufforderungen zum Verbindungsaufbau bearbeitet d h beim YOPEN siehe Seite 51 bis Seite 58 wurde das Attribut LOGON gesetzt Dazu mu angegeben werden 1 mit YSETLOG der Zustand START Aufforderungen werden bearbeitet oder STOP Aufforderungen werden momentan nicht bearbeitet Nach obiger Voraussetzung ist vor dem ersten YSETLOG der Zustand START gegeben Wird hier keine Angabe gemacht wird STOP eingestellt 987 2135 8 67 YSETLOG Zustand einer Anwendung ver ndern 2 entweder die Adresse des Steuerblocks ACB in dem das g ltige Kennzeichen AID steht oder ein Register welches das g ltige Kennzeichen enth lt Diese Angabe kann entfallen wenn das Kennzeichen vorher z B mit YMODCB in den RPB eingetragen worden ist Beispiel Die Prim rtask die die DCAM Anwendung APPL er ffnet hat soll bis auf weiteres keine Aufforderung zum Verbindungsaufbau bearbeiten Nach einer gewissen Zeit soll er wie der Aufforderungen zum Verbindungsaufbau bearbeiten Bedeutung YOPEN ACB ACBNAI YSETLOG RPB RPBNA Der Zustand wird auf STOP gesetzt YSETLOG RPB RPBNAM Der Zustand wird auf OPTCD START START gesetzt RPB Operand wird neu gesetzt ACBNAM YACB APPNAME NAME ATTR LOGON RPBNAM YRPB ACB ACBNAM NAME DC CL8 APPL 68 987 2135 8 Zustand einer Anwendung abfragen YINQUIRE 3 1 3 Zustand einer DCAM Anwendung abfragen Makroaufrufe
203. de aktiv z B w hrend er f r einen asynchron auszuf hrenden Befehl gebraucht wird der noch nicht beendet ist Ein CCB Steuerblock darf nicht ge ndert werden w hrend sich seine Adresse im CCB Feld eines gerade aktiven RPB Steuerblocks befindet Format symbol YMODCB ACB RPB BLKADDR addr L 1 1 E addr schl sselwort neuer vert 207 YMODCB Makroaufrufe Operanden ACB er BLK Es RPB Gibt den Typ des Steuerblocks an der ge ndert werden soll BLKADDR addr Gibt die Adresse des Steuerblocks an der ge ndert werden soll E adr l Gibt die Form des Makroaufrufs an siehe Seite 13 schl sselwort neuer wert Hier werden die Werte in den Steuerblockfeldern aktualisiert Besteht ein Operand vom Typ code aus mehreren m glichen Angaben z B OPTCD Operand werden nur die angegebenen ge ndert Die Angaben f r schl sselwort und neuer wert sind der Ta belle der Steuerblockfelder zu entnehmen Anhang Seite 291 nur bei NEA Transport Service DIP Gibt den Typ des Steuerblocks an der ge ndert werden soll 987 2135 8 208 Makroaufrufe YMODCB R ckmeldung Von DCAM zur ckgegebene nformationen Register R ckinformationen Bedingung 15 YMODCB vurde erfolgreich durch gef hrt links Die Stelle die durch BLKADDR b ndig angezeigt wird enth lt keinen g ltigen Steuerblock Obligatorischer Operand fehlt Es sollte ei
204. definiert wur de Auch in diesem Fall mu der Operand angegeben werden siehe YCCB PROC SIGNAL information kann als Zeichenkonstante C konstante Sedezimalkonstante X konstante Festpunktkonstante F konstante oder Adre konstante A konstante oder V konstante angegeben vverden Zeichenkonstanten und Sedezimalkonstanten vverden rechtsb ndig ausge richtet und von links mit X 0 aufgef llt Der Standardvvert ist X 00000000 ACCEPT 1 OPTCD ACQUTRE ACCEPT Eine Aufforderung zum Verbindungsaufbau soll angenommen werden ACQUIRE Es soll zum Aufbau einer Verbindung aufgefordert werden Dieser Operand wird ausgewertet bei YOPNCON cs OPTCD CA CS Nach Beendigung des Makroaufrufs der hier beschrieben vvird vvird der Kommunikationspartner in den CS Zustand versetzt CS Zustand bedeutet Nachrichten die vom Partner kommen k nnen nur mit OPTCD SPEC empfangen werden da sie in die absenderspezifische Warteschlange eingetragen wurden Im Falle einer mehrfach benutzbaren DCAM Anwendung gilt da nur die Task die den CS Zustand verursacht hat die nachfolgenden Nachrichten empfangen kann 987 2135 8 Makroaufrufe YRPB CA Nach der Beendigung des Makroaufrufs der hier beschrieben vvird vvird der Partner in den CA Zustand versetzt CA Zustand bedeutet Nachfolgende Nachrichten die von diesem Partner kommen k nnen nur mit OPTCD ANY empfangen werden da sie in die empf ngerglobale Wartesc
205. dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolgreich abgesetzt hat kann er trotz HOLD Subsystem oder DELETE Subsystem bis Taskende mit DCAM arbeiten gilt auch f r 987 2135 8 147 YOPEN 148 Beispiel Zuvveisung f r die DCAM Anvvendung Das Anwendungskennwort soll in einem eigenen Programm bevor das eigentliche DCAM Programm gestartet wird jeweils aktualisiert werden Die Eingabe erfolgt ber SYSDTA Vorlaufprogramm AKTUELL START Lesen der Information von SYSDTA RDATA Eintrag in die CLT LA YAPPL ERRADR DS FEHLERROUTINE FUER RDATA DS BEREICH DS HEADER DS USEPASS DS DCAM Verarbeitungsprogramm YOPE ACBAD YAC LINKAD DC BEREICH ERRADR 6 USEPASS LINK LINKNAME USEPASS 6 OY OF 0CL84 80C ACB ACBAD USEPASS C UNDE LINK LINKAD C LINKNAME 987 2135 8 Zuvveisung f r die Verbindung YOPNCON 3 4 2 Zuweisung f r die Verbindung Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm ACB relexp YOPNCON RPB NEA ISO CCB relexp CCB LINK relexp zu Kettungsname 8 Byte LINMOD PERM 2 CLT Eintragungen lt YCONN Makro oder CONN Kommando 3 Kommando SET DCAM CONN 1 YCONN NEA ISO LINK kettungsname register gt ettungsname partnername ame des Kommunikations
206. der Sedezimalkonstante X konstante oder Festpunktkonstante F konstante oder AdreBkonstante A konstante V konstante definiert verden Der Steuerblock CCB mu um eine Verbindung aufbauen zu k nnen die Werte enthal ten welche die Verbindung beschreiben Er wird mit YCCB bzw YGENCB erzeugt und kann folgende Eintragungen enthalten 1 die Adresse eines Feldes von 8 Byte L nge das den Namen des Kommunika tionspartners enth lt und die Adresse eines Feldes von 8 Byte L nge das den Prozessornamen des Partners enth lt Die Angaben erfolgen von DCAM wenn mit einem YOPNCON mit OPTCD ACCEPT ANY die Aufforderung eines beliebi gen Partners angenommen werden soll siehe Seite 84 2 die Begleitinformation in der L nge von 4 Byte die sp ter bei YRECEIVE ANY bei LOSCON Meldungen und zus tzlich bei DCAM NEA Transport Service Anwen dungen bei TACK oder EXPR Meldung von DCAM dem Programm bergeben werden soll Angaben ber die Behandlung von Nachrichten 3 bei zu empfangenden Nachrichten die l nger als erwartet sind sollen die Nach richtenreste aufgehoben werden KEEP f r einen zweiten YRECEIVE Fehlt diese Angabe wird der Rest weggeworfen Diese Angabe wird nur wirksam wenn beim YRECEIVE dies verlangt wird OPTCD CCBTK Sonst gelten dann die dort gemachten Angaben 4 falls es beim Senden von Nachrichten zu einer berlastung der Verbindung ge kommen ist soll der Anwender nach Au
207. die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein 4 entweder die Adresse des Steuerblocks CCB der das g ltige Kennzeichen der Ver bindung enth lt CID oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein 987 2135 8 109 YINQUIRE Verbindungsanzahl 3 2 2 8 Verbindungsanzahl Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register ss gt Register n Nummer des Registers AID Kennzeichen der Anwendung 3 RPB addr1 YINQUIRE RPB NEA ISO AAREA relexp d OPTCD COUNTPTN 2 ACB relexp 3 FDBK R ckmeldung siehe Anhang Seite 298 Register 15 siehe Anhang Seite 298 DCAM gibt zur ck FDB 1 FDB 2 FDB 3 FDB 4 Feld f r Partner 1 Byte 1 Byte 1 Byte 1 Byte anzahl 8 Byte ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der den Aufruf beschreibt 110 987 2135 8 Verbindungsanzahl YINQUIRE Es soll die Anzahl der Verbindungen abgefragt werden Dazu mu angegeben werden 1 2 3 987 2135 8 die Adresse eines 8 Byte langen Bereiches in den die Information eingetragen wird Sie wird von DCAM in folgender Weise eingetragen Eintrag ist sedezimal V V Anza
208. dresse x 8 34 ung ltiger Name der DCAM Anvendung x 8 38 ung ltiger Verteilungsname x xix 8 3c ung ltiger Partnername xixix xix 987 2135 8 313 Tabelle der R ckmeldungen Anhang R ckmelde Feld Bedeutung Makroaufruf F F F E Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OT O G T TI I I R T N N G G E R T D V E E E C 18 40 ung ltiger Prozessorname Prozessor nicht aktiviert kein x x x x x Prozessor unbekannt nicht generiert x x x x x Route n zum Prozessor nicht aktiv x x x x x angegebene Route zum Prozessor unbekannt nicht generiert x x 8 44 Der CCB Steuerblock ist f r einen asynchron ablaufenden Makroaufruf belegt aktiver CCB x b x x 8 48 Die fortlaufende Nummer berschreitet die obere Grenze x x 8 4C AAREALN ist kleiner als 8 Byte AREALN 0 x x x 8 50 ung ltige Unterfunktion x 8 54 ung ltige PRONAME Adresse x x x x x 8 58 negative AREALN x 8 s TU nicht behebbarer Fehler die Nachrichten aufbereitung betreffend x x 00 EDIT Parameter Fehler m glicherveise ist bei YRECEIVE und EDITIN PHYS der Benutzerbereich zu lein um den Nachrichtenkopf aufnehmen zu k nnen 04 unzul
209. e alphabetisch sein mu Kommas und Leerzeichen sind nicht erlaubt Symbole die mit dem Zeichen beginnen sind nicht erlaubt Die Symbole die mit diesen Zeichen beginnen sind f r die Verwendung im System reserviert Beispiele f r Symbole sind LEE MARGIE3 BIL8SAM DEBDEB Dezimaler Integer Die Operanden werden als Dezimalzahlen mit bis zu acht Ziffern geschrieben wie 5 31 127 usw 323 Mnemotechnische VVerte der Makroaufrufe Anhang Absolute zusammengesetzte Ausdr cke Ein absoluter zusammengesetzter Ausdruck kann ein absoluter Ausdruck oder irgend eine arithmetische Kombination von absoluten Ausdr cken sein Ein absoluter Ausdruck kann ein absolutes Symbol oder irgendeiner der sich selbst definierenden Ausdr cke sein Alle arithmetischen Operationen sind zwischen absoluten Ausdr cken erlaubt Ein absoluter zusammengesetzter Ausdruck kann nur relative Ausdr cke oder solche in Kombination mit absoluten Ausdr cken unter folgenden Bedingungen enthalten 1 In dem zusammengesetzten Ausdruck mu eine gerade Anzahl relativer Ausdr cke vorhanden sein 2 Die relativen Ausdr cke m ssen paarweise auftreten Jedes Paar von Ausdr cken mu dasselbe relative Attribut haben das hei t sie erscheinen in demselben Pro grammabschnitt des Assembler Codes Jedes Paar mu aus Ausdr cken mit entge gengesetzten Vorzeichen bestehen Die Ausdruckspaare m ssen nicht zusammen h ngend sein wie z B RT AT RT wobei RT relati
210. e 2 11R FDBK R ckmeldung siehe Anhang Seite 298 veitere R ckmeldung siehe YRECEIVE Seite 130 Register 15 siehe Anhang Seite 298 DCAM gibt zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte CCB Steuerblock mit g ltigem Kennzeichen CID ACB Steuerblock mit g ltigem Kennzeichen AID 136 U987 J Z135 8 Senden und Empfangen kombiniert YSENDREC 987 2135 8 1 Adresse des Steuerblocks der den Aufruf beschreibt 2 konstante kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante oder Festpunktkonstante F konstante oder Adre konstante A konstante V konstante definiert werden Es soll kombiniert gesendet und empfangen vverden Dazu mu angegeben werden 1 die Adresse des Feldes das die zu sendenden Daten enth lt 2 die Adresse des Feldes das die zu empfangenden Daten aufnehmen soll ferner die L nge des Feldes die mindestens 8 Byte betragen mu Der Aufruf kann nicht gegeben werden wenn die empf ngerspezifische Warte schlange CS zwar eingestellt war aber bereits ein anderer YRECEIVE oder YSENDREC die Umschaltung auf die empf ngerglobale Warteschlange CA gefor dert hat dessen Befehl aber noch nicht ausgef hrt ist Grunds tzlich ist der Aufruf nicht m glich wenn die empf ngerglobale Warteschlange eingestellt ist Ferner kann angegeben werden 3 die Angaben des YSEND und YRECEIVE soweit sie er
211. e Kommandos k nnen auch in SDF Syntax wie folgt eingegeben werden Eine genaue Beschreibung der SDF Syntax steht im Benutzerhandbuch Benutzer Komman dos SDF Format REMOVE DCAM APPLICATION LINK L scht Angaben ber eine DCAM Anvvendung aus der CLT Format REMOVE DCAM APPLICATION LINK LINK NAME lt name 1 8 gt REMOVE DCAM CONNECTION LINK L scht Angaben ber eine DCAM Verbindung aus der CLT Format REMOVE DCAM CONNECTION LINK LINK NAME lt name 1 8 gt 362 987 2135 8 Anhang 987 2135 8 Kommandos f r die Namen Zuvveisung SET DCAM APPLICATION LINK Speichert Angaben ber eine DCAM Anvvendung in der CLT Diese Angaben werden bei Er ffnen der DCAM Anvvendung anstelle der entsprechenden Angaben im Programm verwendet Format SET DCAM APPLICATION LINK LINK NAME lt name 1 8 gt APPLICATION NAME BY PROGRAM lt name 1 8 gt DISTRIBUTION NAME BY PROGRAM lt name 1 8 gt PROTECTION PARAMETERS PARAMETERS CONNECTION PASSWORD BY PROGRAM lt c string 1 xx string 1 85 SECRET SHARE PASSMNORD BY PROGRAM lt c string 1 45 lt x string 1 8 gt SECRET SHARE PASSWORD BY PROGRAM lt c string 1 45 lt x string 1 8 gt SECRET 363 Kommandos f r die Namen Zuweisung Anhang SET DCAM CONNECTION LINK Speichert Angaben ber eine DCAM Verbindung in der CLT Diese Angaben vverden bei Verbindungsaufbau anstelle der ents
212. e den CS Zustand verursach te Wenn diese Task vorher beendet wird geht der Rest der Nachricht verloren In DCAM NEA Transport Service Anwendungen mit ATTR DISCO wird der Rest der Nachricht mit dem n chsten YRECEIVE OPTCD SPEC Makroaufruf empfangen wer den der von irgendeiner Task der DCAM Anvvendung ausgegeben wird Hinweis Die OPTCD Gruppen werden im RPB unabh ngig voneinander abgelegt TOVAL absexp Gibt die Zeit an die ein Makroaufruf der nicht sofort bearbeitet werden kann in einer Warteschlange aufgehoben wird Der Wert wird in Sekunden angegeben Der Standardwert ist 600 Der maximale Wert ist 32767 Die Angabe des Wertes Null bedeutet unbegrenzte Wartezeit Die Genauigkeit der berwachung liegt im Sekundenbereich Dieser Operand wird ausgewertet bei YOPNCON mit OPTCD ACCEPT YRECEIVE und YSENDREC jedoch nur wenn OPTCD Q ebenfalls gesetzt wurde 987 2135 8 Makroaufrufe YRPB ELEMENT 1 ni GROUP ELEMENT Bei DCAM ISO Transport Service Anwendungen erh lt die zu sen dende Dateneinheit das Kennzeichen weitere Daten folgen TIDU Transport Interface Data Unit GROUP Bei DCAM ISO Transport Service Anwendungen erh lt die zu sen dende Nachricht Dateneinheit das Kennzeichen es folgen keine weite ren Daten d h sie ist die letzte Dateneinheit einer Nachricht bzw eine Nachricht die nicht in einzelnen Dateneinheiten bergeben wird Dieser Operand wird ausgewertet bei YSEND und YSENDREC
213. e des Benutzerbereichs ist ung ltig Ung ltige Parameterliste oder Registernummer Das Subsystem DCAM ist nicht verf gbar F r die Inhalte von Register 15 k nnen mit dem Makroaufruf YDDFDB siehe Anhang Seite 326 symbolische Adressen generiert werden 204 987 2135 8 Makroaufrufe YINQUIRE 4 13 987 2135 8 YINQUIRE Funktion Mit diesem Aufruf kann eine Task Informationen eine DCAM Anwendung betreffend siehe Seite 69 oder Kommunikationspartner und Verbindungen betreffend siehe Seite 94 abfragen Format Name Operanden symbol YINQUIRE RPB addr schl sselwort neuer wert Operanden Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer wert Hiermit k nnen Werte des RPB Steuerblocks wie auch mit dem Aufruf YMODCB aktuali siert werden Folgende Angaben sind bei der Bearbeitung des YINQUIRE von Bedeutung schl sselwort neuer wert ACB 1 addr arp 2 register 2 addr CID 2 register 1 Entweder ACB oder AID mu angegeben werden Werden sowohl ACB wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird 2 Entweder CCB oder CID mu angegeben werden Werden sowohl CCB wie auch CID angegeben und passen CCB und C D nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird 205 YINQUIRE 206 s
214. effen 3 3 5 1 Verteilungsnamen einem Verteilcode Gruppenblock zuordnen Makroaufrufe Steuerblocke und Register Besch Speicherbereiche im Anwendungsprogramm AID register PT gt Register n Nummer des Registers AID Kennzeichen der Anwendung 3 RPB addr1 YPERMIT RPB NEA AREA relexp 1 Verteilungsname 8 Byte AAREA relexp 2 ACB relexp 3 FDBK R ckmeldung siehe Anhang Seite 298 Register 15 siehe Anhang Seite 298 DCAM gibt zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte ACB Steuerblock mit g ltigem Kennzeichen AID DCG C konstante 1 max 8 CODEVAL konstante Angaben X konstante GID Kennzeichen des DCG venn nicht schon fr her eingetragen DCAM gibt zur ck 1 Adresse des Steuerblocks der den Aufruf beschreibt max 8 Angaben 987 2135 8 141 YPERMIT Verteilcode Zuordnung steuern Es soll die Verteilcode Zuordnung gesteuert vverden Dazu mu angegeben werden 1 die Adresse des Feldes in dem der Verteilungsnamen steht der beim YOPEN fest gelegt wurde 2 die Adresse des Verteilcode Gruppenblocks DCG der zugeordnet oder modifiziert werden soll 3 die Adresse des ACB Steuerblocks der das g ltige Kennzeichen der Anwendung AID enth lt oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu das Kennzeichen vorher z B mit YMOD
215. eilcodes Beispiel An die Anwendung die im fr heren Beispiel siehe Seite 58 von der Prim rtask er ff net wurde soll nun eine Sekund rtask angeschlossen werden Dabei soll gepr ft wer den ob dies auch tats chlich die nachfolgende Er ffnung ist Asynchrone Meldungen sollen verarbeitet werden Der Verteilungsname ist in diesem Fall BUCHT Sekund rtask YOPEN 1 1 APPNAME ADDRI VERIFY SECONDARY ENB ENBAD ATTR SHARE DISNAME DISAD USEPW X O000FFFO ADDRI DC CL8 BUCHUNG ENBAD YENB z DISAD DC CL8 BUCHI 66 987 2135 8 Zustand einer Anwendung ver ndern YSETLOG 3 1 2 Zustand einer DCAM Anwendung ver ndern 2 Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register rare gt Register n Nummer des Registers AID Kennzeichen der Anwendung 2 RPB addr1 YSETLOG RPB NEA OPTCD START 1 ACB relexp 2 FDBK R ckmeldung siehe Anhang Seite 298 DCAM gibt zur ck Register 15 siehe Anhang Seite 298 FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der die DCAM Anwendung beschreibt Es soll der Zustand einer DCAM Anvvendung ver ndert werden Voraussetzung ist
216. elben Verteilungsnamen angeben Der Bereich auf den durch diesen Operanden verwiesen wird mu die folgenden Bedin gungen erf llen Der Bereich mu ein 8 Byte langes Feld sein Der Name mu alphanumerisch und linksb ndig ausgerichtet sein das erste Byte mu alphabetisch sein A Z Das hei t der Name mu den Konventionen f r Assembler Namen entsprechen Nicht genutzte Byte des Feldes m ssen mit Leerzeichen X 40 aufgef llt sein LOGPASS kennwort3 nur bei NEA Transport Service Vorgabe eines Kennworts zum Aufbau einer Verbindung Funktion des Kennworts Bei jeder Aufforderung zum Verbindungsaufbau die an diese DCAM Anwendung gerichtet wird mu der auffordernde Partner das Kennwort angeben LOGPW im CCB Steuerblock Dieses Kennwort kann w hrend einer bestehenden Anwendung nicht ge ndert werden Wenn bei vorhandener Kennwort Vorgabe der auffordernde Partner oder der Anwender der Datenstation kein oder ein falsches Kennwort angibt so weist DCAM die Aufforde rung zum Verbindungsaufbau zur ck Die auffordernde Task wird durch die R ckmel dung von der Zur ckweisung benachrichtigt siehe Anhang Seite 298 Dieser Operand wird nur ausgewertet bei YOPEN durch eine Prim rtask wenn im ACB ATTR LOGON gesetzt wurde kennwort3 kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante in der L nge von 4 Byte angegeben werden Der Standard wert ist X 00000000 gle
217. en CCB Steuerblock mit der Adresse CCB1 beschrieben ist soll die Aufbereitung der Nachrichten bei Eingabe EDITIN von PHYS auf LINE gesetzt werden YOPNCON RPB RPB1 YMODCB BLK CCB BLKADDR CCBI1 EDITIN LINE YCHANGE RPB RPB1 RPBI YRPB 1 1 weitere Angaben betreffen YOPNCON CCB1 YCCB PRONAME NAMI PTNNAME NAM2 EDIT SYSTEM EDITIN PHYS ACBI YACB 987 2135 8 Aufforderung zur cknehmen YCLSCON 3 2 5 Aufforderung zur cknehmen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register nn gt Register n Nummer des Registers AID Kennzeichen der Anwendung 4 RPB addr1 YCLSCON RPB NEA ISO ACB relexp 1 CCB relexp 2 FDBK R ckmeldung siehe Anhang Seite 298 DCAM gibt zur ck Register 15 siehe Anhang Seite 298 FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte CCB PTNNAME relexp 2 Partnername 8 Byte PRONAME relexp 2 Prozessorname 8 Byte ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der den Aufruf beschreibt Es soll eine Aufforderung zur ckgenommen vverden Es mu angegeben werden 1 entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen der Anwendung AID enth lt oder ein Register welches das g ltige Kennzeichen ent h lt Fehlt die Angabe mu vorher z B mit YMODC
218. en Informationen des CLT Eintrags berschrieben werden der durch den Kettungsnamen identifiziert wird Die Informationen des CLT Eintrags stehen nur w hrend des Aufrufs zur Verf gung Die Angaben im CCB werden nicht ver ndert Dieser Operand wird ausgewertet bei YOPNCON jedoch nur wenn der Operand LINK angegeben ist TRUNC PROC KEEP TRUNC KEEP Wenn die Nachricht l nger ist als die im Makroaufruf YRECEIVE ange gebene L nge wird der zu lange Teil abgeschnitten und gel scht Der YRECEIVE Aufruf wird ausgef hrt Es wird jedoch eine R ckmel dung siehe Anhang Seite 298 erzeugt die den berlauf anzeigt Im ARECLN Feld siehe Anhang Seite 291 des Steuerblocks RPB wird die L nge des Datenrestes angezeigt Wenn die Nachricht l nger ist als die im Makroaufruf YRECEIVE ange gebene L nge wird der zu lange Teil f r einen nachfolgenden YRECEIVE OPTCD SPEC aufgehoben Der YRECEIVE Aufruf wird ausgef hrt Es wird jedoch eine R ckmel dung siehe Anhang Seite 298 erzeugt die besagt da ein berlauf besteht und die Daten aufgehoben wurden Im ARECLN Feld siehe Anhang Seite 291 des Steuerblocks RPB wird die L nge des Datenrestes angezeigt Dieser Operand wird ausgewertet bei YOPNCON YCHANGE YRECE VE wenn OPTCD CCBTK im RPB gesetzt wurde und die L nge der bermit telten Nachricht gr er als der im AAREALN Feld angegebene Wert ist YSENDREC wenn OPTCD CCBTK im RPB gesetzt wurde un
219. en Zeilen einer Nachricht werden als Einheit behandelt NHOM Die Nachricht wird strukturiert ausgegeben d h jede einzelne logische Zeile der Nachricht ist eine Einheit Dieser Operand wird ausgewertet bei YOPNCON und YCHANGE jedoch nur wenn EDIT SYSTEM und EDITOUT LINE gesetzt wurde I EDITOUT nur bei NEA Transport Service NEXTEND EXTEND Der Bildschirm ist standardm ig gesch tzt Ungesch tzte Felder m ssen durch logische Steuerzeichen definiert werden und werden alle bei der Eingabe zur DVA bertragen NEXTEND Die Ausgabedaten sind nicht gesch tzt Dieser Operand findet nur Anwendung wenn EDITOUT LINE gesetzt wurde und beim Einsatz von Datenstationen des Typs 975X 976X 816X und 3270 Mit Ausnahme von BELL LCASE und GETFC werden keine ED T Funktionen ber ck sichtigt Auf der Tastatur sind die Tasten RU EFZ AFZ und LSP gesperrt Das Kontrollzeichen NL in der Eingabe ist bei EXTEND nicht erlaubt FDBK 04 00 48 Wenn YSEND mit EXTEND benutzt wird setzt DCAM automatisch EDITIN EXTEND beim n chsten YRECEIVE Dieser Operand wird ausgewertet bei YSEND 181 YCCB Makroaufrufe fLOGC 1 SEL nur bei NEA Transport Service NLOGC LOGC Alle logischen Steuerzeichen einer Nachricht werden ausgewertet und in Ger testeuerzeichen umgesetzt Drucker Unterst tzung Spezielle physikalische Steuerzeichen werden ausgewertet siehe Handbuch VTSU Kapitel Logische Steuerzeichen Andere Zei
220. enen private extensions ein und derselben DTE Adresse Die verschiedenen DTE Adressen oder private extensions identifizieren in der X 25 Stationstabelle jeweils eigene Eintr ge Entsprechend den verschiedenen Eintr gen gehen die Verbindungs Aufforde rungen an verschiedene nahe TRANSDATA Partner 377 IDCAM Benutzerschnittstelle Anhang 378 3 Parallelverbindungen 11 12 Mehrere incoming calls von ein und derselben fernen DTE Adresse 45890007 keine private extensions aufgrund der Verbindungs Aufforderun gen von einer oder mehreren fernen Anwendungen 3 Sie f hren entsprechend dem ersten Eintrag f r die DTE Adresse 45890007 in der X 25 Stationstabelle von XAR 2 jeweils zu Verbindungs Aufforderun gen an ein und denselben nahen TRANSDATA Partner ANVVR1 13 st der Stellvertreter ANVVL1 in XAR 2 mit PARVER JA generiert so k n nen mehrere parallele Verbindungen zu ANVVR1 aufgebaut vverden 14 5 Der Name des auffordernden Partners aus der X 25 Stationstabelle von XAR 2 wird bei parallelen Verbindungen jeweils mit einer 3 stelligen Lauf nummer modifiziert Erkl rung zu Beispiel 2 16 2 F r den incoming call von der fernen DTE Adresse 45890008 ist im XAR 1 kein naher Partner vordefiniert 17 Im Pradialog mit der Verbindungssteuerung des fernen X 25 Anschlu rechners XAR 1 nennt ANVVR1 den gew nschten fernen Partner 18 Der Pradialog l uft als Datenaustausch ber die aus DCAM Sicht bereits
221. enommen Verwendung der Zeilen Datenstation die Behandlung der an das System zum Senden bergebenen Nachrichten nur bei NEA Transport Service bei LINE bzw PHYS Datensichtstationen 8151 8152 816X 975X 976X 3270 Die Nachricht soll auf dem an der Datensichtstation angeschlossenen Drucker zus tzlich ausgegeben werden HCOPY Fehlt die Angabe wird sie nicht auf dem Drucker ausgegeben NHCOPY Es ist zu pr fen ob ein solcher Drucker auch angeschlossen ist ggf durch eine Abfrage der Partnercharakteristika siehe Seite 100 bei LINE die Nachricht soll unstrukturiert ausgegeben werden HOM Fehlt die Angabe wird die Nachricht strukturiert ausgegeben d h jede logische Zeile wird als Ein heit behandelt NHOM bei LINE Datensichtstationen 975X 976X und 816X der gesamte Bildschirm ist durch das System standardm ig gesch tzt EXTEND Es werden keine logischen Steuerzeichen einer Nachricht ausgewertet NLOGC alle Zeichen lt X 40 werden durch SUB Schmierzeichen ersetzt z B Ausgabe von Druckernachrichten auf Terminal bei LINE es werden logische Quittungen von der Druckerstation angefordert LACK das Kennwort zum Aufbau einer Verbindung siehe YOPNCON ACQUIRE Seite 80 nur bei NEA Transport Service die Beschreibung der Verteilcodes siehe eigenen Abschnitt Seite 89 nur bei NEA Transport Service die Adresse des Feldes in dem der Kettungsname steht da die Angaben im CCB mit den Infor
222. er XSTAT siehe Handbuch Generierung eines Datenkommunikationssystems die zum Verbindungsauf bau aufgefordert werden sollen Die PROCON Contingency Routine wird je definiertem Partner einmal zum Ablauf ge bracht damit eine Aufforderung zum Aufbau der Verbindung an ihn gerichtet werden kann DCAM erwartet keine Reaktion auf diese Meldung Es bleibt dem Anwender berlassen ob eine Verbindung aufgebaut wird Folgende Informationen werden beim Einsprung in die PROCON Contingency Routine bergeben das Kennzeichen der DCAM Anwendung AID in Register 3 der symbolische Name des Partners in Register 4 und 5 der symbolische Name des Prozessors an dem der Partner angeschlossen ist in Register 6 und 7 COMEND Sobald das Kommunikations Zugriffssystem beendet wird SHUTDOWN oder wenn ein Schlie en der DCAM Anwendung erzwungen wird siehe Abschnitt DCAM Anvven dung schlie en Seite 71 erh lt der Anwender diese Meldung Im Falle eines SHUTDOVVN bzw eines erzwungenen Schlie ens wird die Anwendung von DCAM geschlossen Es wird keine Reaktion vom Anwender erwartet Im Falle einer entsprechenden Warnung kann keine DCAM Anvvendung mehr er ffnet werden bzw keine Verbindung mehr aufgebaut werden Nach einer bestimmten f r das Kommunikationssystem vordefinierten Zeit siehe Handbuch Administration und Dienste eines Datenkommunikationssystems wird ein SHUTDOVVN bzw ein erzvvungenes Schlie en d
223. erden keine symbolischen Gr en f r die Werte des Feedback Feldes vergeben 987 2135 8 Anhang U987 J Z135 8 Steuerbl Pseudoabschnitt DSECT f r den Steuerblock ACB YDDACB YDDACB YDDAHDTY YDDAHDD YDDAHDCB YDDAHDLN YDDAAPPN YDDADISN YDDAENB YDDAAID YDDAATI YDDAATSH YDDAATLO YDDAATDI YDDAATIS YDDAAHNM YDDAATTA YDDARECT YDDAPRIT YDDANOTK YDDAVERI YDDANO YDDAPRIM YDDASEC YDDAOPT YDDAPERM YDDAACL5 YDDADCL5 YDDALINK YDDALGPA YDDAPSSO YDDAPWO YDDAFDBK YDDAFDBK ARAKAKAKK 1 1 EXTERNAL SYMBOL DICTIONARY cke und R ckmeldungen START YDDACB EQUeY DSECT HEADER OF CONTROL BLOCK ACB DC CL3 ACB TYPE OF CONTROL BLOCK DC Cl DCAM CONTROL BLOCK DC DCAM INTERFACE VERSION DC AL2 YDDALEN 2 YDDAHDTY LENGTH OF BODY OF CNT BLOCK BODY OF CONTROL BLOCK ACB DS A A APPNAME DS A A DISNAME DS A A ENB DS F APPLICATION IDENTIFIER AID DS XL1 BYTE 1 FOR ATTR EQU X 80 NSHARE IF BIT 1 N 1 EQU X 40 ATTR NLOGON IF BIT 1 N 1 EQU x 20 ATTR NDISCO IF BIT 1 N EQU KA O2 ATTR ISO EQU X 0
224. erliste darf inklu sive der Klammern und Kommata 127 Zeichen nicht berschreiten Drei Punkte nach einem Komma bedeuten da der davor stehende Operand mehr fach wiederholt werden kann schl sselvvort neuer vvert Mnemotechnische Werte Merknamen die in mehreren Aufrufen verwendet wer den F r die folgenden mnemotechnischen Werte gelten dieselben Konventionen wie sie f r die Makroaufrufe des Ablaufteils festgelegt sind Anhang Seite 322 relexp absexp value Registerangabe oder absexp addr Registerangabe oder relexp character symbol integer code register F r register ist die Nummer eines Mehrzvveckregisters in runden Klammern anzu geben Alle weiteren Werte werden da sie nur einmal vorkommen beim jeweiligen Aufruf erl utert 987 2135 8 987 2135 8 Makroaufruf YACB YAPPL YCCB YCHANGE YCLOSE YCLSCON YCONN YDCG YDIP YENB YFORBID YGENCB YINQUIRE YMODCB YOPEN YOPNCON Namen Zuveisung k Existenz 5 Namen Zuveisung Daten ber mittlung Existenz Verbindung Verbindung Makroaufrufe Beschreibung Erzeugen eines Anvendungssteuerblocks Speichern von Angaben zur DCAM Anvendung in der CLT und auch L schen dieser Angaben Erzeugen eines Verbindungssteuerblocks Andern von Eigenschaften einer bereits aufgebau ten Verbindung Schlie en einer D
225. erteilung soll ber die empf ngerglobale oder absenderspezifische Warteschlange erfolgen Vor aussetzung ist da in der Prim rtask die Anwendung mit dem Attribut SHARE er ffnet wurde siehe Seite 54 Dazu mu angegeben werden 1 150 als Anzeige da mit dem ISO Transportdienst gearbeitet werden soll Fehlt die Angabe wird standardm ig mit einer DCAM NEA Transport Service Anvven dung gearbeitet 2 der Namen der DCAM Anwendung Der Name mu mit dem von der Prim rtask vergebenen identisch sein Er steht in einem hier adressierten Feld von 8 Byte L nge 3 das Kennwort wenn die DCAM Anwendung durch ein solches gesch tzt ist durch die Angabe von USEPASS in der Prim rtask bzw durch ein Kennwort in der RDF 4 wie in der Prim rtask das Attribut SHARE 5 die Nummer der DCAM Version vvenn dies in der Prim rtask geschehen ist Die DCAM Versionsnummer mu in Prim r und Sekund rtask bereinstimmen Weiterhin kann angegeben werden 6 da DCAM Meldungen siehe Seite 38 bearbeitet werden sollen In diesem Fall ist ein Steuerblock ENB zu adressieren Fehlt die Angabe werden sie nicht bear beitet 7 die Adresse des Feldes in das DCAM den symbolischen Namen des eigenen Pro zessors eintr gt 8 die Adresse des Feldes in dem der Kettungsname steht 9 da die Angaben im ACB mit den Informationen des CLT Eintrags CLT Communication Link Table berschrieben werden sollen der durch den Kettungsname
226. ervice Anwendungen den Verteilungsna men bei YPERMIT und YFORBID DCAM tr gt den Namen des Partner Prozessors bei YINQUIRE mit dem Operanden OPTCD CIDXLATE ein AREALN absexp L nge des Bereiches auf den durch AREA verwiesen wird Dies kann sein die L nge der Verbindungsnachricht h chstens 80 Byte bei DCAM NEA Transport Service Anvven dungen und 32 Byte bei DCAM ISO Transport Service Anwendungen bei YOPNCON zu sendende Nachricht bei YSEND und YSENDREC DCAM bermittelt die Daten in der hier angegebenen L nge ausgehend von der im AREA Operand angegebenen Adresse Die maximale L nge einer auf einer bestimmten Verbindung sendbaren Nachricht erh lt der Anwender im MAXLN Feld des CCB Steuerblocks von DCAM bergeben Wenn der Bereich AREA einen Namen z B Verteilungsnamen enth lt ist die L nge implizit 8 Byte d h AREALN wird nicht ausgewertet Adresse eines CCB Steuerblocks Er beschreibt die Verbindung auf die sich der Makro aufruf bezieht der hier beschrieben wird Dieser Operand wird ausgewertet bei YOPNCON YCLSCON YCHANGE YSEND YRECEIVE und YSENDREC Der Operand wird auch ausgewertet bei YINQUIRE wenn OPTCD REQLOGON TOPLOGON PTNCHAR MONCHARS PEROTERM oder BTERMINF gesetzt wurde EID relexp Hier wird die Adresse des Ereigniskennzeichens angegeben das der Anwender nach Abgabe eines ENAEI Operand EIIDRET erhalten hat Das Ereignis welches hier gekennzeichnet ist i
227. es 8 Byte langen Feldes in dem der Partnername steht 2 die Adresse eines 8 Byte langen Feldes in dem der Prozessorname des Partners steht 3 da das Kennzeichen der Verbindung abgefragt werden soll 4 entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen der Anwendung AID enth lt oder ein Register welches das g ltige Kennzeichen ent h lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein Hinweis Es k nnen nur Namen von Partnern abgefragt werden die mit der hier angegebe nen Anwendung die von dieser Task er ffnet wurde verbunden sind Bestehen bei DCAM ISO Transport Service Anwendungen zu einem Partner mehrere Verbindungen Parallelverbindungen so wird eines der g ltigen Kennzeichen zur ck geliefert 113 YINQUIRE Partner und Prozessornamen 3 2 2 10 Partner und Prozessornamen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register p gt Register n Nummer des Registers AID Kennzeichen der Anwendung 4 CID register r gt Register m Nummer des Registers CID Kennzeichen der Verbindung 5 RPB addr1 YINQUIRE 1 RPB NEA ISO AAREA relexp 1 AREA relexp 2 OPTCD CIDXLATE 3 ACB relexp 4 L FDBK R ckmeldung siehe 7 Anhang Seite 298 DCAM gibt z
228. es Verarbeitungsrechners Die ersten vier Byte der Partnercharakteristika Vom Partner akzeptierte Verwendung logischer Datenstationen APPSTART ANYSTART wie vom Partner vorgeschlagen Maximale L nge der Empfangsnachrichten nur bei MDATA Y der Inhalt ist USER oder SYSTEM Es soll zum Aufbau einer Verbindung aufgefordert werden Bei dieser Variante m ssen bei DCAM NEA Transport Service Anwendungen keine Verwendung von Verteilcodes bei der Er ffnung der DCAM Anwendung die Attribute NSHARE siehe Seite 51 oder SHARE mit NDISCO siehe Seite 54 gesetzt worden sein Dazu mu angegeben werden 1 2 die Adresse des Steuerblocks CCB in dem die aufzubauende Verbindung be schrieben ist da zu einem Aufbau aufgefordert werden soll Weiterhin kann angegeben werden 3 entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen der Anwendung AID enth lt oder ein Register welches das g ltige Kennzeichen ent h lt Diese Angabe kann entfallen wenn das Kennzeichen vorher z B mit YMODCB in den RPB eingetragen worden ist 81 YOPNCON 9a Auffordern zum Aufbau die Adresse eines Bereichs in dem die mit der Aufforderung zu bermittelnde Ver bindungsnachricht steht ferner die L nge dieser Nachricht h chstens 80 Byte bei DCAM NEA Transport Service Anwendungen und 32 Byte bei DCAM ISO Trans port Service Anwendungen L ngere Verbindungsnachrichten werden ohne War nung abgeschnitten
229. eser Operand wird ausgewertet bei YOPEN durch eine Prim rtask YOPEN durch eine Sekund rtask Die Angabe von ATTR SHARE ist hier obligato risch Ist SHARE nicht angegeben wird der YOPEN Aufruf nicht ausgef hrt und es wird eine entsprechende R ckmeldung siehe Anhang Seite 298 erzeugt PRONAME relexp Adresse eines 8 Byte langen Feldes in das DCAM den Standard Namen des eige nen Prozessors eintr gt Fehlt die Angabe wird der Name nicht zur ckgegeben Dieser Operand wird ausgewertet bei YOPEN ENB relexp Adresse des Ereignis Meldungsblocks ENB Sie verbindet den ACB Steuerblock mit dem ENB Steuerblock Der ENB Steuerblock enth lt die Adressen der Kennzeichen der Contingency Routinen die zum Ablauf gebracht werden sollen wenn bestimmte Ereig nisse gemeldet werden siehe Seite 38 und Seite 197 Es kann in mehreren ACB Steuerbl cken auf denselben ENB Steuerblock verwiesen wer den Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask oder Sekund rtask 987 2135 8 159 YACB Makroaufrufe LINK relexp Adresse des Feldes in dem der Kettungsnamen steht siehe auch 165 Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask oder Sekund rtask Der Bereich auf den durch diesen Operanden verwiesen wird mu die folgenden Bedin gungen erf llen Der Bereich mu ein 8 Byte langes Feld sein Die Zeichen m ssen linksb ndig ausgerichtet sein Der Name mu alp
230. fassen In der folgenden Tabelle wird ein berblick ber die beschriebenen Aufrufe gegeben mit ihrer Zuordnung zu den Funktionen von DCAM und einer kurzen Beschreibung Die Makroaufrufe sind in diesem Kapitel ohne R cksicht auf ihre Funktion alphabetisch geordnet um ein leichteres Auffinden zu erm glichen Die unterschiedlichen Rasterungen in den Formaten haben folgende Bedeutung 4 Diese Operanden gelten nur f r DCAM ISO Transport Service Anwendungen III Diese Operanden gelten nur f r DCAM NEA Transport Service Anwendungen Keine Rasterung bedeutet da diese Operanden sowohl f r DCAM ISO Transport Service wie auch f r DCAM NEA Transport Service Anwendungen gelten 987 2135 8 153 Makroaufrufe 154 Sie vverden nach dem folgenden Schema beschrieben symbolischer Name Makroaufruf schl sselwort parameter Die Reihenfolge der Schl sselwortparameter ist beliebig n eckigen Klammern stehende Operanden k nnen gesetzt oder weggelassen werden Geschweifte Klammern enthalten alternative Angaben die untereinander geschrieben sind Ein unterstrichener Operand LOGON wird bei Nichtangabe dieses Operands gesetzt Standardwert Runde Klammern enthalten eine Operanden Unterliste eines oder mehrerer durch Kommata getrennter Operanden Die runde Klammer kann wegfallen wenn die Unterliste aus nur einem Operanden besteht Die L nge der Unt
231. fen eines Ereignisses eine Unterbrechungsroutine Contingency gestartet werden asynchroner SOLSIG siehe 4 Schritt mu sie definiert wer den Der Aufruf ENACO enable contingency legt die Routine und ihre Anfangsadresse fest Soll eine Contingency nicht oder nur unter Ber cksichtigung anderer Routinen zum Ablauf kommen kann ihr gezielt eine Priorit t von 1 niedrigste bis 127 h chste zu geordnet werden Diese kann w hrend des Ablaufs ge ndert wer den Makroaufruf LEVCO siehe Handbuch BS2000 Makroaufrufe an den Ablaufteil Die Routine wird auch angesto en wenn die maximale Wartezeit des SOLSIG abgelaufen oder ein Fehler aufgetreten ist Wird eine Contingency Routine gestartet erh lt der Anwender in verschiede nen Registern Informationen siehe dazu die Tabellen der Register belegungen im Anhang Seite 317 Alle weiteren Register mu er selbst versorgen auch die Basisregister Auf Registerinhalte der unterbrochenen Routine oder der Hauptroutine kann er mit dem Makroaufruf siehe Handbuch BS2000 Makroaufrufe an den Ablaufteil zugreifen 3 Schritt Das Ereigniskennzeichen EID mu angegeben werden wenn im YOPNCON YRECEIVE oder YSENDREC der Operand OPTCD ASY gesetzt wird Dazu wird die Adresse des Feldes ange geben in den der Makroaufruf ENAEI das Kennzeichen hinterlegt hat Es mu ferner definiert werden da der Aufruf in eine War teschlange eingetragen werden soll OPTCD Q au er bei YOPN
232. fikationen k nnen veranla t werden Exit Case Feld in Modifikation YDDEXPL APPOPN DXPW das RDF Pa wort Operand USEPW im ACB wird beim BCAM Aufruf durch das bergebene Pa wort ersetzt CONACC die Verbindungsnachricht LOGON MESSAGE des Benutzers CONACQ Inhalt von AREA vird vor dem BCAM Aufruf durch die bergebenen Daten ersetzt L schen der Verbindungs nachricht falls YDDXLOGL 32767 CONACO bei DCAM NEA Transport Service Anvendungen wird das LOGON Pa wort Operand LOGPW im CCB vor dem BCAM Aufruf durch das bergebene Pa wort ersetzt Einschr nkungen f r DCAM Exit Routinen F r die Programmierung von DCAM Exit Routinen gelten die im Handbuch 52000 System Exits beschriebenen Einschr nkungen Um Inkonsistenzen in der DCAM Daten struktur und Deadlocksituationen zu vermeiden gelten f r DCAM Exit Routinen zus tz lich folgende Einschr nkungen 1 Auf alle Felder der DCAM Datenstruktur DARPPAR Steuerbl cke darf nur lesend zugegriffen werden Schreibzugriff ist nur f r die R ckgabefelder in der Parameterliste YDDEXPL er laubt 2 Essind keine BCAM Aufrufe erlaubt 3 Die Exit Routine darf keine Locks setzen 4 Der Proze level PCB Level mit der die Exitroutine l uft darf nicht ver ndert wer den 987 2135 8 6 2 4 987 2135 8 DCAM SYSTEM EXIT DSECT Makroaufrufe f r die DCAM Steuerbl cke F r das Layout der DCAM Steuerbl cke wird keine Kompatibilit
233. fl sung des Datenstaus durch ein GO Signal aufgefordert werden das Senden wieder aufzunehmen PROC SIGNAL Fehlt diese Angabe wird kein GO Signal gegeben 5 es soll die Vollst ndigkeit der Statusinformation der Datensichtstation 9763 ber pr ft werden Bei vollst ndiger Statusinformation wird das R ckgabefeld FDBK 3 auf X 80 ge setzt bei unvollst ndiger Statusinformation auf X 40 In beiden F llen erh lt der Anwender keine Nachricht 6 Nachrichten sollen als Bitmuster im Kommunikationssystem ohne Code berset zung bermittelt werden BINARY Voraussetzung ist da auch EDIT USER gesetzt wurde siehe weiter unten nur bei NEA Transport Service Fehlt die Angabe wird die Nachricht im Code des eigenen Verarbeitungsrechners von DCAM erwartet bzw bergeben SYSCODE nur bei NEA Transport Service 7 die Daten bermittlung soll von dieser Anwendung begonnen werden APPSTART Ohne Angabe wird nichts festgelegt ANYSTART nur bei NEA Transport Service 987 2135 8 Verbindung aufbauen YOPNCON 987 2135 8 8 es sollen logische Datenstationen beim Senden und Empfangen von Nachrichten verwendet werden EDIT SYSTEM Ist der Partner eine DCAM Anvvendung mu diese Angabe entfallen EDIT USER nur bei NEA Transport Service Falls EDIT SYSTEM eingestellt wurde kann angegeben werden 9 10 11 die Art der logischen Datenstation f r den Empfang von Nachrichten nur bei NEA Transport Ser
234. forderlich sind siehe Seite 126 Die Felder sind mit S f r YSEND und R f r YRECEIVE gekennzeich net Die Beschreibung der einzelnen Operanden ist bei den jeweiligen Einzelaufru fen zu finden 137 YSENDREC Senden und Empfangen kombiniert Beispiel In einem Programm wurde eine Schleife angelegt die solange durchlaufen wird bis ein bestimmtes Ereignis eingetreten ist Danach soll das Programm an der Adresse fortge setzt werden die in Register 3 geladen wurde In der Schleife wird bei jedem Durchlauf eine Nachricht ausgegeben deren L nge in Register 6 steht Es wird auf eine Nachricht von der gleichen L nge maximal 3 Minuten gewartet Bevor die Schleife angesprungen wird wird in Register 5 das Kennzeichen der Verbindung geladen die bedient werden soll W hrend der Schleifendurchl ufe soll immer die glei che Verbindung bedient werden Zu lange Nachrichten werden nicht ber cksichtigt Transportquittungen werden nicht verarbeitet Der Aufruf soll synchron verarbeitet wer den Da nur eine Anwendung in dem Programm er ffnet wurde und immer mit dem glei chen RPB Steuerblock gearbeitet wird wurde zu Anfang das Kennzeichen der Anwen dung AID dort eingetragen SCHLEIFE YSENDREC RPB RPBADDR cID 5 AREA SENDETXT AREALN 6 AAREA EMPFTEXT AAREALN 6 OPTCD SPEC CS Q TRUNC TOVAL 180 Ereignis eingetreten wenn BR 3 wenn nein B SCHLEIFE RPBADDR YRPB SENDETXT DS OF EMPFTEXT EQU 138
235. fruf aktiv sein kein simultaner Aufbau von Parallelverbin dungen Hinweis Wird ein CCB f r mehrere YOPNCON Aufrufe benutzt mu der MAXLN Operand vom CCB jedesmal aktualisiert werden da sonst der vorher von DCAM eingetragene Wert als gew nschtes MAXLN interpretiert wird R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung und der Tabelle der Meldungen zu ent nehmen siehe Seite 74 und Anhang Seite 298 212 U987 J Z135 8 Makroaufrufe YPERMIT 4 17 987 2135 8 YPERMIT L Dieser Abschnitt betrifft nur DCAM NEA Transport Service Anvvendungen Funktion Mit diesem Aufruf wird eine Zuordnung von einer Verteilcode Gruppe wie sie in einem DCG Steuerblock beschrieben ist zu einem Verteilungsnamen hergestellt Die Task die den betreffenden Verteilungsnamen definiert hat empf ngt ab diesem Zeitpunkt die Nachrichten die einen der Verteilcodes enthalten der im zugeordneten Steuerblock DCG beschrieben ist Da maximal 8 Tasks denselben Verteilungsnamen definieren k nnen ist mit diesem Auf ruf unter Umst nden noch keine eindeutige Zuordnung von Nachricht zur Task gege ben Wird YPERMIT erneut aufgerufen kann damit eine bestehende Verkn pfung durch eine neue ersetzt werden siehe auch Seite 141 oder eine Verteilcode Gruppe kann modifi ziert werden YPERMIT kann nur von einer Prim rtask aufgerufen werden Format Name Operation Operanden symbol YPERMIT RPB addr schl sselwort neuer vert
236. g ltigem Kennzeichen CID ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der die DCAM Anvendung beschreibt 102 987 2135 8 Datensichtstation und Zeichensatze YINQUIRE Es soll die Beschreibung von Datensichtstation und Zeichens tzen abgefragt werden Dazu mu angegeben werden 1 die Adresse eines mindestens 14 Byte langen Bereichs in den die Beschreibung von Datensichtstation und Zeichens tzen eingetragen werden sollen siehe Hand buch VTSU Kapitel Statusinformation die L nge des Bereichs in den DCAM die Beschreibung eintr gt mindestens 14 Byte 2 Byte pro Zeichensatz Ist die Beschreibung l nger als dieser Bereich wer den die Zeichens tze weggelassen da die Beschreibung von Datensichtstation und Zeichens tzen abgefragt werden soll entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen AID enth lt oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein entweder die Adresse des Steuerblocks CCB der das g ltige Kennzeichen der Ver bindung enth lt CID oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein 987 2135 8 103 YINQUIRE Peripherie 3 2 2 5 Peripherie iH Dieser Abschnitt gilt nur f r
237. gabe ausgewertet wird Zur Beschreibung der einzelnen Felder siehe RPB Seite 223 und die Tabelle der Steu erblockfelder Anhang Seite 291 R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung siehe Seite 139 und der Tabelle der Meldungen Anhang Seite 298 zu entnehmen 222 U987 J Z135 8 Makroaufrufe 4 21 YRPB Funktion Es wird ein Anforderungsparameter Block RPB request parameter block erzeugt Format Name symbol 987 2135 8 Operanden AAREA relexp AAREALN absexp ACB relexp AREA relexp AREALN absexp CCBerelexpl EID relexp EIDREF information EIDREF2 information REOLOGON TOPLOGON ACCEPT NAMXLATE es IL A 2 ACQUIRE CA NQ COUNTPTN 7 CIDXLATE SPEC SYN TRUNC iz b 75 iL ANY ASY CCBTK TOVAL absexp SY S YRPB Makroaufrufe symbol YRPB BELL ELEMENT NORMAL 11 SUBGROUP sn ELL GROUP EXPRESS il OPTCD PTNCHAR MC S BTERMINF VTSUCB START TACK 1 10 1 STOP SEONO absexp VCBADR relexp Operanden AAREA relexp Adresse eines Bereiches in den der Anwender Daten f r DCAM bereitstellt und in dem DCAM Daten f r den Anwender eintr gt Was in den Bereich bereitgestellt bzw eingetra gen wird ist abh ngig vom gerade aktuellen Makroaufruf der sich auf diesen RPB Steuerblock bezieht
238. ge berlange ist aufbewahrt L nge des Restes ist im ARECLN Feld des RPB Steuerblocks interlegt x x x 00 22 Der angeforderte VTSUCB konnte nicht in den Benutzerbereich bertragen werden OPTCD VTSUCB Die Verbindung arbeitet ohne VTSUCB x 00 26 Status der Datensichtstation 9763 unvollst ndig x x x PROC TERMSTAT 987 2135 8 301 Tabelle der R ckmeldungen Anhang R ckmelde Feld Bedeutung Makroaufruf F F F E Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OTO G T TI I I R T N N G G E R T D V E E E C 00 27 ls u Status der Datensichtstation 9763 eingetroffen PROC TERMSTAT 0 2 Nachricht x x 21 GO Signal x x 22 Transportquittung positiv 23 Transportquittung negativ 4 A 2 Express Nachricht 25 Element 6 Datengruppierung bei 27 Untergruppe DCAM NEA Transport Service 27 Gruppe 29 Weitere Dateneinheiten folgen bei DCAM 7 ISO An 2 Keine weiteren Dateneinheiten folgen wendungen 302 nur in Kombination mit 21 1 GO Signal 987 2135 8 Anhang Tabelle der R ckmeldungen R ckmelde Feld Bedeutung Makroaufruf F
239. ge stellt TACK nur bei NEA Transport Service NTACK TACK Es wird eine Transportquittung f r Nachrichten verlangt die mit YSEND oder YSENDREC gesendet werden NTACK Es wird keine Transportquittung f r Nachrichten verlangt die mit YSEND oder YSENDREC gesendet werden Dieser Operand wird ausgewertet bei YSEND und YSENDREC Eine Transportquittung kann positiv oder negativ sein Das bedeutet bei Datenstationen als Empf nger den ordnungsgem en oder nicht ordnungsgem Ben Abschlu der Daten bertragungsprozedur bei Tasks als Empf nger da der Empfang einer Nachricht mit den Aufrufen YRECEIVE bzw YSENDREC ordnungsgem oder nicht ordnungsgem ablief Wenn eine TACK Contingency Routine definiert worden ist ergibt sich die Art der Quit tung positiv oder negativ aus dem Inhalt von Register 6 Ist keine TACK Contingency Routine definiert worden so kann die Art der mit YRECEIVE empfangenen Quittung in FDB4 des R ckmeldefeldes gefunden werden siehe Anhang Seite 298 236 987 2135 8 Makroaufrufe YRPB 987 2135 8 SEQNOzabsexp nur bei NEA Transport Service Es vvird der zu sendenden Nachricht die hier angegebene Nummer zugeordnet Der Standardvvert ist 0 der Maximalvvert ist 32767 Dieser Operand vvird ausgevvertet bei YSEND und YSENDREC Hinvveis Die Laufnummer kann auch durch ein Register versorgt vverden vvenn die Register nummer direkt beim YSEND angegeben vird YSEND S
240. ge Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein 4 entweder die Adresse des Steuerblocks CCB der das g ltige Kennzeichen der Ver bindung enth lt CID oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein 987 2135 8 101 YINQUIRE 3 2 2 4 Datensichtstation und Zeichens tze Datensichtstation und Zeichens tze 2 Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register Ke Register n Nummer des Registers AID Kennzeichen der Anwendung 4 CID register Fre gt Register m Nummer des Registers CID Kennzeichen der Verbindung 5 RPB addr1 YINQUIRE RPB NEA AAREA relexp 1 AAREALN absexp 2 OPTCD MONCHARS 3 ACB relexp 4 CCB relexp 5 FDBK R ckmeldung siehe 7 Anhang Seite 298 DCAM gibt zur ck Register 15 siehe Anhang Seite 298 Feld f r Informationen FDB 1 FDB 2 FDB 3 FDB 4 ber Datensichtstation 1 Byte 1 Byte 1 Byte 1 Byte und Zeichens tze siehe Handbuch VTSU Kapitel Statusinformation mind 14 Byte 2 Byte je Zeichensatz CCB Steuerblock mit
241. gef hrt ist Der Returncode steht im Register 15 und im Feld FDBK im RPB zur Verf gung Was geschieht aber wenn der Aufruf nicht sofort befriedigt werden kann z B bei YOPNCON YRECEIVE oder YSENDREC In diesem Fall kann man ausw hlen zwischen der M glichkeit auf das Eintreffen des Ereignisses zu warten z B Eintreffen der Nach richt oder aber die Steuerung mit dem entsprechenden Hinweis sofort zur ck erhalten OPTCD Q option command queue Der Aufruf wird in eine Warteschlange eingetragen bis das erwartete Ereignis ein tritt Daf r kann mit TOVAL n eine maximale Wartezeit festgelegt werden TOVAL timeout value Der Aufruf wird beendet d h der Anwender erh lt die Steuerung zur ck wenn das Ereignis eingetreten ist oder die Wartezeit abgelaufen ist OPTCD NQ Der Aufruf vvird sofort beendet auch dann vvenn das ervvartete Ereignis nicht einge treten ist Bei einem YOPNCON OPTCD ACCEPT siehe Abschnitt Makroaufrufe bezogen auf eine Verbindung Seite 73 kann dies bedeuten da keine Verbin dungsaufforderung des Partners vorhanden war Bei einem YRECEIVE bzw YSENDREC siehe Abschnitt Makroaufrufe bezogen auf eine Daten bermittlung Seite 125 war die Nachricht noch nicht eingetroffen In diesem Fall mu der Anwen der den Aufruf ggf zu einem anderen Zeitpunkt wiederholen Hinweis Es kann immer nur ein synchroner Aufruf ablaufen der Wartezeit verursacht YOPNCON ACQUIRE YOPNCON ACCEPT
242. hanumerisch und linksb ndig ausgerichtet sein das erste Byte mu alphabetisch sein A Z Das hei t der Name mu den Konventionen f r Assembler Namen entsprechen im 1 Byte ist f r System Anwendungen reserviert Nichtgenutze Byte des Feldes m ssen mit Leerzeichen X 40 aufgef llt sein PERM PERM Die Angaben im ACB sollen von den Informationen des CLT Eintrags berschrieben werden der durch den Kettungsnamen identifiziert wird Der Anwender mu ein Feld f r einen Anwendungsnamen angeben DCAM schreibt den tats chlichen Anwendungsnamen bei YOPEN in dieses Feld TEMP Die Informationen des CLT Eintrags stehen nur w hrend des Aufrufs zur Verf gung Die Angaben im ACB werden nicht ver ndert Dieser Operand wird ausgewertet bei YOPEN 160 987 2135 8 Makroaufrufe YACB USEPASS kennwortl Vorgabe eines Kennworts zum Anschlu von Sekund rtasks Funktion des Kennworts Jede Sekund rtask mu bei der Er ffnung der DCAM Anvven dung dieses Kennwort angeben USEPW im ACB Steuerblock Wenn bei vorhandener Kennwortvorgabe eine Sekund rtask beim Er ffnen der DCAM Anvvendung kein oder ein falsches Kennwort angibt so weist DCAM den entsprechenden Makroaufruf YOPEN zur ck Die Sekund rtask wird durch die R ckmeldung von der Zur ckwei sung benachrichtigt siehe Anhang Seite 298 Dieses Kennwort zu vergeben ist nicht sinnvoll wenn die Anwendung in der Netzdatei RDF bereits gesch
243. hl sselwort testwert Gibt das Steuerblockfeld schl sselwort an das mit dem bestimmten Wert testwert verglichen werden soll Der Name der Steuerblockfelder und die Testwerte sind aus der entsprechenden Ta belle zu entnehmen siehe Anhang Seite 291 DCG a nur bei NEA Transport Service DIP Gibt den Typ des Steuerblocks an dessen Feld getestet werden soll R ckmeldung Von DCAM zur ckgegebene Informationen Register R ckinformation Bedingungen Der aktuelle Wert im Steuerblock feld ist gr er als der vom Be nutzer vorgegebene Wert Der aktuelle Wert ist kleiner als der vom Anwender gegebene Der aktuelle Wert ist gleich dem vom Anwender gegebenen 987 2135 8 252 Makroaufrufe U987 J Z135 8 Register R ckinformation 15 links b ndig YTESTCB Bedingungen YTESTCB wurde erfolgreich durch gef hrt Die im BLKADDR angegebene Adresse ist keine Steuerblockadresse Obligatorischer Operand fehlt Ung ltige ERET Adresse Der Steuerblock dessen Adresse durch BLKADDR angegeben wurde ist nicht von der in BLK angege benen Art Das Steuerblock Feld ist keines des angegebenen Steuerblocks Die Adresse im MF Operanden ver weist nicht auf eine L Form Operandenliste Die Adresse des Steuerblocks ist ung ltig Ung ltige Parameterliste oder Registernummer Das Subsystem DCAM ist nicht verf gbar F r die Inhalte von Register 15 k nnen mit dem Makroaufruf
244. hl der Anzahl der zur verbundenen Verbindung auf Partner fordernden Partner da die Verbindungsanzahl abgefragt werden soll entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen der Anwendung enth lt AID oder ein Register welches das g ltige Kennzeichen ent h lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein 111 YINQUIRE Kennzeichen der Verbindung CID 3 2 2 9 Kennzeichen der Verbindung CID Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register r gt Register n Nummer des Registers AID Kennzeichen der Anwendung 4 RPB addr1 YINQUIRE RPB NEA ISO AAREA relexp 1 Partnername 8 Byte AREA relexp 2 Prozessorname 8 Byte OPTCD NAMXLATE 3 ACB relexp 4 CID Kennzeichen der Verbindung FDBK R ckmeldung siehe Anhang Seite 298 je DCAM gibt zur ck 1 Register 15 siehe Anhang Seite 298 FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der den Aufruf beschreibt 112 987 2135 8 Kennzeichen der Verbindung CID YINQUIRE 987 2135 8 Es soll das Kennzeichen der Verbindung abgefragt vverden Dazu mu angegeben werden 1 die Adresse ein
245. hlange eingetragen wurden Dieser Operand wird ausgewertet bei YOPNCON YSEND YRESET YRECEIVE und YSENDREC Bei DCAM NEA Transport Service Anwendungen jedoch nur wenn ohne Verteilcodes gearbeitet wird ATTR SHARE NDISCO oder NSHARE Beim Empfang einer Trans portquittung wird dieser Operand nicht ausgewertet YRECEIVE mit OPTCD SPEC ist nicht zul ssig wenn der Partner im CS Zustand ist und ein YRECEIVE Aufruf mit OPTCD SPEC CA noch unerledigt ist YRECEIVE mit OPTCD SPEC ist nicht zul ssig wenn sich der Partner im CA Zustand befindet YSEND mit OPTCD CA ist nicht zul ssig wenn sich der Partner im CS Zustand befin det und f r diesen noch YRECEIVE Aufrufe unerledigt sind oder die blockweise Eingabe nicht abgeschlossen ist YSEND mit OPTCD CS ist nicht zul ssig wenn sich der Partner im CA Zustand befin det und Umschalten auf den CS Zustand gerade stattfindet Hinweis Bei DCAM NEA Transport Service Anwendungen kann DCAM kann die CS CA Option ignorieren wenn eine Eingabe vom Terminal blockweise erfolgt Solange die Eingabe nicht abgeschlossen ist wird der Kommunikationspartner bei DCAM NEA Transport Service Anwendungen in den CS Zustand versetzt Erst nach Beendigung der Eingabe ist bei DCAM NEA Transport Service Anwendun gen die CS CA Option des YRECEIVE wirksam siehe Seite 215 me NO Q Ein Makroaufruf der sich auf diesen RPB Steuerblock bezieht wird in eine Warteschlange eingereih
246. hten an eine bestimmte Task der DCAM Anwendung wird anhand eines Verteilcodes in der Nachricht vorge nommen Diese Angabe ist nur sinnvoll wenn ATTR SHARE gesetzt wurde NDISCO Es wird die Standard Nachrichtenverteilung verwendet ber empf ngerglobale und absenderspezifische Warteschlangen Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask PRIMTASK ATTR REQTASK NOTACK Die Quittung ber einen Nachrichtentransport wird PRIMTASK an die Prim rtask geleitet nur bei NEA Transport Service REQTASK an die eine Quittung anfordernde Task geleitet Diese Angabe ist nur sinnvoll bei ATTR SHARE NOTACK nicht weitergeleitet und vernichtet auch wenn im YSEND bzw YSENDREC Aufruf OPTCD TACK eine positive Quittung angefordert wird Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask LOGON 1 ATTR nur bei NEA Transport Service NLOGON Aufforderungen zum Verbindungsaufbau vverden LOGON bearbeitet NLOGON nicht bearbeitet Dieser Operand vvird ausgevvertet bei YOPEN durch eine Prim rtask 987 2135 8 163 YACB 164 Makroaufrufe DISNAME relexp nur bei NEA Transport Service Adresse des Feldes in dem der Verteilungsname steht Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask wenn ATTR SHARE DISCO gesetzt wurde YOPEN durch eine Sekund rtask wenn die Primartask den Operanden ATTR SHARE DISCO angegeben hat Es k nnen h chstens 8 Tasks dens
247. i jedem YSEND Aufruf einen g ltigen EID f r das GO Signal angeben ein ung ltiger EID f hrt bei Eintreffen des GO Signals zum zwangsweisen Schlie en der Anwendung NSIGNAL Es wird kein GO Signal gegeben wenn die berlastung der Verbin dung aufgel st ist Dieser Operand wird ausgewertet bei YSEND laj Festlegung der Priorit t der Verbindung H chste Priorit t bei PRIO 1 PRIO 1 ist auf Systemanwendungen beschr nkt Niedrigste Priorit t bei PRIO 3 Dieser Operand wird ausgwertet bei YOPNCON wenn im RPB Steuerblock OPTCD ACQUIRE gesetzt wurde 173 YCCB 174 Makroaufrufe ROUTL relexp Adresse einer Liste die Namen verschiedener Verbindungswege zum Partner enth lt Der Bereich auf den durch ROUTL verwiesen wird mu die folgenden Bedingungen erf llen Der Bereich mu eine durchgehende Liste von 8 Byte langen Feldern sein Jedes Feld enth lt einen Verbindungsnamen Der Verbindungsname mu linksb ndig ausgerichtet sein Das erste Zeichen mu alphabetisch sein A Z 2 Nicht gen tzte Byte des Feldes m ssen mit Leerzeichen X 40 aufgef llt sein ROUTN absexp Anzahl der Verbindungswege zu einem spezifischen Partner siehe ROUTL Es sind maximal 16 Verbindungswege m glich USERFLD benutzerfeld Der Anwender erh lt die hier festgelegte Begleitinformation immer mitgeliefert wenn auf diese Verbindung bezogene Ereignisse eintreten oder Nachrichten ankommen Dieser
248. ichbedeutend mit kein Kennwort vorgegeben 987 2135 8 Makroaufrufe YAPPL 4 2 YAPPL Funktion Der Makroaufruf YAPPL wird verwendet um in der taskspezifischen Tabelle CLT com munication link table Angaben ber eine DCAM Anvvendung zu speichern oder zu l schen Dieser Makro vvendet die Namen Zuvveisungsfunktion an siehe Seite 145 Format Name Operanden symbol YAPPL anwendungsname i kettungsname LIN q register kennwort1 1 register fkennvort2 1 register DISNAME register kennwort3 LOGPASS rm register 987 2135 8 165 YAPPL 166 Makroaufrufe Operanden fanvendungsnamel register anvvendungsname gibt den Namen der DCAM Anvvendung an Er kann maximal 8 Byte lang sein und mu alphanumerisch und links b ndig ausgerichtet sein Das erste Zeichen mu alphabetisch sein A Z d h der Name mu den Konventionen f r Assembler Namen entsprechen als erstes Zeichen ist f r Systemanwendun gen reserviert z B TSOS register enth lt die Adresse eines 8 Byte langen Feldes in dem der Anwen dungsname linksb ndig steht Nach rechts sind freie Bytes mit Leerzei chen X 40 aufzuf llen kettungsname register J kettungsname gibt den Kettungsnamen an Er kann maximal 8 Byte lang sein und mu alphanumerisch und links b ndig ausgerichtet sein Das erste Zei
249. ichtung aus Hard und Softwareprodukten die es Kommunikationspart nern erm glicht Daten unter Beachtung bestimmter Regeln auszutauschen Datenstationsbenutzer Terminal user Mensch der eine Datenstation benutzt um mit einem Kommunikationspartner Daten auszutauschen DCAM JAnwendung DCAM application Kommunikationsanwendung die von mindestens einem DCAM Anwendungspro gramm gesteuert wird DCAM 1Anvvendungsprogramm DCAM application programm Programm das die Dienste der Zugrifismethode DCAM benutzt Es steuert eine oder mehrere DCAM Anvvendungen DCAM Daten bermittlungsfunktion DCAM data transmission function DCAM Funktion die im Zusammenhang mit Senden und Empfangen von Nachrich ten und Quittungen steht 987 2135 8 383 Fachvv rter 384 DCAM JEreignis DCAM event DCAM spezifisches Ereignis das zur Koordinierung bestimmter Vorg nge im Daten kommunikationssystem verwendet werden kann Es trifft vom Programmablauf zeit lich entkoppelt ein asynchron eintretendes Ereignis DCAM JExistenzfunktion DCAM existence function DCAM Funktion die im Zusammenhang mit der Erzeugung und Aufl sung von DCAM Anwendungen steht DCAM Namen Zuweisungsfunktion DCAM name assignment function DCAM Funktion die es dem Anwender erlaubt die Anwendungsprogramme unanh n gig von aktuellen Parameterwerten wie DCAM Anwendungsname Partnername usw zu erstellen DCAM Verbindungsfunktion DCAM con
250. ie en der Anwendung in der Sekund rtask Nachrichten f r Verteilungsnamen ohne Sekund rtask Alle weiteren Register enthalten keine definierten Werte und sind daher vom Anwender selbst zu versorgen einschl der Basisregister 321 Mnemotechnische VVerte der Makroaufrufe Anhang 7 4 322 Mnemotechnische Werte der Makroaufrufe Mnemotechnische Werte helfen dem Anwender sich die Form eines bestimmten Ope randen zu merken die er annehmen kann Es sind 8 mnemotechnische Werte die in dieser Beschreibung verwendet werden Ihnen k nnen 8 unterschiedliche Operandenfor men zugeordnet werden siehe Tabelle Mnemotechn Operandenformen Wert Relativ Register Symbol Dezimal Absoluter Code Text Zeichen zusammen bezeich Integer zusammen gesetzter nung gesetzter Ausdruck Ausdruck relexp x absexp x addr x x integer x value x x text x code x characters x x Relative zusammengesetzte Ausdr cke Ein relativer zusammengesetzter Ausdruck wird als solcher definiert wenn sich sein Wert um n ndern w rde falls man das Programm um n Byte von seinem urspr ngli chen Speicherplatz verschiebt Alle relativen zusammengesetzten Ausdr cke m ssen einen positiven Wert haben Ein relativer zusammengesetzter Ausdruck kann auch aus einer arithmetischen Kombination von Ausdr cken bestehen Diese Kombination kann allein aus relativen und absoluten Ausdr cken bestehen Dabei bestehen die f
251. ine erfol gen kann Wird dort ebenfalls ein YRECEIVE mit OPTCD Q gegeben wird er zu r ckgewiesen Bei blockweiser bertragung einer Eingabenachricht von einer Datenstation aus mu jeder Block mit einem YRECEIVE Aufruf empfangen werden Beim Empfang des ersten Blockes einer Eingabenachricht wird diese Verbindung von DCAM in den CS Zustand gesetzt Das bedeutet da die folgenden Bl cke bis zum letzten mit OPTCD SPEC empfangen werden m ssen 987 2135 8 217 YRECEIVE 218 Makroaufrufe Die Verbindung bleibt im CS Zustand bis der letzte Block abgeholt wird d h die CS CA Option des YRECEIVE der den letzten Block abholt wird ausgewertet Unabh ngig vom Empfang im Block Modus mu der Anwender CS Option bei einem YRECEIVE OPTCD KEEP angeben Bei einer blockweisen Eingabe von der Datenstation zeigt GROUP an da die Ein gabe beendet ist SUBGROUP ELEMENT bedeuten da die Eingabe noch nicht beendet ist der n chste Block ist durch YRECEIVE abzuholen DCAM zeigt die Datengruppierung im FDBK4 der R ckinformation an siehe Seite 298 Wenn eine Task festlegt da der VTSUCB auch dann zur ckgegeben werden soll wenn die Verbindung ohne VTSUCB arbeitet schreibt DCAM einen Eintrag in das R ckmeldefeld FDBK3 siehe Seite 298 In Anwendungen SHARE NDISCO bei denen die Nachrichtenverteilung ber die empf ngerglobale Warteschlange CA erfolgt ist es nicht vorhersehbar welche Task die Statusinformation erh lt
252. isen RETCO R cksprung YRECEIVE YRPB bei statischer Blockerzeugung YCCB YSEND YCLOSE YACB YENB bei statischer Steuerblockerzeugung YRPB Beispiel f r die Anvendung einer LOGON Contingency 987 2135 8 41 LOSCON Asynchrone Meldungen 2 8 2 LOSCON Beim Verlust der Verbindung zu einem Partner auf Grund eines Verbindungs abbruchs durch den Operator des Kommunikationssystems oder durch den Partner selbst wird diese LOSCON Meldung gegeben Wenn eine DCAM Anwendung keine LOSCON Contingency Routine definiert hat wird der Verlust einer Verbindung erst beim n chsten auf diese Verbindung bezogenen Aufruf bemerkt Folgende Informationen werden beim Einsprung in die LOSCON Contingency Routine bergeben das Kennzeichen der DCAM Anvvendung AID in Register 3 das Kennzeichen der Verbindung CID in Register 4 die vom Anwender in USERFLD hinterlegte Begleitinformation in Register 5 der Grund f r den Abbruch der Verbindung in Register 6 bzw ob die Verbindung erst nach Ablauf der Vorwarn Zeit abgebrochen wird 42 987 2135 8 Asynchrone Meldungen PROCON COMEND 2 8 3 2 8 4 987 2135 8 PROCON Sobald die DCAM Anvvendung er ffnet wurde bzw am Bedienplatz das BCIN Kom mando siehe Handbuch Administration und Dienste eines Datenkommunikations systems f r den Prozessor des Partners gegeben wurde informiert DCAM diese An wendung ber die im Kommunikationssystem vordefinierten Partn
253. iven Pufferbereich eingeschrie benen Daten bzw L nge des Rests wenn die Nachricht die Pufferl nge berschrei t r ASEQNO value 2 fortlaufende Nummer der empfangenen Nachricht fortlaufende Nummer der TACKNO 2 empfangenen Transportquittung USER benutzer 4 Begleitinformation der Ver feld bindung vie im CCB angege register ben REQTYPE 1 Art des Makroaufrufs FLAG ACTIVE Markierung f r die Bele gung des Steuerblocks durch INACTIVE einen Aufruf FDBK 4 R ckmelde Feld RPBLN value 2 L nge des RPB Steuerblocks 1 987 2135 8 Name des Makro Aufrufs ohne vorangestelltes Zeichen Y 297 Tabelle der R ckmeldungen Anhang 7 2 298 Tabelle der R ckmeldungen Das R ckmeldefeld befindet sich im RPB bzw ACB Steuerblock und ist mit FDBK bezeichnet Es hat eine L nge von 4 Byte R ckmeldefeld FDBK FDBl FDB2 FDB3 feedback field EDB4 Anzeigen Grund der Zur ckweisung error code Zusammenfassung der R ckmeldung summary Die Eintragungen werden sedezimal dargestellt F r die Inhalte k nnen symbolische Adressen generiert werden Makroaufruf YDDFDB Anhang Seite 326 Datenanzeigen Die R ckmeldung wird ebenfalls in Register 15 zur Verf gung gestellt Wenn der ACB oder RPB Steuerblock nicht mehr adressierbar ist wird die R ckmeldung nur in Regi ster 15 zur Verf gung gestellt Bei asynchroner Ausf hrung eines Befehls enth lt Register 15 u U nur Angaben
254. kennwort Angabe LOGPASS register register register J Verbindungskennwort Vorgabe DCAMVER 8 0 Nummer der DCAM Version AID register register 4 Kennzeichen der DCAM Anwendung FDBK 4 R ckmelde Feld ACBLN value 2 L nge des ACB Steuerblocks 292 987 2135 8 Anhang Tabelle der Steuerblockfelder Sehl ssel Wert oder mnemotechnischer Wert Steuer vort des Feld block Steuer Makro Auf lange Erkl rung block ruf zur YGENCB YMODCB YTESTCB f r feldes statischen YSHOWCB Steuerblock erzeugung CCB LINK Kettungsname PRONAME relexp addr addr addr 4 Adresse Prozessorname PTNNAME von Partnername DIP Verteilungs parameter Block APTNCH Partnercharakter istika ROUTL Verbindungswegen MDATA N MORE DATA Mechanismus 4 absexp value value value 4 Maximale Lange der Nachrich ten Dateneinheiten beim Empfangen lokal MAXLN absexp value value value 2 Maximale Lange der Nach richt auf dieser Verbindung PTNCHLN absexp value value value 2 L nge der Partner charakteristika ROUTN absexp value value value 2 Anzahl der Verbindungs vege max 16 LINKMOD PERM bernahme der CLT Eintrage TEMP USERFLD benutzerfeld fbenutzer fbenutzer l fbenutzer 4 Begleitinformation feld feld feld der Verbindung register register register LOGPW kennwort kennwort kennwort kennwort 4 Verbindungskennwort t 1 t Angabe register register J register
255. kroaufruf wird der Inhalt eines bestimmten ACB CCB DCG DIP ENB oder RPB Steuerblockfeldes mit einem vom Anwender vorgegebenen Test wert verglichen Der von YTESTCB durchgef hrte Vergleich ist ein logischer Vergleich Das Ergebnis wird dem Anwender im Register 0 bergeben Aktueller Wert A Testvvert B O wenn B lt wenn A lt Bund gt OwennA gt B Der Aufruf YTESTCB kann nur benutzt werden wenn das DCAM Subsystem erfolgreich geladen wurde Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolgreich abgesetzt hat kann er trotz HOLD Subsystem oder DELETE Subsystem bis Taskende mit DCAM arbeiten gilt auch f r Format Name Operanden symbol YTESTCB ACB CCB BLK RPB BLKADDR addr ERET addr L 1 E addr schl sselwort testwert DCG BLK CCB BLK ENB RPB Gibt den Typ des Steuerblocks an dessen Feld getestet werden soll 251 YTESTCB Makroaufrufe BLKADDR addr Gibt die Adresse des Steuerblocks an ERET addr Gibt die Ansprungadresse einer vom Anwender zu bestimmenden Fehlerroutine an Sie soll ablaufen wenn der YTESTCB nicht oder nicht vollst ndig ausgef hrt werden kann Das Register 0 enth lt in einem solchen Fehlerfall keine sinnvollen Werte fi 1 adi Gibt die Form des Makroaufrufs an siehe Seite 13 sc
256. l len vorangehenden Warnung aufgerufen Der Exit APPSHU wird nicht aufgerufen wenn vor der DCAM Beendigung die TIAM Beendigugn abl uft d h wenn das DCAM Programm als Dialog proze gestartet wurde In diesem Fall wird bereits durch TIAM eine Proze beendigung eingeleitet der Exit wird mit APPTRM aufgerufen 4 Exit Ereignis APPTRM Aufruf der Exit Routine beim internen Schlie en einer Anwendung bei Programm oder Taskterminie rung Funktionen der Exit Routine Neustart einer Ersatztask 5 Exit Ereignis APPFCL Aufruf der Exit Routine bei erzwungenem Schlie en der Anwendung wegen eines DCAM Fehlers 987 2135 8 277 DCAM SYSTEM EXIT 6 Exit Ereignis CONACQ Aufruf der Exit Routine beim Senden einer Aufforderung zum Verbindungsaufbau YOPNCON ACQUIRE nach Pr fung der Benutzerangaben vor Ausf hrung des Aufrufs d h vor Ausgabe der REQCON Nachricht durch das System Funktionen der Exit Routine zus tzliche Pr fungen z B Verbindungsnachricht LOGON Message gem Vereinbarungen des Aufrufs Ablehnen des Aufrufs Modifizieren bestimmter YOPNCON Paramter 7 Exit Ereignis CONACC Aufruf der Exit Routine bei jedem Annehmen eines Verbindungswunsches YOPNCON ACCEPT nach Pr fung der Benutzerangaben vor Bearbeitung des Aufrufs Funktionen der Exit Routine zus tzliche Pr fungen Annehmen de
257. l cke und R ckmeldungen YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD YDD NN NN NS DN 0 0 0 0 0 0 0 1 NND DNDDNDDNDDNDND Ek 346 RSYTI PNAV PSTP PNLG ILPW REJL PCNA ISSE PSTR PNVT PDED RNDCG RIDIS RSYER RNONA PCO PSW cos PRI PRE gt ULU 0 4 R D ri o Ud m 2 2 w U D UNOT UCID UIER UNOE UVER UNCT UNNP UNCS XAXNAZAXAZXXZSXXAAXNXZSAYZ 22 2 RSHOR RSHUT ROSHU RIACT RDCSE RDCLK RIRSE RIRNS RIRNL RERPE RNAUT RSYNO EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ X 44 X 48 X 4C X 50 X 54 X 587 X 5C X 60 X 64 X 687 X 6C X 70 X 74 X 78 X 80 X 847 X 887 X 8C X 90 X 94 X 987 x 9C X A0 X A4 X A8 X AC X B X B4 X B8 X BC Xx C0 X C4
258. lich in Teilst cken auszugeben Dieser Operand wird ausgewertet bei YSEND UND YSENDREC NORMAL 1 nur bei NEA Transport Service EXPRESS NORMAL Die zu sendende Nachricht hat normale Priorit t EXPRESS Die zu sendende Nachricht hat Expre h chste Priorit t ist im Datenkommunikationssystem mit hoher Priorit t zu transportieren und dem Partner sofort ggf mit asynchroner EXPR Meldung zu bergeben Dieser Operand wird ausgewertet bei YSEND und YSENDREGC jedoch nur wenn die Verbindung CCB mit EDIT USER beschrieben wurde Ansonsten werden alle Nach richten mit gleicher Priorit t behandelt Hinweis Expre Nachrichten sollten nur in Ausnahmef llen gesendet werden DCAM signalisiert eine berlastung der Verbindung Wait for Go wenn eine Expre Nachricht gesendet wird bevor eine vorangehende Expre Nachricht im System des Kommunikationspartners eingetroffen ist siehe YCCB PROC SIGNAL NSIGNAL Die Nachrichtenflu steuerung Wait for Go Go Signal arbeitet unabh ngig sowohl f r normale als auch f r Expre nachrichten 987 2135 8 Makroaufrufe YRPB PTNCHAR 1 1575 OPTCD nur bei NEA Transport Service 77 BTERMINF Die Art des YINQUIRE Aufrufs wird festgelegt PTNCHAR Es werden die Charakteristika eines Partners abgefragt MONCHARS Es werden Informationen ber Datensichtstation und Zeichens tze abgefragt PEROTERM Es werden Informationen ber die Peripherie der Datenstation abge fragt BTERM
259. lockfelder lesen und sicherstellen Der Illustration dient das folgende Bild Anvendungsprogramm Befehle Konstanten und Variable Veranlassung der bertragung Parameterliste der bertragung LA 5 CL s YSHONCB BLK CCB MFL I 6 CIDI BLKADDR 5 LA 81 WAREA 6 LENGTH 8 YSHOWCB MF E 3 FIELDS CID DID BLK CCB Steuerblock aus dem gelesen wird ei YCCB PTNNAME PRONAME M CIDI DS F DIDI DS F nur f r DCAM NEA Transport Service Anwendungen Beispiel f r Sicherstellung von Steuerblockfeldern Sollen aus einem Steuerblock einzelne Felder gelesen und in eigene Speicherbereiche bertragen werden mu der Aufruf YSHOVVCB benutzt werden So ist es z B m glich die von DCAM zur ckgegebenen Kennzeichen sicherzustellen siehe Bild Seite 23 Um die einzelnen Felder anzusprechen gibt es f r jedes Feld ein Schl sselwort siehe Anhang Seite 291ff und eine festgelegte L nge Der Aufruf YSHOWCB kann nur be nutzt werden wenn das DCAM Subsystem erfolgreich geladen wurde Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolg reich abgesetzt hat kann er trotz HOLD Subsystem oder DELETE Subsystem bis Taskende mit DCAM arbeiten gilt auch f r Zur Unterst tzung der ablaufinvarianten Programmierung ist der MF Operand siehe Seite 13ff
260. lt das Zeichen Underline X 6D selbst NGETBS Das System entfernt alle Zeichen Underline und die dadurch zu l schenden Zeichen Dieser Operand wird ausgewertet bei YOPNCON und YCHANGE jedoch nur wenn EDIT SYSTEM gesetzt wurde Die Funktion ist nur sinnvoll bei einer Schreibstation die Underline verwendet z B Schreibstation 8103 EDITIN nur bei NEA Transport Service NGETFC Der logische Funktionstastencode der von der Datenstation gesendet vvird GETFC vvird als erstes Zeichen der Nachricht bertragen F r die VVerte des Funktionstastencodes siehe Handbuch VTSU Kapitel Tabelle des normierten Funktionstastencode NGETFC vvird nicht bertragen Dieser Operand wird ausgewertet bei YOPNCON und YCHANGE jedoch nur wenn EDIT SYSTEM und EDITIN LINE gesetzt wurde LCASE EDITIN nur bei NEA Transport Service NLCASE LCASE Der Anwender behandelt Kleinbuchstaben selbst NLCASE Das System bersetzt Kleinbuchstaben in Gro buchstaben Dieser Operand wird ausgewertet bei YOPNCON und YCHANGE jedoch nur wenn EDIT SYSTEM gesetzt wurde 179 YCCB 180 Makroaufrufe PHYS nur bei NEA Transport Service FORM Dieser Operand legt die Nachrichtenaufbereitung bei der Ausgabe fest PHYS Das System f hrt keine Nachrichtenaufbereitung durch bis auf die Umsetzung Kleinbuchstaben EDITIN LCASE LINE Das System bereitet Nachrichten mit Hilfe von logischen Datenstatio nen auf
261. m Verbindungsaufbau zur ckweisen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register r Register n Nummer des Registers AID Kennzeichen der Anwendung 3 RPB addr1 YREULOG RPB NEA ISO AAREA relexp 1 Partnername 8 Byte AREA relexp 2 Prozessorname 8 Byte ACB relexp 3 FDBK R ckmeldung siehe Anhang Seite 298 Register 15 siehe Anhang Seite 298 f DCAM gibt zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte ACB Kennzeichen AID Steuerblock mit g ltigem 1 Adresse des Steuerblocks 116 der den Aufruf beschreibt 987 2135 8 Aufforderung zum Verbindungsaufbau zur ckvveisen YREJLOG Es soll eine Aufforderung zum Verbindungsaufbau zur ckgewiesen werden Dazu mu angegeben werden 1 die Adresse eines 8 Byte langen Feldes in dem der Name des Partners steht mit dem keine Verbindung aufgebaut werden soll 2 die Adresse eines 8 Byte langen Feldes in dem der Name des Prozessors des Part ners steht mit dem keine Verbindung aufgebaut werden soll 3 entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen der Anwendung AID enth lt oder ein Register welches das g ltige Kennzeichen ent h lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein Beispiel Eine
262. mationen des CLT Eintrags CLT Communication Link Table berschrieben werden sollen der durch den Kettungsnamen identifiziert wird PERM permanente nderung Bei fehlender Angabe werden die Informationen des CLT Eintrags nur f r diesen Aufruf ausge wertet Die Angaben im CCB werden nicht ver ndert TEMP tempor re nde rung die maximale L nge der Nachrichten die von der DCAM Anwendung auf dieser Verbindung gesendet werden sollen DCAM liefert die tats chlich verf gbare Nach richtenl nge zur ck die kleiner sein kann als der in MAXLN geforderte Wert Die Nachrichtenl nge wird nicht mit dem Kommunikationspartner ausgehandelt oder an ihn weitergegeben siehe auch Handbuch DCAM Programmschnittstellen 987 2135 8 Verbindung aufbauen YOPNCON 987 2135 8 18 20 21 22 die L nge der erwarteten Empfangsnachrichten bei DCAM ISO Transport Service Anwendungen aber nur wenn auf dieser Transportverbindung ohne More Data Funktion gearbeitet wird MDATA N Die Gr e dient der Speicherbedarfs Opti mierung und Performanceverbesserung des Systems Sie hat rein lokale Bedeu tung wird dem Kommunikationspartner weder mitgeteilt noch mit ihm ausgehan delt Die Angabe von RLTH bietet daher auch keine Gew hr da nicht doch l n gere Nachrichten eintreffen siehe auch Handbuch DCAM Programmsehnitistel len da bei DCAM ISO Transport Service Anwendungen auf dieser Transportverbin dung mit der M
263. mmen werden soll der im CCB genannt ist Fehlt die Angabe wird jede beliebige Aufforderung angenommen ANY da die Nachrichtenverteilung ber die absenderspezifische Warteschlange erfol gen soll CS Wird nichts angegeben so wird die empf ngerglobale Warte schlange eingestellt CA Dies kann bei der Daten bermittlung wieder ge ndert werden da der Befehl asynchron ausgef hrt werden soll ASY Die synchrone Ausf h rung wird eingestellt SYN wenn nichts angegeben wird die Adresse eines 4 Byte langen Feldes in dem das Ereigniskennzeichen steht jedoch nur wenn der Befehl asynchron ausgef hrt werden soll Dann jedoch kann die Angabe nicht entfallen siehe Seite 30 85 YOPNCON 86 7a Aufforderung annehmen das erste Wort der Ereignisinformation die bergeben werden soll wenn der asynchron ausgef hrte Befehl abgeschlossen wurde Das erste Byte wird bei der R ckgabe mit X 0C berschrieben Fehlt diese Angabe wird der Standardwert X 00000000 bergeben das zweite Wort der Ereignisinformation die bergeben werden soll wenn der asynchron ausgef hrte Befehl abgeschlossen wurde Fehlt diese Angabe oder ist sie gleich dem Standardwert X 00000000 wird nur das erste Wort der Ereignisinformation bergeben ob der Aufruf wenn momentan keine Aufforderung vorliegt warten soll Werden mehrere Aufrufe f r einen bestimmten Partner SPEC oder beliebige Partner ANY ausgegeben so werden
264. n F r jedes an der DCAM Schnittstelle existierende Objekt gibt es einen Steuerblocktyp der alle Daten enth lt die das Objekt beschreiben Ein Objekt kann sein eine Anwendung eine Verbindung ein Ereignis ein Request ein Verteilparameter oder eine Verteilcodegruppe Drei Wege der Steuerblockerzeugung stehen zur Auswahl Statische Erzeugung zum Zeitpunkt der Assemblierung Dynamische Erzeugung w hrend des Programmablaufs durch DCAM Direkte Erzeugung durch den Anwender In der folgenden Tabelle werden die Makroaufrufe zur Erzeugung von Steuerbl cken im berblick gezeigt Makroaufrufe zur Steuerblockerzeugung Steuerblock statisch dynamisch direkt ACB application control block F 1 YDDACB Anwendungssteuerblock event notification block 1 YDDENB Ereignis Meldungsblock connection control block F 1 YDDCCB Verbindungssteuerblock request parameter block F 1 Anforderungsparameter Block distribution parameter block F 1 YDDDIP Verteilungsparameter Block distribution code group block F 1 YDDDCG Verteilcodegruppen Block nur f r DCAM NEA Transport Service Anvendungen 987 2135 8 Steuerbl cke erzeugen Das folgende Bild zeigt Aktionsmakroaufrufe und Steuerbl cke Aktions Steuerbl cke Makroaufruf an DCAM Beschreibung des Beschreibung der Anwendung Meldung Makroaufrufs en Verbindungen Verteilcodes ACB bezogen ENB relexp
265. n 57 0 angenommen Beispiel Es soll eine DCAM NEA Transport Service Anwendung erstmals er ffnet werden und den Namen APPL bekommen Sie soll mehrfach verwendbar sein Wenn ein Partner zum Verbindungsaufbau auffordert soll er das Kennwort VVXYZ angeben m ssen Wenn eine nachfolgende Task die Anwendung er ffnet soll er das Kennwort ABCD angeben m ssen Es soll sichergestellt werden da diese Task die erster ffnende Task ist YOPEN 1 1 APPNAME NAME ATTR SHARE LOGPASS C WXYZ USEPASS C ABCD VERIFY PRIMARY NAME DC CL8 APPL 987 2135 8 Mehrfach benutzbare Anvvendung YOPEN 987 2135 8 Beispiel Es soll eine DCAM ISO Transport Service Anwendung erstmals er ffnet werden und den Namen APPL bekommen Sie soll mehrfach verwendbar sein Wenn eine nachfol gende Task die Anwendung er ffnet soll er das Kennwort ABCD angeben m ssen Es soll sichergestellt werden da diese Task die erster ffnende Task ist YOPEN 1 1 YACB 150 APPNAME NAME ATTR SHARE USEPASS C ABCD VERIFY PRIMARY NAME DE CL8 APPL 57 YOPEN Erstmaliges Er ffnen Vervvendung von Verteilcodes 3 1 1 3 Erstmaliges Er ffnen Vervvendung von Verteilcodes L Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen
266. n CID ACB Kennzeichen AID FDBK R ckmeldung siehe Anhang Seite 298 Register 15 siehe Anhang Seite 298 FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte CCB Steuerblock mit g ltigem Adresse des Steuerblocks der die DCAM Anwendung beschreibt 987 2135 8 Grundinformation ber die Datenstation YINQUIRE Es soll die Grundinformation ber die Datenstation abgefragt werden Dazu mu angegeben werden 1 die Adresse eines 20 Byte langen Bereichs in den die Grundinformationen der Datenstation eingetragen werden sollen siehe Handbuch VTSU Kapitel Statusin formation die L nge des Bereichs in den DCAM die Information eintr gt Ist die Information l nger als der Bereich wird der YINQUIRE abgewiesen DCAM gibt den Returncode FDBK 04 00 28 zur ck da die Grundinformationen der Datenstation abgefragt werden sollen entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen AID enth lt oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein entweder die Adresse des Steuerblocks CCB der das g ltige Kennzeichen der Ver bindung enth lt CID oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein 987 2135 8 107 YINQUIRE VTSU
267. n Steuerblockfeld ge ndert werden f r das nde rungen nicht erlaubt sind Der Steuerblock dessen Adresse durch BLKADDR angegeben wurde ist nicht von der Art die in BLK angegeben wurde Das Steuerblockfeld ist keines des angegebenen Steuerblocks Die Adresse im MF Operanden ver weist nicht auf eine L Form Operandenliste Die Adresse des Steuerblocks ist ung ltig RPB CCB wird bereits von einem asynchronen Aufruf benutzt oder ung ltige Parameterliste oder ung ltige Registernummer Das Subsystem DCAM ist nicht verf gbar F r die Inhalte von Register 15 k nnen mit dem Makroaufruf YDDFDB siehe Anhang Seite 326 symbolische Adressen generiert werden U987 J Z135 8 209 YOPEN YOPNCON Makroaufrufe 4 15 4 16 210 YOPEN Funktion Dieser Aufruf er ffnet eine DCAM Anvvendung f r eine Task und erzeugt die DCAM Anwendung falls sie noch nicht existiert siehe auch Seite 50 Format symbol YOPEN Adresse des ACB Steuerblocks der die zu er ffnende Anvvendung beschreibt R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung und der Tabelle der Meldungen zu ent nehmen siehe auch Seite 50 und Anhang Seite 298 YOPNCON Funktion Dieser Aufruf fordert zum Aufbau einer Verbindung auf OPTCD ACQUIRE siehe Seite 80 bzw nimmt eine Aufforderung zum Verbindungsaufbau OPTCD ACCEPT an siehe Seite 84 YOPNCON kann nur von einer
268. n Tasks gleichzeitig benutzt werden kann Nachricht Message Eine logisch zusammengeh rige Datenmenge die an einen Kommunikationspartner gesendet werden soll bzw von einem Kommunikationspartner empfangen werden soll Prozess Process Instanz zur Ausf hrung eines Programms innerhalb einer Task Task Task Tr ger von Prozessen Im BS2000 werden Tasks u a zum Abwickeln von Benutzer jobs z B Batchjob Dialogtask oder zum Betreiben von DCAM UTM TTX Anvvendungen eingesetzt Ablauf aller Aufgaben zwischen den BS2000 Kom mandos LOGON und LOGOFF TRANSDATA Administration TRANSDATA administration Inbetriebnahme Steuerung und Verwaltung der TRANSDATA Komponenten eines Datenkommunikationssystems Transportdienst Transport service Dienstleistung f r den Datenaustausch zwischen Kommunikationspartnern Der Trans portdienst veranla t und kontrolliert den Transport der Nachricht durch das Daten kommunikationssystem und verwaltet Verbindungen 987 2135 8 385 Fachvv rter Transportquittung Transport acknowlegment Ereignis das ber Abschlu oder Abbruch einer Daten bermittlung informiert Verbindung Connection Zuordnung zweier Kommunikationspartner die es ihnen erm glicht Daten miteinan der auszutauschen Zeilen Datenstation Line terminal Betriebsart einer logischen Datenstation bei der die Nachricht in Form von Zeilen strukturiert ist 386 987 2135 8 987 2135 8 Literatur Litera
269. n bis zu 8 Zeichen lang sein Dieser Operand wird ausgewertet bei YOPNCON CODEPOS absexp Distanz des Verteilcodes relativ zum ersten Byte von links gelesen der empfangenen Daten Das erste Zeichen hat die Distanz Null Standardvvert ist Null Die Distanz darf den Wert 255 nicht berschreiten nicht gr er sein als die Gesamtl nge Nachricht Verteilcode der Nachricht Dieser Operand wird ausgewertet bei YOPNCON 195 YDIP 196 Makroaufrufe CODEINDecharacter Legt ein Zeichen fest das anzeigt da die folgenden max 7 Zeichen als Verteilcode interpretiert werden sollen Es kann codiert werden als 1 Byte lange C Konstante C Konstante bzw Konstante oder sedezimal X Konstante Der Standardvvert ist X 00 Er besagt kein impliziter Verteilcode wird verwendet expliziter Verteilcode wird in jeder Nachricht erwartet Dieser Operand wird ausgewertet bei YOPNCON Hinweis Der Codeanzeiger steht an der in CODEPOS angegebenen Stelle DCGe relexp Liste der DCG Steuerblockadressen Es sind maximal 16 Adressen angebbar Dieser Operand vvird ausgevvertet bei YOPNCON und YCHANGE 987 2135 8 Makroaufrufe YENB 4 10 987 2135 8 Funktion Es vvird ein Ereignis Meldungsblock ENBzevent notification block erzeugt Er enthalt die Adressen der Contingency Kennzeichen siehe Kapitel DCAM Assembler Schnittstel le Seite 7 Format
270. n der Verbindung USERFLD in Register 5 der Inhalt der Expre nachricht in den Registern 6 und 7 die Laufnummer der Nachricht in Register 8 987 2135 8 Asynchrone Meldungen TACK 2 8 6 987 2135 8 21 Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen VVenn eine Transportquittung f r die DCAM Anvvendung angekommen ist kann sie mit dieser Meldung sofort dem betroffenen Programm bergeben vverden Zur Identifikation der betreffenden Nachricht wird vom Anwender beim Senden der Nachricht YSEND eine Laufnummer vergeben SEQNO Die Verteilung der Transportquittungen an eine mehrfach benutzbare DCAM Anvvendung erfolgt in Abh ngigkeit von der Definition beim YOPEN der Prim rtask ATTR Operand im ACB PRIMTASK Alle Quittungen erh lt die Prim rtask Somit ist es sinnlos f r eine Sekund rtask eine TACK Contingency vorzusehen REQTASK Die Quittung erh lt die Task die die betreffende Nachricht gesendet hat NOTACK Es werden f r diese DCAM Anvvendung keine Quittungen bergeben Eine Definition einer Contingency Routine w re sinnlos Folgende Informationen werden beim Einsprung in die TACK Contingency Routine ber geben das Kennzeichen der DCAM Anvvendung AID in Register 3 das Kennzeichen der Verbindung CID in Register 4 die Begleitinformation der Verbindung USERFLD in Register 5 die Anzeige ob die Quittung positiv oder negativ is
271. n identifiziert wird PERM permanente nderung Bei fehlender Angabe werden die Informationen des CLT Eintrags nur f r diesen Aufruf ausge wertet Die Angaben im ACB werden nicht ver ndert TEMP tempor re nde rung 10 da die Task eine Sekund rtask ist SECONDARY Fehlt die Angabe wird keine diesbez gliche Pr fung durchgef hrt NO d h die Task kann auch eine Prim r task sein 987 2135 8 Nachfolgendes Er ffnen YOPEN Beispiel Es soll DCAM NEA Transport Service Anwendung aus dem ersten Beispiel siehe Seite 54 nachfolgend er ffnet werden Es soll sichergestellt werden da diese Task eine Sekund rtask ist Sekund rtask YOPEN 1 1 YACB APPNAME NAME ATTR SHARE USEPW C ABCD VERIFY SECONDARY NAME DC CL8 APPL Beispiel Es soll die DCAM ISO Transport Service Anwendung aus dem ersten Beispiel siehe Seite 58 nachfolgend er ffnet werden Es soll sichergestellt werden da diese Task eine Sekund rtask ist Sekund rtask YOPEN 1 1 150 APPNAME NAME ATTR SHARE USEPW C ABCD VERIFY SECONDARY NAME DC CL8 APPL 987 2135 8 63 YOPEN Nachfolgendes Er ffnen Vervvendung von Verteilcodes 3 1 1 5 Nachfolgendes Er ffnen Vervvendung von Verteilcodes 2 Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen Makroaufr
272. n wurde Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolgreich abge setzt hat kann er trotz HOLD Subsystem oder DELETE Subsystem bis Taskende mit DCAM arbeiten gilt auch f r Die Aufrufe YMODCB YSHOVVCB und YTESTCB k nnen auch durch k rzere und schnellere Befehlsfolgen ersetzen werden bei denen die Felder ber die DSECTs YDDxxB adressiert werden Allerdings kann dann in einer neuen Version eine Neu ber setzung n tig werden Steuerbl cke erzeugen Das folgende Bild zeigt am Beispiel des YGENCB die Vervvendung des MF Parameters Reentrant f higer Programmteil mit Aufrufen an DCAM die sich auf Steuerbl cke beziehen die erzeugt verden mit YGENCB MF E 3 BLK RPB ggf mit Anderungen oder Erganzungen zur Parameterliste Ansprung mit bergabe der Adresse der Parameterliste hier in Register 3 Proze spezifischer Programmteil XYZ YGENCB BLK RPB MF L Parameterliste Steuerblock von DCAM im Klasse 5 Speicher erzeugt bernahme der Parameterliste Beschreibung der einzelnen Steuerblock felder Eine Task der DCAM Anvendung Vervendung des MF Parameters bei YGENCB 14 987 2135 8 Steuerbl cke erzeugen Die Listenform MFL wird im Konstanten oder Variablen Teil des Programms abge setzt Der Makroa
273. nal eingetroffen ist Diese Angabe ist jedoch nur erforderlich bei PROC SIGNAL Fehlt diese Angabe oder ist sie gleich dem Standardwert X 00000000 wird nur das erste Wort der Ereignisinformation bergeben Siehe Hinweise Seite 238 Beispiel Es soll eine Normalnachricht mit der laufenden Nummer 15 enthalten in Register 5 auf der Verbindung die durch den CCB Steuerblock mit der Adresse CCBAD beschrieben ist abgeschickt werden Der Nachrichtentext sei HALLO PARTNER YSEND RPB RPBAD SEONO 5 nur NEA RPBAD YRPB ACB ACBAD CCB CCBAD AREA TEXT AREALN 13 ACBAD YACB YCCB TEXT DC C HALLO PARTNER 129 YRECEIVE 3 3 2 Makroaufrufe Steuerbl cke und Register Nachricht oder Transportquittung empfangen Nachricht oder Transportquittung empfangen Speicherbereiche im Anwendungsprogramm Besch AID register DT Register n Nummer des Registers AID Kennzeichen der Anwendung 2 CID register I in ei mean run Register m I Nummer des Registers CID Kennzeichen der Verbindung 3 RPBeaddr1 RPB NEA ISO Bereich f r Aufnahme AREA relexp ER gt der Nachricht n Byte AREALN absexp 28 1 ACB relexp 2 CCB relexp 3 OPTCD SPEC 4 OPTCD cs 5 OPTCD TRUNC KEEP 6 OPTCD Q 7 TOVAL absexp 0 lt n lt 32767 8 OPTCD ASY 9 EID relexp 10 Ereigniskennzeichen 4 Byte EIDREF ko
274. nd Die Angaben f r schl sselvvort und anfangswert sind der Tabelle der Steuerblockfel der zu entnehmen Anhang Seite 291 DCG nur NEA Transport Service DIP Es vvird der Typ des Steuerblocks oder der Steuerbl cke angegeben der die erzeugt werden soll en R ckmeldung Von DCAM zur ckgegebene Informationen Register R ckinformationen Bedingung 0 Gesamt l nge des Der Steuerblock wurde in der erzeugten einem dynamisch zugewiesenen Steuerblocks Speicherbereich erzeugt Steuerbl cke in kein WAREA und LENGTH Byte Operand gesetzt Ben tigte L nge im Der Benutzerbereich ist zu Benutzerbereich klein gesetzter LENGTH Ope rand 1 Adresse des ersten Der Steuerblock vurde in Bytes des der er einem dynamisch zugewiesenen zeugten Steuerblock Speicher Bereich erzeugt bl cke 987 2135 8 203 YGENCB Register R ckinformationen 15 links b ndig Makroaufrufe Bedingung Der Steuerblock vurde erfolg reich erzeugt Anwender siehe Regi Entweder war der Bereich zu klein ster 0 oder es konnte nicht genug dynamisch zugewiesener Speicherbereich beschafft werden Obligatorischer Operand fehlt Der durch WAREA gekennzeich nete Bereich beginnt nicht an einer Wortgrenze Das Steuerblockfeld ist nicht ein Feld des mit BLK festge legten Steuerblocks Die Adresse im MF Operanden verweist nicht auf eine L Form Operandenliste Die Adress
275. ndem er das Feld PPROC im CCB abfragt 987 2135 8 YCCB Makroaufrufe TERMSTAT 1 ze TERMSTAT NTERMSTAT nur bei NEA Transport Service NTERMSTAT DCAM fragt sofort nach Verbindungsaufbau zu statusf higen Datensicht stationen z B 9763 die aktuellen Terminalpartner ab Ist die Antwort auf die Statusabfrage eingetroffen so meldet DCAM die Nachricht auf einen YRECEIVE mit FDB1 X 00 und FDB3 X 80 Die Statusant wort wird intern verarbeitet und nicht an das Programm weitergegeben ARECLN 0 Erst nach Eintreffen der Statusantwort ist die Informa tion ber den Terminalstatus vollst ndig und kann mit YINQUIRE abge fragt werden Bei nicht statusf higen Datensichtstationen wird der Vorgang simuliert Gegen ber dem Anwendungsprogramm verh lt sich DCAM gleich Dieser Operand ist sinnvoll wenn Programme spezielle Datenstations eigenschaften nutzen wollen die nicht bei jeder Datensichtstation ver f gbar sind DCAM fordert keine Statusnachricht an Bei der Nachrichtenaufbereitung wird von einer Datensichtstation im Grundausbau ausgegangen Dieser Operand wird ausgewertet bei YOPNCON jedoch nur wenn EDIT SYSTEM 987 2135 8 185 YCHANGE 4 4 186 Makroaufrufe YCHANGE Funktion Dieser Makroaufruf ndert bestimmte Eigenschaften einer bereits aufgebauten Verbin dung die im Steuerblock CCB beschrieben werden siehe auch Seite 118 Er kann nur von einer Prim rtask aufger
276. ndungen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anvendungsprogramm AID register r gt Register n Nummer des Registers AID Kennzeichen der Anwendung 3 CID register px m gt Register m Nummer des Registers CID Kennzeichen der Verbindung 4 RPB addr1 YINQUIRE RPB NEA AAREA relexp 1 OPTCD PTNCHAR 2 ACB relexp 3 CCB relexp 4 FDBK R ckmeldung siehe Anhang Seite 298 DCAM gibt 4 zur ck N Register 15 siehe Anhang Seite 298 Feld f r Partner FDB 1 FDB 2 FDB 3 FDB 4 charakteristika 1 Byte 1 Byte 1 Byte 1 Byte siehe Handbuch VTSU Kapitel Statusinfor mation 48 Byte CCB Steuerblock mit g ltigem Kennzeichen CID ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der die DCAM Anvendung beschreibt 100 987 2135 8 Partnercharakteristika YINQUIRE Es sollen die Partnercharakteristika abgefragt werden Dazu mu angegeben werden 1 die Adresse eines 48 Byte langen Bereichs in den die Partnercharakteristika einge tragen werden sollen siehe Handbuch VTSU Kapitel Statusinformation 2 da die Partnercharakteristika abgefragt werden sollen 3 entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen AID enth lt oder ein Register welches das g lti
277. nection function DCAM Funktion die im Zusammenhang mit Aufbau und Abbau von Verbindungen steht Expressnachricht Express message Nachricht begrenzter L nge die mit h herer Priorit t als Normalnachrichten zuge stellt wird Format Datenstation Format terminal Betriebsart einer logischen Datenstation bei der die Nachricht aus einem Format Formular Maske besteht Kommunikationsanwendung Communication application Instanz zur Verarbeitung von Nachrichten die zwischen Kommunikationspartnern ausgetauscht werden Sie wird vom Datenkommunikationssystem ber ihren Zu gangspunkt adressiert Kommunikationspartner Communication partner Instanzen die Verbindungen unterhalten und Daten miteinander austauschen Kommunikations Protokoll Communication protocol Beschreibung der bergabebedingungen und bergabeformate zwischen gleicharti gen Funktionsschichten im Datenkommunikationssystem 987 2135 8 Fachvv rter Kommunikationsrechner Communication computer Spezieller Rechner f r Kommunikationsfunktionen Kommunikationszugriffsmethode Communication access method Software die den Anwendungen Schnittstellen zur Kommunikation bietet Logische Datenstation Virtual terminal Modellvorstellung einer Datenstation deren Funktionen auf die physikalischen Eigen schaften unterschiedlicher Datenstationen abgebildet werden Mehrfach benutzbare DCAM Anwendung Shareable DCAM application DCAM Anwendung die von mehrere
278. ner YSETLOG Setzen des Zustandes einer DCAM NEA Transport Service Anvvendung Angaben zur dynamischen Namens Zuvveisung LINK sind hier weggelassen und wer den in einem eigenen Abschnitt Seite 145 behandelt DCAM Tasks k nnen die asynchrone Meldung COMEND Beenden des Zugriffs systems und Schlie en der DCAM Anvvendung siehe auch Seite 43 in einer entspre chenden Contingency Routine bearbeiten Hinweis Sobald eine Batch oder Dialog Task eine DCAM Anwendung er ffnet ndert DCAM sein Scheduling Attribut siehe Handbuch BS2000 Systemvervvaltung auf TP falls der entsprechende JOIN Eintrag die Task hierzu berechtigt Sobald die Dialog Task ihre letzte DCAM Anvvendung schlie t setzt DCAM sie wie der auf DIALOG zur ck Sobald die Batch Task ihre letzte DCAM Anwendung schlie t setzt DCAM sie wieder auf BATCH zur ck 49 Anvvendung er ffnen 3 1 1 50 DCAM Anvvendung er ffnen Eine DCAM Anvvendung kann einfach benutzbar sein sie wird nur von einer Task er ffnet mehrfach benutzbar sein sie wird von Prim rtask und Sekund rtasks er ffnet Wenn sie mehrfach benutzbar ist kann die Nachrichtenverteilung nach dem Standard verfahren absenderspezifisch empf ngerglobal erfolgen Bei DCAM NEA Transport Service Anwendungen kann die Nachrichtenverteilung zus tz lich anhand von Verteilcodes erfolgen Bei allen DCAM ISO Transport Service Anvvendungen mu im Anwendungssteue
279. ng zum Verbindungsaufbau 2 nach Annahme der Aufforderung YOPNCON ACCEPT beim expliziten Verbindungsabbau durch den Anwender oder Partner oder nach einem DCAM Fehler Das Exit Hauptereignis wird nicht aufgerufen wenn beim Schlie en einer Anwen dung alle noch bestehenden Verbindungen implizit geschlossen werden 1 Exit Ereignis APPOPN Aufruf der Exit Routine bei jedem YOPEN Aufruf nach Pr fung der Benutzerangaben und vor der Bear beitung des Aufrufs Funktionen der Exit Routine zus tzliche Pr fungen z B Anwendung darf nur von bestimmten USERID s er ffnet werden Tabellen zur Exit Routine nachladen Annehmen des YOPEN Aufrufs Ablehnen des YOPEN Aufrufs Modifizieren bestimmter YOPEN Operand zus tzliche Aktionen veranlassen z B JOB s starten ENTER Meldungen ausgeben 276 987 2135 8 DCAM SYSTEM EXIT 2 EX T Ereignis APPCLS Aufruf der Exit Routine jedem YCLOSE Aufruf vor Abbau der DCAM Datenstruktur Funktionen der Exit Routine zus tzliche Aktionen veranlassen z B Meldung ausgeben Update von Exit spezifischen Tabellen 3 Exit Ereignis APPSHU Aufruf der Exit Routine bei jedem internen Schlie en einer Anwendung nach Eingabe eines BCAPPL BCEND oder SHUTDOVVN Kommandos durch den Operator Hinweis Der Exit wird nur beim Schlie en einer Anwendung nicht bei einer eventue
280. ng zum Verbindungsaufbau interpretiert nach einer im Kommunikationssystem f r solche Ereignisse definierten Zeit Die zu einer eventuellen Reaktion gebrauchten Funktionsaufrufe m ssen nicht in der LOGON Contingency Routi ne selbst abgegeben werden Die durch die LOGON Meldung angek ndigte Aufforderung zum Verbindungsaufbau kann durch einen YOPNCON Makroaufruf OPTCD ACCEPT siehe Seite 84 angenom men werden oder durch einen YREJLOG Makroaufruf siehe Seite 116 zur ckgewiesen werden Um die n tigen Informationen f r die Annahme YOPNCON der Aufforderung zu bekommen mu der Anwender einen entsprechenden YINQUIRE Makroaufruf siehe Seite 94 absetzen Folgende Informationen werden beim Einsprung in die LOGON Contingency Routine bergeben das Kennzeichen der DCAM Anvvendung AID in Register 3 das Kennzeichen der Aufforderung zum Verbindungsaufbau LID logon identifier in Register 4 die L nge der Verbindungsnachricht die vom Partner gesendet wurde in Register 5 987 2135 8 Asynchrone Meldungen LOGON Das folgende Bild zeigt an einem Beispiel welche Aufrufe verwendet werden wenn eine LOGON Contingency vorgesehen ist Programm Hauptroutine Eine Aufforderung zum ENACO Aufbau einer Verbindung x trifft ein definieren ansto en LOGON Contingency Routine YINQURE Abholen der Verbindungsnachricht YOPNCON ACCEPT Verbindungsaufbau oder YREGLOG Aufforderung zur ckwe
281. nicht abgeschlossen x x oc 3C OPTCD EXPRESS nicht m glich wenn EDIT SYSTEM x x oc 40 Das Partnersystem hat die Verbindung ohne Angabe y eines Grundes zur ckgewiesen oc 44 Der Partner fordert falsches Protokoll x oc 48 Systemzeitablauf f r die Verbindungsanforderung x 4 Der Partner ist nicht erreichbar falls Anvendung dann ist diese nicht er ffnet x oc 50 Der Partner bearbeitet keine Aufforderungen zum Verbindungsaufbau Die DCAM Anwendung befindet sich im STOP Zustand x oc 54 Der Partner will keine Aufforderungen zum Verbindungsaufbau annehmen Die DCAM Anwendung hat die Eigenschaften ATTR NLOGON x oc 58 ung ltiges Kennwort LOGPW x 987 2135 8 307 Tabelle der R ckmeldungen Anhang R ckmelde Feld Bedeutung Makroaufruf m m z 4 ri 02 4 ZOQ ZO K ZOQ Qu O Q O EH El 2 4 Q O 3 02 4 Q zm 4 l d CO ml 2 0 l UK 02 OZIK cm 9 O tl 5 x 0 2 F 0 m trl x rl b 4 oc oc oc oc se 18 2 40 60 64 68 ec Die Verbindungsaufforderung ist vom Partner zur ckgeviesen vorden z B REULOG Makroaufruf Nur f r DCAM NEA Transport Service Anvendungen In diesem Byte vird der Grund f r die Ablehnung der Verbindungsaufforderung n her erl utert nur zur Diagnose Nur f r DCAM
282. nitt Seite 145 behandelt DCAM Tasks k nnen asynchrone Meldungen in einer entsprechenden Contingency Routine bearbeiten siehe Seite 30 und Seite 38 Diese sind LOGON Aufforderung zum Verbindungsaufbau bzvv erfolgter Verbin dungsaufbau LOSCON Verlust der Verbindung PROCON Zur Verbindung vorgeschlagener Partner Erfolgter Verbindungsaufbau 73 YOPNCON Verbindung aufbauen 3 2 1 Verbindung aufbauen Zum Aufbau einer Verbindung kann aufgefordert werden eine Aufforderung angenommen werden Ferner kann man sich an eine vordefinierte Verbindung anschlie en Beim Aufbau einer Verbindung wird die Art der Warteschlange absenderspezifisch oder empf ngerglobal festgelegt oder f r DCAM NEA Transport Service Anvvendungen die Zuordnung von Verteilcodes zur Verbindung Daraus resultieren vier Varianten des Makroaufrufs YOPNCON Die Unterschiede die aus der synchronen oder asynchronen Ausf hrung eines Befehls entstehen werden hier nicht als eigene Varianten gezeigt siehe Seite 84 sondern nur soweit sie DCAM betreffen innerhalb der drei Varianten Die Verbindung die aufgebaut werden soll wird in einem eigenen Steuerblock beschrie ben dem CCB Er wird beim YOPNCON im RPB adressiert Hinvveis Der YOPNCON zerst rt im RPB die Vervveisadresse zum vervvendeten CCB Da durch vvird der Versuch verhindert eine Verbindung irrt mlichervveise zvveimal aufzu bauen Das kann vermieden werden indem YO
283. nittstelle m glichst einfach zu zeigen F r jeden Aktionsaufruf an DCAM wird daher ein eigens daf r generierter Steuerblock verwendet siehe Abschnitt Seite 9 So k nnen Anga ben f r Standardwerte entfallen Der ge bte Anwender der die Steuerbl cke auch mehrfach verwenden m chte wird auf den alphabetisch geordneten Katalog verwiesen ab Seite 153 In diesem Kapitel wird er jedoch die Inhalte der einzelnen Steuerblockfel der und ihre Auswertung nachschlagen F r die verwendeten Abk rzungen siehe Anhang ab Seite 322 Eine weitere Hilfe soll die grafische Darstellung sein Das folgende Bild zeigt wie sie zu interpretieren ist Bei dieser Darstellung wird nicht ber cksichtigt in welcher Weise der Steuerblock vom Anwender erzeugt wird statisch oder dynamisch Jede Makrobeschreibung wird durch mindestens ein Beispiel abgerundet Diese Bei spiele sind Codierskizzen eines Anvvendungsfalles Sie sind nicht vollst ndig ausgef hrt und sind nicht als Muster anzusehen Schon deshalb nicht weil es unterschiedliche M glichkeiten der Codierung gibt 987 2135 8 47 Anvvendung der Funktionen von DCAM Makroaufrufe Steuerbl cke und Register Speicherbereiche im Anwendungsprogramm 4 alternative Angabe in einem Register siehe jeweils Beschreibung der einzelnen Felder Makroaufrur der beschrieben vird Pflichteintrag Pflichteintrag im Steuerblock adres sierter Speicherbereich
284. nstante C konstante oder Sedezimalkonstante X konstante in der L nge von 4 Byte angegeben werden Der Standardwert ist X 00000000 gleichbedeutend mit Kennwort angegeben no 1 VERIFY PRIMARY SECONDARY Die die DCAM Anvvendung er ffnende Task will NO irgendeine Task sein PRIMARY erster ffnende Task sein SECONDARY nachfolgende Task sein Dieser Operand wird ausgewertet bei YOPEN durch eine Prim rtask oder Sekund rtask Wird die hier gesetzte Bedingung nicht erf llt wird der Makroaufruf nicht ausgef hrt Der Anwender erh lt die entsprechende R ckmeldung siehe Anhang Seite 298 DCAMVER absexp Angabe der DCAM Versionsnummer Dieser Operand stellt sicher da ein Programm hinsichtlich der neu hinzugekommenen Funktionen einer DCAM Version kompatibel ist Wird dieser Operand nicht angegeben so wird als Default Wert eine DCAM Version lt 7 0 angenommen 8 0 mu angegeben werden wenn das Programm die neuen Funktionen ab der DCAM Version 8 0 verwendet Neue Funktionen sind die ber mittlung einer Verbindungsnachricht bei YOPNCON mit OPTCD ACCEPT und die Angabe der maximalen Nachrichtenl nge durch den MAXLN Operand bei YOPNCON 987 2135 8 Makroaufrufe YACB Sekundartasks m ssen eine Anwendung mit der gleichen DCAMVER er ffnen wie die Prim rtask Dieser Operand wird ausgewertet bei YOPEN DISCO k nur bei NEA Transport Service NDISCO DISCO Die Verteilung von Nachric
285. nstante 2 11 EIDREF2 konstante 2 11 VCBADR relexp 12 FDBK R ckmeldung siehe Anhang Seite 298 CID venn von beliebigen Partner Kennzeichen der Verbindung jedoch nur ANY ARECLN L nge der empfangenen Nachricht CCB festgelegt jedoch nur beliebigen Partner ANY L nge des zu langen Teils wenn Nachricht l nger als AAREALN angegeben DCAM gibt zur ck ASEONO 3 TACKNO 4 USER Begleitinformation vie in USERFLD des venn von einem Register 15 siehe Anhang Seite 298 FDB 1 1 Byte FDB 2 1 Byte FDB 3 1 Byte FDB 4 1 Byte Fortsetzung siehe Seite 131 130 987 2135 8 Nachricht oder Transportquittung empfangen YRECEIVE Fortsetzung Steuerblock mit g ltigem Kennzeichen CID ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der den Aufruf beschreibt konstante kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante oder Festpunktkonstante F konstante oder Adre konstante A konstante V konstante definiert werden 3 Laufnummer lt SEQNO des Partners DCAM Anwendung oder wie im Daten kommunikationssystem vergeben wenn der Partner eine Datenstation ist 4 Laufnummer der quittierten Nachricht wenn eine Transportquittung empfangen wurde N Es soll eine Nachricht oder Transportquittung empfangen werden Dazu mu angegeben
286. nstprotokoll Fehler im Transportsystem reserviert Fehler in der Verbindungsnachricht des Stationsdienstes f r den Anwender 319 Registerbelegung 320 Inhalt X 447 X 487 X 4C X 50 X 54 X 587 X o X 60 X 64 X 907 Anhang rechtsb ndig von Register 6 bei LOSCON reserviert reserviert reserviert Die vorgeschlagene Klasse des Transportservice vurde vom Kommunikationspartner nicht akzeptiert Die vorgeschlagene Priorit t im Daten ber tragungsnetz wurde vom Partner nicht akzep tiert Die Verbindung wurde wegen DCM Mangel an Speicherplatz abgebaut zu viele negative Transportquittungen die nicht abgeholt wurden Die VTSU des Partners ist nicht aktiv Die Transportverbindung wurde wegen Protokollfehler des Kommunikationspartners abgebaut reserviert siehe YDFDB D CONT 987 2135 8 Anhang 987 2135 8 Inhalt X 00 X 047 x 087 X 0C Inhalt Xx 007 X 047 X 087 Registerbelegung rechtsb ndig von Register 4 bei COMEND Warnung vor der bevorstehenden Beendigung des Kommunikationszugriffssystems Beendigung des Kommunikationszugriffssystems Warnung vor der bevorstehenden erzvungenden Beendigung der DCAM Anwendung Erzwungende Beendigung der DCAM Anwendung rechtsb ndig von Register 4 bei SECOND Er ffnen der Anwendung in der Sekund rtask Schl
287. nwen der im FDBK Feld siehe Anhang Seite 298 des RPB Steuerblocks auf den sich der Empfangsmakroaufruf bezieht eine Warnung ACB relexp Adresse eines ACB Steuerblocks Er enth lt das Kennzeichen der Anwendung auf die sich der Makroaufruf bezieht der hier beschrieben wird Dieser Operand wird ausgewertet bei YOPNCON YCLSCON YREJLOG YINQUIRE YCHANGE YSEND YRECEIVE YSENDREC und zus tzlich f r DCAM NEA Transport Service Anwendungen bei YSETLOG YPERMIT und YFORBID AREA relexp Adresse eines Bereiches in den der Anwender Daten f r DCAM bereitstellt und in den DCAM Daten f r den Anwender eintr gt Was in dem Bereich bereitgestellt bzw einge tragen wird ist abh ngig vom gerade aktuellen Makroaufruf der sich auf diesen RPB Steuerblock bezieht Der Anwender stellt bereit die Verbindungsnachricht h chstens 80 Byte bei DCAM NEA Transport Service Anwendungen und 32 Byte bei DCAM ISO Transport Service Anwendungen bei YOPNCON mit gesetztem Operanden OPTCD ACQUIRE oder ab DCAMVER 8 0 OPTCD ACCEPT Der AREA Operand wird in diesem Fall nur ausgewertet wenn der Wert f r AREALN ungleich 0 ist den Namen des Partner Prozessors bei YREJLOG und YINQUIRE mit dem Operan den OPTCD NAMXLATE 225 YRPB 226 Makroaufrufe den Namen der DCAM Anvvendung bei YINQUIRE mit dem Operanden OPTCD APPSTAT die zu sendende Nachricht bei YSEND und YSENDREC und zus tzlich f r DCAM NEA Transport S
288. nzahl der zu erzeugenden Steuerbl cke festgelegt Es sind h chstens 255 Steuerbl cke zul ssig WAREA addr Anfangsadresse des Speicherbereichs im Programm in dem der Block die Bl cke erstellt werden soll en Der Bereich mu an einer Wortgrenze beginnen Wird diese Angabe gemacht mu auch die n chste gemacht werden Wird WAREA nicht angegeben gilt folgende Regel Liegt der durch den Makro YGENCB generierte SVC Befehl unterhalb der 16 MB Spei chergrenze werden die Steuerbl cke ebenfalls unterhalb dieser Grenze angelegt Damit kann jeder Programmteil der im 24 Bit Modus abl uft auf die Steuerbl cke zugreifen Andernfalls werden die Steuerbl cke oberhalb 16 MB angelegt und sind somit im 24 Bit Modus nicht zugreifbar LENGTH value Gibt die L nge in Byte des mit WAREA bestimmten Bereichs an Folgende Mindestl n gen sind erforderlich ACB 64 Byte CCB 88 Byte RPB 100 Byte ENB 36 Byte DCG 80 Byte nur f r NEA DIP 80 Byte nur f r NEA Da in k nftigen Versionen mit Erweiterungen zu rechnen ist wird empfohlen gr ere Bereiche zu w hlen 987 2135 8 202 Makroaufrufe YGENCB Su 1 les Gibt die Form des Makroaufrufs an siehe Seite 13 schl sselwort anfangswert Gibt die Anfangswerte eines oder mehrerer Steuerblockfelder an Die Felder die nicht angegeben werden werden mit Standardwerten versehen wie sie bei den Beschreibun gen der Aufrufe zur statischen Steuerblockerzeugung aufgef hrt si
289. ogramm ausgewertet worden sein Soll angezeigt werden ob ein Steuer block auch tats chlich f r den n chsten Aufruf verwendet werden kann sollten programmeigene Mechanismen verwendet werden Danach hat der Anwender die M glichkeit die Felder des Steuerblocks auszuwerten die von DCAM gesetzt wurden Dies sind insbesondere das R ckmeldefeld und die Kennzeichen Weitere Felder sind je nach Aufruf im RPB oder CCB gesetzt siehe dazu die einzelnen Funktionen im Kapitel Anwendung der Funktionen von DCAM Seite 47ff Ein Steuerblock ist f r mehrere Aufrufe verwendbar Die einzelnen Felder m ssen aller dings mit den aktuellen Werten versorgt sein 987 2135 8 987 2135 8 Vervvendung der Steuerbl cke Hinvveis Der YOPNCON Aufbau einer Verbindung zerst rt im RPB die Vervveisadresse zum verwendeten CCB Dadurch soll der Versuch eine Verbindung irrt mlichervveise zwei mal aufzubauen verhindert werden Werden Steuerbl cke mehrfach verwendet und die Kennzeichen gesichert und direkt in den YRPB eingetragen siehe Seite 20 ergibt sich eine Mindestanzahl von Steu erbl cken Summe der ben tigten Steuerbl cke f r die Maximalanzahl der gleichzei tig aktiven Requests z B Gesamt gleichzeitig aktiv 4 YOPEN 1 YACB 5 YOPNCON ASY 5 YCCB 4 5 YRPB SPEC 15 YRECEIVE gt 15 YRPB 1 YACB 5 YCCB 22 YRPB lasy J 1 YINQUIRE 1 YRPB 1 YSEND 1 YRPB J Vervvendung der Kennzeichen 2 3
290. ohne Verteilcodes arbeitet Es mu angegeben werden 1 150 als Anzeige da mit dem ISO Transportdienst gearbeitet werden soll Bei DCAM ISO Transport Service Anwendungen ist diese Angabe eine Pflichtangabe F r DCAM NEA Transport Service Anwendungen ist diese Funktion nicht verf g bar Fehlt die Angabe wird standardm ig mit dem NEA Transportdienst gearbei tet 2 da die Anwendung mehrfach benutzbar ist Bei DCAM NEA Transport Service Anwendungen mu zus tzlich angegeben werden da ohne Verteilcodes gearbei tet wird 3 der Name der DCAM Anvvendung der vom Anwender festgelegt wird Es wird die Adresse eines Bereiches von 8 Byte angegeben in dem der Name steht 4 das Kennwort wenn eine vordefinierte Anwendung durch ein Kennwort in der RDF gesch tzt ist Weiterhin kann angegeben werden da 5 die Task eine Prim rtask ist PRIMARY Wird nichts angegeben soll keine diesbe z gliche Pr fung stattfinden NO 6 DCAM Meldungen siehe Seite 38 bearbeitet werden sollen Dazu wird die Adresse des ENB angegeben Fehlt die Angabe werden sie nicht bearbeitet 7 die DCAM Anvvendung vor dem unbefugten Anschlu einer Sekund rtask durch ein Kennwort gesch tzt sein soll Die Angabe ist nur sinnvoll wenn die Anwen dung nicht vordefiniert und durch ein Kennwort in der RDF gesch tzt ist Wird die Angabe dennoch verwendet so ist das USEPASS Kennwort gleich dem Kennwort in der RDF zu setzen 8 Aufforderung
291. olgenden Bedingungen 1 Die Anzahl der relativen Ausdr cke mu ungerade sein 2 Alle relativen Ausdr cke m ssen paarweise auftreten wobei 1 relativer Ausdruck zus tzlich vorhanden sein mu Die Paarbildung wird unter absolute zusammenge setzte Ausdr cke beschrieben 3 Der unpaarige Ausdruck darf kein Minuszeichen haben 4 Ein relativer Ausdruck darf nicht als Operand in einer Multiplikation oder Division auftreten 987 2135 8 Anhang 987 2135 8 Mnemotechnische VVerte der Makroaufrufe Einem relativ zusammengesetzten Ausdruck wird vom Assembler ein einziger Wert zugeordnet In den folgenden Beispielen von relativ zusammengesetzten Ausdr cken sind SAM JOE und FRANK in dem gleichen Programmabschnitt und sind relative Ausdr cke PT ist ein absoluter Ausdruck SAM SAM JOE FRANK JOE PT 5 SAM 3 Hinweis SAM JOE ergibt keinen relativen Ausdruck da die Differenz von zwei relativen Adres sen einen konstanten Wert darstellt Registerbezeichnungen Registerbezeichnungen werden als absolute Ausdr cke geschrieben die in Klammern eingeschlossen werden Die absoluten Ausdr cke m ssen Werte zwischen 2 und 12 annehmen Sie sind die zugeh rigen Mehrzvveckregister Im folgenden Beispiel f r Registerbezeichnungen sind SAM und JOE wiederauffindbare Ausdr cke und PAL ist ein absoluter Ausdruck 5 zeigt Register 5 an Der Operand wird als Folge von bis zu acht Zeichen geschrieben wobei das erst
292. om Anwender festgelegt wird Er steht in einem hier adressierten Feld von 8 Byte L nge der Verteilungsname vom Anwender festgelegt werden Er steht ebenfalls in einem hier adressierten Feld von 8 Byte L nge das Kennwort wenn eine vordefinierte Anwendung durch ein Kennwort in der RDF gesch tzt ist Weiterhin kann angegeben werden da 6 die Task eine Prim rtask ist Wird nichts angegeben soll keine diesbez gliche Pr fung stattfinden DCAM Meldungen siehe 38 bearbeitet werden sollen Dazu wird die Adresse des ENB angegeben Fehlt die Angabe werden sie nicht bearbeitet die DCAM Anwendung vor dem unbefugten Anschlu einer Sekund rtask durch ein Kennwort gesch tzt sein soll Die Angabe ist nur sinnvoll wenn die Anwen dung nicht vordefiniert und durch ein Kennwort in der RDF gesch tzt ist Wird die Angabe dennoch verwendet so ist das USEPASS Kennwort gleich dem Kennwort in der RDF zu setzen bei Aufforderung zum Verbindungsaufbau an diese DCAM Anvvendung ein Kenn wort angegeben werden soll Fehlt die Angabe ist es nicht erforderlich Aufforderungen zum Verbindungsaufbau nicht bearbeitet werden sollen NLOGON Fehlt die Angabe werden sie bearbeitet LOGON Transportquittungen an die anfordernde Task geleitet werden sollen REQTASK oder nicht weitergeleitet werden sollen NOTACK Fehlt die Angabe werden sie der Prim rtask bergeben PRIMTASK Ferner kann man angeben 12 13 987 2135 8
293. orderung gefunden tr gt DCAM im ersten Byte X 00 ein YCHANGE wenn im CCB Steuerblock das Kennzeichen CID ung ltig ist bzw der CCB Steuerblock DCAM noch nicht bekannt ist Der Bereich auf den durch diesen Operanden verwiesen wird mu die folgenden Bedin gungen erf llen Der Bereich mu ein 8 Byte langes Feld sein Der Name mu alphanumerisch und linksb ndig ausgerichtet sein das erste Byte mu alphabetisch sein A Z e Das hei t der Name mu den Konventionen f r Assembler Namen entsprechen Nicht genutzte Byte des Feldes m ssen mit Leerzeichen X 40 aufgef llt sein PRONAME relexp Adresse des Feldes in dem der Prozessorname des Kommunikationspartners steht Es ist im gleichen Format wie PTNNAME anzugeben Erstes Zeichen X 40 bedeutet eigener Prozessor bei YOPNCON ACQUIRE Aufrufen LINK relexp Adresse eines Feldes in dem der Kettungsname steht siehe auch Seite 191 Dieser Operand wird ausgewertet bei YOPNCON Der Bereich auf den durch diesen Operanden verwiesen wird mu die folgenden Bedin gungen erf llen Der Bereich mu ein 8 Byte langes Feld sein Die Zeichen m ssen linksb ndig ausgerichtet sein Das erste Zeichen mu alphabetisch sein A Z 2 Nicht genutzte Byte des Feldes m ssen mit Leerzeichen X 40 aufgef llt sein 171 YCCB 172 PERM ul TEMP PERM TEMP Makroaufrufe Die Angaben im CCB sollen von d
294. ore Data Funktion gearbeitet werden soll MDATA Y Wird nichts angegeben so wird ohne More Data Funktion gearbeitet MDATA N siehe auch Handbuch DCAM Programmsehnittstellen die Adresse einer Liste die Namen verschiedener Verbindungswege zum Partner enth lt Sie wird bei YOPNCON ACQUIRE Seite 80 ausgewertet die Anzahl der Verbindungswege zum spezifischen Partner Es sind maximal 16 Verbindungswege m glich Sie werden bei YOPNCON ACQUIRE Seite 80 aus gewertet die Festlegung der Priorit t einer Verbindung H chste Priorit t PRIO 1 nur bei Systemanwendungen Niedrigste Priorit t PRIO 3 Standard Die Eintragungen von DCAM in den CCB sind abh ngig von den Varianten des YOPNCON und werden darum dort beschrieben siehe folgende Abschnitte 79 YOPNCON Auffordern zum Aufbau 3 2 1 2 Auffordern zum Aufbau Makroaufrufe Steuerbl cke und Register Speicherbereiche im Anwendungsprogramm AID register Fe Register n Nummer des Registers AID Kennzeichen der Anwendung 3 RPBeaddr1 RPB NEA ISO CCB relexp 1 ACQUIRE 2 ACB relexp 3 AREA relexp 4 gt Verbindungsnachricht n Byte AREALN absexp n lt 80 absexp n lt 32 4 AAREA relexp 3 AAREALN absexp s OPTCD 6 ASY 7 EID relexp 8 gt Ereigniskennzeichen 4 Byte EIDREF konstante 2 9 EIDREF2 konstante 2 9a CID Kennzeichen der
295. p ter vom Benutzer ver wendet um den Steuerblock zu adressieren addr Er kann diese Adresse auch in einem Register bergeben siehe Anhang Seite 322 Im folgenden Bild wird an einem Beispiel das Verfahren im berblick gezeigt Es wird ein ACB und ein ENB erzeugt um eine DCAM Anvvendung er ffnen zu k nnen siehe Abschnitt Erstmaliges Er ffnen Verwendung von Verteilcodes Seite 58 Steuerbl cke erzeugen Anvendungsprogramm Befehle Konstanten und Variable Erzeugung der Steuerbl cke YOPEN 1 H ACB1 YACB 1 pr gt DISNAME DINAMI ATTR SHARE DISCO oder wahlweise VERIFY PRIMARY USEPASS X F1F2C1 LA 3 ACB1 J ENB EN1 YOPEN ACB 3 1 LOGON CO1 EXPR CO2 ANAMI DC CL8 ANWEND 1 DINAMI DC CL8 PRIMPROZ col DS F 1 co2 DS F 1 l Eintr ge werden vom Makroaufruf ENACO gemacht nur f r DCAM NEA Transport Service Anvendungen Beispiel f r statische Steuerblockerzeugung 12 987 2135 8 987 2135 8 Steuerbl cke erzeugen Steuerbl cke vvahrend des Programmablaufs erzeugen Die vorher beschriebene statische Erzeugung der Steuerbl cke hat den Nachteil der Abh ngigkeit vom Format der Steuerbl cke Da die Steuerbl cke meist Adressen variab ler Felder enthalten ist auf diesem VVeg auch keine ablaufinvariante reentrant Pro grammierung m glich Die
296. pezifische CS Warteschlange eingetragen werden sollen Fehlt die Angabe wird die empf ngerglobale Warteschlange CA eingestellt Die Angabe CS mu gemacht werden wenn CS vorher eingestellt wurde und Empfangsaufrufe YRECEIVE z B bereits abgegeben wurden die noch nicht been det sind Die Angabe CS kann nicht mehrmals gemacht werden Wurde sie bereits in einem anderen Aufruf z B YRECEIVE gegeben der CS Zustand ist aber noch nicht eingestellt worden asynchrone Ausf hrung kann sie hier nicht nochmals erfolgen Bei DCAM NEA Transport Service Anwendungen ist die Angabe CS nur sinnvoll wenn ohne Verteilcodes gearbeitet wird ATTR NSHARE oder SHARE NDISCO beim YOPEN angegeben da die Nachricht mit akustischem Alarm an der Datenstation verbunden werden soll wird nur ausgewertet wenn EDIT SYSTEM nur bei NEA Transport Service die Adresse des Feldes in dem das Ereigniskennzeichen f r GO Signale steht jedoch nur wenn die Verbindung mit PROC SIGNAL aufgebaut wurde das erste Wort der Ereignisinformation die bergeben werden soll wenn das GO Signal eingetroffen ist Diese Angabe ist jedoch nur erforderlich bei PROC SIGNAL Das erste Byte wird bei der R ckgabe mit berschrieben Fehlt diese Angabe wird der Standardwert X 00000000 bergeben 987 2135 8 Nachricht senden YSEND 987 2135 8 13a das zvveite VVort der Ereignisinformation die bergeben vverden 501 wenn das GO Sig
297. port der Nachricht zur Anwendung aus Eine DEE setzt im Paketvorspann das D Bit auf 1 um f r dieses Datenpaket eine Quittung anzufordern Wenn das D Bit auf 0 gesetzt ist hat die Quittung nur lokale Bedeutung d h ein Datenpaket wurde fehlerfrei vom DPVN bernommen Die Anwendung des D Bits mu mit der Netzverwaltung ver einbart sein N heres siehe Handbuch TRANSDATA Anschlu an ein Datenpaket Vermittlungsnetz 25 29 Format der DCAM Verbindungsnachricht AREA 2 F tcan User Data AREALN AL L nge der lokalen und fernen DEE Adresse wenn bei der Generierung der Sta tion im Makro XSTAT der Operand IX25 DTEADR angegeben wurde F r jede L ngenangabe wird ein Halbbyte verwendet A Ferne und lokale DEE Adresse wenn bei der Generierung der Station im Makro XSTAT der Operand IX25 DTEADR angegeben wurde Die Adressen sind Halbbytes die u U auf ganze Bytes mit X0 aufgef llt sind LF L nge von F d h X 00 wenn F nicht vorhanden ist LF selbst ist 1 Byte lang F X 25 Leistungsmerkmale wahlweise der L nge LF Das X 25 Format ist im Datex P Benutzerhandbuch des Fernmeldetechnischen Zentralamtes beschrie ben Call User Data X 25 Benutzernachricht 371 IDCAM Benutzerschnittstelle Anhang Call User Data Die X 25 Benutzernachricht beim Verbindungsaufbau kann maximal 16 Byte lang sein Das erste Byte der Benutzernachricht ist wie folgt aufgebaut Bit 20 bis 25 nicht festgelegt
298. prechenden Angaben im Programm vervvendet Format SET DCAM CONNECTION LINK LINK NAME lt name 1 8 gt PARTNER ADDRESS PARAMETERS PARAMETERS PARTNER NAME BY PROGRAM lt name 1 8 gt PROCESSOR NAME BY PROGRAM lt name 1 8 gt CONNECTION PASSNORD BY PROGRAM lt c string 1 4 gt lt x string 1 8 gt SECRET USER DATA BY PROGRAM lt c string 1 4 gt lt x string 1 8 gt 364 987 2135 8 Anhang Mnotes 7 7 Mnotes Beschreibung der Mnotes der DCAM Makroaufrufe MACRO NOTE alle NOTE macroname versionsnummer YACB NOTE 10 ATTR INCORRECT OTE 10 ISO INCORRECT OTE 10 ATTR SUBOPERAND CONFLICT OTE 160 VALUE OF ISO IGNORED BECAUSE OF INVALID ATTR OTE 10 VERIFY INCORRECT OTE 10 LINKMOD INCORRECT OTE 10 LOGPASS INCORRECT OTE 10 USEPASS INCORRECT OTE 10 USEPW INCORRECT OTE 10 DCAMVER INCORRECT YCCB NOTE 10 INCORRECT OTE 10 USERFLD INCORRECT OTE 10 EDITIN INCORRECT OTE 10 EDITIN SUBOPERAND CONFLICT OTE 10 EDITOUT INCORRECT OTE 10 EDITOUT SUBOPERAND CONFLICT OTE 10 PROC INCORRECT OTE 10 MDATA INCORRECT OTE 10 PROC SUBOPERAND CONFLICT OTE 10 LINKMOD INCORRECT OTE 0 PARAMETER DEPROT REMOVED FROM THE DCAM INTERFACE OTE 10 EDIT INCORRECT OTE 10 PTNCHLN OVERFLOW OTE 160 VALUE OF MDATA IGNORED BECAUSE OF INVALID PROC OTE 10 PRIO INCORRECT YRPB NOTE 10 OPTCD INCORRECT OTE 5 TOVAL OUT OF RANGE OTE 10 EIDREF INCORRECT OTE 10 EIDR
299. r Makroaufruf wurde zur ckgewiesen wegen falscher Adressierung oder Registerangabe 20 ung ltige ACB Steuerblockadresse 20 ung ltige RPB Steuerblockadresse oder der RPB Steuerblock ist f r einen asynchron ablaufenden Befehl aktiver RPB belegt 20 ung ltige Adresse oder ung ltiger Inhalt der Operandenliste 20 ung ltige Registernummer 24 Der Aufruf nicht ausgef hrt da das DCAM Subsystem entweder nicht geladen wurde oder sich im HOLD DELETE Status befindet und der betroffene Task noch keine DCAM Aufrufe absetzte cc xx Der Makroaufruf wurde durch die System Exit x 52 Routine zur ckgeviesen xx Inhalte verden von einer speziellen Exit Routine definiert R ckfragen ggfs an den Systemver valter richten 316 987 2135 8 Anhang Registerbelegung 7 3 Registerbelegung 1 Registerbelegung bei Beendigung eines Aufrufs an DCAM F r die Inhalte von Register 15 k nnen symbolische Adressen generiert werden Makro aufruf YDDFDB Anhang Seite 326 Register 0 Register 1 Register 2 14 Register 15 R ckgabe von einem auf A 7 einen ACB Steuerblock verandert FDBK Feld bezogenen Makroaufruf R ckgabe von einem auf x x einen RPB Steuerblock ver ndert FDBK Feld bezogenen Makroaufruf R
300. r an deren Inhalt e bertragen werden sollen Die Namen der Felder sind der entsprechenden Tabelle siehe Anhang Seite 291 zu entnehmen DCG nur bei NEA Transport Service DIP Gibt den Typ des Steuerblocks an aus dem Felder gelesen vverden sollen 249 YSHOVVCB Makroaufrufe R ckmeldung Von DCAM zur ckgegebene nformationen Register R ckinformation Bedingungen 0 L nge des im Der in LENGTH angegebene Wert ist Benutzerbereich zu klein ben tigten Speichers 15 YSHOWCB wurde erfolgreich durch gef hrt links Die in BLKADDR angegebene Adresse b ndig ist keine Steuerblockadresse Obligatorischer Operand fehlt Die L nge des Speicherbereiches in den die Feldinhalte einge schrieben werden sollten ist zu klein Die ben tigte L nge steht im Register 0 Der Steuerblock dessen Adresse durch BLKADDR angegeben wurde ist nicht von der Art die in BLK angegeben wurde Das Steuerblockfeld ist keines des angegebenen Steuerblocks Die Adresse im MF Operanden ver weist nicht auf eine L Form Operandenliste Die Adresse des Benutzerbereichs ist ung ltig Ung ltige Parameterliste oder Registernummer Das Subsystem DCAM ist nicht verf gbar F r die Inhalte von Register 15 k nnen mit dem Makroaufruf YDDFDB siehe Anhang Seite 326 symbolische Adressen generiert werden 250 U987 J Z135 8 Makroaufrufe YTESTCB 4 26 987 2135 8 YTESTCB Funktion Mit dem YTESTCB Ma
301. r das g ltige Kennzeichen der Anwendung AID enth lt oder ein Register welches das g ltige Kennzeichen ent h lt Fehlt die Angabe mu vorher z B mit YMODCB das Kennzeichen in den RPB eingetragen worden sein 987 2135 8 143 YFORBID Verteilcode Zuordnung steuern Beispiel Die Zuordnung von Verteilungsname ALPHA und dem dazugeh rigen DCG Steuerblock soll aufgel st werden YFORBID RPB RPBAD RPBAD YRPB ACB ACBAD AREA DISNAM ACBAD YACB DISNAM DC CL8 ALPHA 144 987 2135 8 Makroaufrufe bezogen auf die Namen Zuvveisung 3 4 Makroaufrufe bezogen auf die Namen Zuvveisung Um Programme unabh ngig von aktuellen Operandenvverten zu machen kann der Benutzer die Namen Zuweisungsfunktion anwenden Zur Erstellung von Eintr gen in die taskspezifische Tabelle CLT communication link table stehen zwei Makroaufrufe zur Verf gung YAPPL f r Eintr ge die die DCAM Anwendung betreffen YCONN f r Eintr ge die die Verbindung betreffen 987 2135 8 145 YOPEN Zuvveisung f r die DCAM Anvvendung 3 4 1 Zuvveisung f r die DCAM Anvvendung Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anvendungsprogramm ACB relexp YOPEN ACB NEA ISO LINK relexp E Kettungsname 8 Byte LINKMOD PERM 2 CLT Eintragungen lt YAPPL Makro oder 3 Kommando
302. rametern EIDREF oder EIDREF2 des Steuerblocks RPB angeben Er bekommt sie dann entweder im Feld RPOSTAD bei synchronem SOLSIG oder im Register 3 bzw 4 der Contingency Routine bei asynchro nen SOLSIG bergeben Damit kann er auf den Steuerblock zur ckgreifen und die DCAM R ckinformation ber die Befehlsausf hrung auswerten siehe folgendes Bild Das h chstwertige Byte der Referenz EIDREF wird von DCAM mit sedez X 0C ber schrieben EIDREF2 bleibt unver ndert Falls als Referenz eine Adresse angegeben wird ist die zus tzliche Verwendung von EIDREF2 zu empfehlen im 31 bit Modus wird die Adresse X 0C000000 nur selten adressiert Das Feld RPOSTAD mu dann 8 Byte lang sein und beim SOLSIG mu RPOSTL 2 angegeben werden 36 987 2135 8 Asynchrone Ausf hrung Befehle ausf hren YOPNCON YRECEIVE RPB YSENDREC EIDREF C konstante X konstante 1 F konstante A konstante 1 V konstante 1 Fall ohne Contingency bergabe im SOLSIG RPOSTAD Benutzerfeld ae 3 Byte EIDREF oder 2 Fall mit Contingency Festlegung durch Anwender Konstante in Wortl nge SOLSIG COID Kennzeichen der bergabe an Contingency Contingency Routine 11 3 Byte EIDREF bergabe der Ereignis Information 987 2135 8 37 Asynchrone Meldungen 2 8 Asynchrone DCA
303. rbindungs Aufforderung Anwendungsprogramms ber X 25 an Anwendungsprogramm YOPNCON ACQUIRE LOGON Contingency wenn definiert outgoing call incoming call Datex P Netz VAR 3 Region 0 VAR 4 Region 1 DTE Adresse XAR 1 XAR 2 45890007 445890008 45890006 TRANSDATA oder Fremdsystem XAR X 25 Anschlurechner mit PDN 1 TRANSDATA Netze VAR Verarbeitungsrechner mit BS2000 DTE Data Terminal Equipment Datenendeinrichtung ANWxx Anwendungsname Hinweis Verbindungen ber die X 25 Schnittstelle k nnen auch vordefiniert werden siehe Handbuch Generierung eines Datenkommunikationssystems In diesem Fall kann sich die DCAM Anwendung mit YOPNCON ACQUIRE an die Verbindung anschlie en siehe Seite 92 Hier wird dagegen der dynamische Aufbau von Verbindungen ber die X 25 Schnittstelle beschrieben 987 2135 8 373 IDCAM Benutzerschnittstelle Anhang X 25 Stationstabellen in den Anschlu rechnern XAR 1 ferne ferne Parallel naher DTE Adresse Anwendung Partner Verbindung 45890008 ANWR1 2 45890008 ANWR2 XAR 2 ferne ferne naher Parallel DTE Adresse Anwendung Partner Verbindung 45890007 1 3 ANWR1 4 1 13 45890007 ANWL2 irrelevant m 45890006 1 8 ANWR2 4 1 Die Eintr ge werden bei der Generierung des PDN definiert durch PARTNAM XSTAT Parameter DTEADR STATNAM
304. rblock das ISO Attribut gesetzt werden Das ISO Attribut gilt dann f r alle Verbindungen die diese Anwendung unterh lt Aus diesen M glichkeiten ergeben sich f nf unterschiedliche Varianten des Makroaufrufs YOPEN die im folgenden beschrieben werden 987 2135 8 Einfach benutzbare Anvvendung YOPEN 3 1 1 1 Einfach benutzbare DCAM Anvvendung Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anvendungsprogramm 1 150 150 N Y 1 Name der APPNAME relexp 2 DCAM Anwendung 8 Byte USEPW C konstante X konstante 3 ENB relexp 4 ATTR NLOGON 5 LOGPASS C konstante 6 X konstante PRONAME relexp 7 LIN relexp 8 iKettungsname 8 Byte LINKMODE PERM 9 DCAMVER absexp 10 AID Kennzeichen der DCAM Anwendung Symbolischer Name des eigenen Prozessors FDB R ckmeldung siehe 8 Byte Anhang ab Seite 298 CLT Information Register 15 siehe Anhang ab Seite 298 DCAM gibt zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte ENB NEA ISO PROCON relexp 4 Contingency Kennzeichen 4 Byte COMEND relexp 4 EXPR relexp2 1 4 n TACK relexp 4 LOGON relexp 4 R LOSCON relexp 4 1 Adresse des Steuerblocks der die DCAM Anwendung beschreibt 2 nur in Verbindung mit EDIT USER 987 2135 8 51 Y
305. resse des Feldes in dem der Kettungsname steht da die Angaben im ACB mit den Informationen des CLT Eintrags CLT Communication Link Table berschrieben werden sollen der durch den Ket tungsnamen identifiziert wird PERM permanente nderung Bei fehlender Angabe werden die Informationen des CLT Eintrags nur f r diesen Aufruf ausgewertet Die Angaben im ACB werden nicht ver ndert TEMP tempor re nderung die Nummer der DCAM Version wenn bei der Task die neuen Funktionen ab DCAM V8 0 verwendet werden sollen Sollen die neuen Funktionen verwendet wer den mu 8 0 angegeben werden Bei fehlender Angabe oder einer Angabe 8 0 wird eine DCAM Version lt 7 0 angenommen 987 2135 8 Einfach benutzbare Anwendung YOPEN 987 2135 8 Beispiel 1 Die DCAM NEA Transport Service Anwendung die er ffnet werden soll soll einfach benutzbar sein Ihr Name wird vom System erzeugt Sie soll keine Aufforderungen zum Verbindungsaufbau annehmen Sie verarbeitet keine asynchronen Meldungen YOPEN 1 1 YACB ATTR NLOGON Beispiel 2 Die DCAM ISO Transport Service Anwendung die er ffnet werden soll soll einfach benutzbar sein Ihr Name wird vom Benutzer erzeugt Sie verarbeitet keine asynchronen Meldungen Der symbolische Name des eigenen Prozessors soll von DCAM zur ckgelie fert werden YOPEN 1 1 ISO Y APPNAME ANAME ANAME DE CL8 APPL PNAME DS
306. richt ersetzt die vom Anwender im Feld AREA angegebene Verbin dungsnachricht beim YOPNCON Pa wort In diesem Feld kann die Exit Routine beim R cksprung ein Pa wort an DCAM bergeben Dieses Pa wort ersetzt das vom Benutzer angege bene RDF Pa wort beim YOPEN oder das LOGON Pa wort beim YOPNCON ACCEPT 283 DCAM SYSTEM EXIT 6 2 1 3 284 R ckkehrinformation Die Exit Routine gibt in Register 15 R ckkehrinformation an die rufende DCAM Kompo nente in folgendem Format zur ck Register 15 RC FDBK Byte 0 reserviert Byte 1 2 FDBK Byte 3 RC R ckkehrinformation der Exit Routine an die rufende DCAM Komponen te Folgende Werte sind m glich 00 Aufruf annehmen 04 Aufruf ablehnen 08 Aufruf modifizieren R ckkehrinformation der Exit Routine an den DCAM Anwender Dieses Feld mu versorgt werden wenn RC 04 gesetzt ist Diese Angabe wird an den DCAM Anvvender im Feld FDBK1 FDBK2 berge ben FDBK kann entweder aus einem f r die Exit Routine reservierten Bereich CC00 CCFF genommen werden oder kann einer der g ltigen DCAM Return Codes sein FDBK darf nicht 0000 sein Falls RC 08 angegeben ist bergibt die Exit Routine in der Parameter liste YDDEXPL die g ltigen Daten f r die Modifikation 987 2135 8 DCAM SYSTEM EXIT 6 2 2 DCAM Exit Ereignisse 6 2 2 1 DCAM Datenstruktur m folgenden vverden die vvichtigsten Elemente der DCAM Datenstruktur beschrieben DARPPAR ACB
307. rten Sende und Empfangsaufruf eine Unterbrechung des Programmablaufs sparen Die Verteilcodezuordnung bei DCAM NEA Transport Service Anwendungen wird mit 2 Aufrufen gesteuert Makroaufrufe die auf die Daten bermittlung bezogen sind YSEND Senden einer Nachricht YRECEIVE Empfangen einer Nachricht YSENDREC Senden einer Nachricht und darauffolgender Empfang einer Nachricht von demselben Partner YRESET Zur cknehmen von YRECEIVE Aufrufen und ndern des CS CA Zustands der Verbindung YPERMIT Einer Task der Taskgruppe den Empfang von Nachrichten mit bestimmten Verteilcodes erm glichen nur bei NEA Transport Service YFORBID Einer Task der Taskgruppe den Empfang von Nachrichten mit bestimmten Verteilcodes verbieten nur bei NEA Transport Service Bei DCAM NEA Transport Service Anwendungen k nnen zus tzlich die DCAM Tasks asynchrone Meldungen in einer entsprechenden Contingency Routine bearbeiten siehe Seite 30 und Seite 38 Dies sind EXPR Expre nachricht angekommen TACK Transportquittung angekommen Erfolgter Empfang einer Nachricht Die Begriffe Nachricht Dateneinheit und More Data Funktion f r DCAM ISO Transport Service Anvvendungen sind im Handbuch DCAM Programmsehnittstellen definiert und werden hier nicht n her erl utert 125 YSEND Nachricht senden 3 3 1 Nachricht senden Makroaufrufe Steuerbl cke und Register Speicherbereiche im Anwendungsprogramm
308. rvice Anvvendungen 239 YSEND schl sselwort EID EIDREF EIDRE VCBAD nur f r DCAM NEA Transport Service Anvvendungen F2 R neuer wert addr L register 1550 L register relexp Makroaufrufe Zur Beschreibung der einzelnen Felder siehe YRPB Seite 223 und die Tabelle der Steu erblockfelder Anhang Seite 291 Hinvve is Ist f r eine Verbindung beim YOPNCON PROC SIGNAL angegeben worden und hat sich der Nachrichtenflu auf der Verbindung gestaut wird der sendenden Task f r jeweils den ersten YSEND Aufruf die R ckmeldung Wait for Go FDBK 10 04 0C zur ckgegeben Bevor ein entsprechendes GO Signal Eintrag f r das Ereigniskennzeichen EID gegeben wurde f hren weitere YSEND Aufrufe durch diese Task auf derselben Verbindung zu der R ckmeldung BCAM Mangel an Spei cherplatz FDBK 10 04 08 Weitere Tasks die auf einer berlasteten Verbindung zu senden versuchen werden genau so wie die zuerst sendende Task behandelt 240 987 2135 8 Makroaufrufe YSEND Bei der R ckmeldung VVait for Go vvird der Anforderungsparameter Block RPB gesperrt bis ein GO Signal gegeben ist DCAM tr gt in diesen RPB die FDBK Infor mation f r das GO Signal ein siehe Anhang Seite 7 R ckmeldungen FDB4 Sobald die berlastung der Verbindung behoben ist wird ein GO Signal jeder Task zugestellt die ein Wait for Go erhalten hat Ein GO Signal garantiert dem n ch
309. s Aufrufs Ablehnen des Aufrufs Modifizieren bestimmter YOPNCON Operand 8 Exit Ereignis CONCPL Aufruf der Exit Routine nach erfolgreichem Verbindungsaufbau d h wenn ein YOPNCON ACQUIRE vom Partner angenommen wurde 278 987 2135 8 987 2135 8 10 11 12 DCAM SYSTEM EXIT Exit Ereignis CONREG Aufruf der Exit Routine beim Eintreffen eines Verbindungswunsches nach Pr fung der Angaben vor Bearbeitung des Verbindungswunsches Funktionen der Exit Routine zus tzliche Pr fungen Annehmen des Verbindungswunsches Ablehnen des Verbindungswunsches Exit Ereignis CONCLS Aufruf der Exit Routine bei jedem Verbindungsabbau durch den Anwender YCLSCON vor Freigabe der DCAM Datenstruktur Exit Ereignis CONFCL Aufruf der Exit Routine bei jedem erzwungenen Verbindungsabbau wegen NEABI Protokollfehler oder wegen Quittungs berlauf Exit Ereignis CONBAD Aufruf der Exit Routine bei jedem Verbindungsabbau der durch den Partner veranla t wurde 279 DCAM SYSTEM EXIT 6 1 System Exits Bedienung Mit DSSM als Subsystem kann der Systemverwalter die DCAM Exit Routinen laden aktivieren deaktivieren sich ber den Status der Exit Routinen informieren Die Nummer des 5 ist 075 Die Verwaltung der Exits ist im Handbuch BS2000 SYSTEM EXITS beschrieben 6 2 System Exits Programmschnittstelle
310. s CCB festgelegt vurde FDBK R ckmeldung siehe Anhang Seite 298 DCAM gibt Register 15 siehe Anhang Seite 298 zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte der DCAM Anwendung AID Steuerblocks mit aktuellem Kennzeichen NEA Angaben zur Verbindung 1 5 14 16 CID Kennzeichen der Verbindung MAXLN Maximale L nge der auf dieser Ver bindung sendbaren Nachrichten 3 DCAM gibt PTNCHA 1 4 zur ck EDIT wie vordefiniert PROC APPSTART ANYSTART wie vordefiniert 92 987 2135 8 Anschlie en an eine vordefinierte Verbindung YOPNCON 987 2135 8 1 Adresse des Steuerblocks der den Aufruf beschreibt 2 konstante kann als Zeichenkonstante C konstante oder Sedezimalkonstante X konstante oder Festpunktkonstante F konstante oder Adre konstante A konstante V konstante definiert werden 3 abh ngig von der maximalen Paketl nge bei Transfer zu einem angeschlossenen Rechner bzw von einer Systemkonstanten bei bermittlung innerhalb des Verarbeitungsrechners 4 Die ersten vier Byte der Partnercharakteristika Die DCAM Anwendung soll sich an eine vordefinierte Anwendung anschlie en Dieser Aufruf ist eine Variante der Aufrufe die im Kapitel Auffordern zum Aufbau Seite 80 ohne Verteilcode und im Kapitel Aufbau einer Verbindung Seite 89 mit Verteilcode beschrieben w
311. sein Ferner kann angegeben werden 4 9 das nach einer LOGON Meldung nformationen ber den zum Verbindungsaufbau auffordernden Partner gegeben vverden sollen Ein Register das die L nge der Verbindungsnachricht enth lt wie sie bei Ansto der Contingency in Register 5 bergeben wurde Fehlt die Angabe mu vorher z B mit YMODCB die L nge h chstens 80 Byte bei DCAM NEA Transport Service Anwendungen und 32 Byte bei DCAM ISO Transport Service Anwendungen in das Feld AAREALN des RPB eingetragen wor den sein ein Register welches das Kennzeichen LID enth lt das bei Ansto der LOGON Contingency Routine in Register 4 bergeben wurde Die Angabe kann nur entfal len wenn vorher z B mit YMODCB der LID in den RPB eingetragen wurde Hinweis Die Verbindungsnachricht wird abgeschnitten wenn sie l nger ist als der Bereich dessen L nge in AAREALN angegeben wird Es ist deshalb empfehlenswert die L nge des Bereichs in der L nge der Verbindungsnachricht anzugeben die in Regi ster 5 bei Ansto der Contingency bergeben wird Bei DCAM ISO Transport Service Anwendungen ist es nicht m glich Informationen ber das tats chlich verwendete Verbindungsprotokoll zu erfahren 987 2135 8 Partnerinformation nach einer LOGON Meldung YINQUIRE 987 2135 8 Beispiel Der Benutzer hat eine LOGON Contingency Routine Einsprungadresse LOGONADR definiert Wenn sie aktiviert wird m chte er wissen
312. sport Service Anwendungen bei MDATA Y Anzeige im FDB4 X 21 weitere Dateneinheiten folgen die Nachricht ist noch nicht abgeschlossen bzw Anzeige im FDB4 X 81 gt es folgen keine weiteren Dateneinheiten die Nachricht ist abgeschlossen bei MDATA N wird im FDB4 nur X 81 angezeigt Nachricht Bei DCAM NEA Transport Service Anwendungen kann auf YSEND bei EDIT SYSTEM eine negative zweite Transportquittung eintreffen Sie geht bei SHARE Anwendungen unabh ngig von REQTASK an die Prim rtask 987 2135 8 133 YRECEIVE Nachricht oder Transportquittung empfangen Beispiel 1 synchrone Verarbeitung Es soll auf der durch den CCB Steuerblock mit der Adresse CCBAD beschriebenen Verbindung eine Nachricht empfangen vverden die maximal 100 Bytes lang ist Falls doch eine l ngere Nachricht ankommt so soll der zu lange Teil aufgehoben werden Die Nachricht soll in den Bereich an der Adresse EMPFANG geschrieben werden YRECEIVE RPB RPBAD RPBAD YRPB ACB ACBAD CCB CCBAD AAREA EMPFANG AAREALN 100 OPTCD KEEP CS ACBAD YACB CCBAD YCCB EMPFANG DS CL100 134 987 2135 8 Nachricht oder Transportquittung empfangen YRECEIVE 987 2135 8 Beispiel 2 asynchrone Verarbeitung Es soll auf der durch den CCB Steuerblock mit der Adresse CCBAD beschriebenen Verbindung asynchron eine Nachricht empfangen werden die maximal 100 Bytes lang ist Falls doch eine l ngere Nachricht ankommt soll der zu l
313. ssiger Ger teheader 08 L nge der Nachricht ist 0 oc VTSU ist nicht verf gbar 10 Fehler im VTSUCB 14 achricht mit Fehler im NEABT Protokoll empfangen 314 987 2135 8 Anhang Tabelle der R ckmeldungen R ckmelde Feld Bedeutung Makroaufruf F F F E Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OT O G T TI I I R T N N G G E R T D V E E E C 8 60 ung ltige Verteilcodelange CODELN x 8 64 reserviert 8 68 reserviert 8 ec Die Angabe von ACB Parametern steht im x Widerspruch zu ISO Y 8 70 Es ist kein VTSUCB vorhanden der an den Anwender zur ckgeliefert werden kann x 8 74 VTSUCB nicht erlaubt EDIT USER x x x x x 8 78 ung ltige VCBADR Adresse x x 8 7C Inkonsistenz zwischen ROUTL und ROUTN x 8 80 ung ltige ROUTL Adresse x 987 2135 8 315 Tabelle der R ckmeldungen Anhang R ckmelde Feld Bedeutung Makroaufruf F F F E Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OT O G T TI I I R T N N G G E R T D V E E E C 20 De
314. st eingetreten wenn die Antwort auf eine Verbindungsaufforderung oder annahme erfolgte oder eine Nachricht oder ein GO Signal eingetroffen ist 987 2135 8 Makroaufrufe YRPB Dieser Operand wird ausgewertet bei YOPNCON YRECEIVE YSEND und YSENDREC Bei YOPNCON YRECEIVE und YSENDREC nur wenn OPTCD ASY Q gesetzt wurde In diesem Fall mu der Operand angegeben werden siehe OPTCD ASY OPTCD Q Bei YSEND nur wenn die Verbindungseigenschaft PROC SIGNAL im CCB definiert wur de Auch in diesem Fall mu der Operand angegeben werden siehe YCCB PROC SIGNAL EIDREF information Diese Angabe ist das erste Wort einer benutzereigenen Referenz das der Anwender zur ckerh lt wenn das Ereignis eingetreten ist Das erste h chstwertige Byte wird dabei mit X 0C berschrieben Bei synchron abgesetztem SOLSIG Aufruf verweist der Anwender mit dem Operanden RPOSTAD auf den Bereich in den die Referenz eingetragen werden soll Bei asynchron abgesetztem SOLSIG Aufruf wird die Referenz im Register 3 der zugeh ri gen Contingency Routine bergeben Dieser Operand wird ausgewertet bei YOPNCON YRECEIVE YSEND und YSENDREC Bei YOPNCON YRECEIVE und YSENDREC nur wenn OPTCD ASY Q gesetzt wurde In diesem Fall mu der Operand angegeben werden siehe OPTCD ASY OPTCD Q Bei YSEND nur wenn die Verbindungseigenschaft PROC SIGNAL im CCB definiert wur de Auch in diesem Fall mu der Operand angegeben werden siehe YCCB PROC SIGN
315. sten YSEND Aufruf keinen Erfolg Falls eine Verbindung oder Anwendung geschlossen wird wird ein GO Signal jeder Task zugestellt die eines f r die betroffene Verbindung erwartet Bei DCAM NEA Transport Service Anwendungen k nnen bei einem Fehler in VTSUCB n here Informationen dazu durch den Aufruf YINQUIRE OPTCD VTSUCB erhalten werden R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung siehe auch Seite 126 und der Tabelle der Meldungen zu entnehmen Anhang Seite 298 987 2135 8 241 YSENDREC 4 23 242 Makroaufrufe YSENDREC Funktion Mit diesem Aufruf werden die Funktionen des YSEND und YRECEIVE kombiniert ange fordert siehe auch Seite 136 Es werden Daten zu einem bestimmten Partner gesendet und von diesem werden anschlie end Daten erwartet Format Name Operanden symbol YSENDREC RPB addr schl sselwort neuer wert Operanden Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer wert Hiermit k nnen Werte des RPB Steuerblocks wie auch mit dem Aufruf YMODCB aktuali siert werden 987 2135 8 Makroaufrufe 987 2135 8 YSENDREC Folgende Angaben sind bei der Bearbeitung des YSENDREC von Bedeutung sc A AI es CI AR AR AA AA OP 1 hl sselvort neuer vert B 1 addr pD 1 register B 2 addr 2 register EA addr EALN value REA addr REALN value TCD Ir no un K z
316. t YRECEIVE oder YSENDREC kann sich auf diese Verbindung beziehen ohne vorher das Kenn zeichen eintragen zu m ssen Werden die Kennzeichen AID bzw C D mit Hilfe der DSECT YDDRPB direkt in den YRPB Steuerblock eingetragen so m ssen auch die entsprechenden Flags YDDRAIFL bzw YDDRCIFL gesetzt werden Bei der Kontrollblockmodifikation durch DCAM geschieht dies automatisch Die Eintragung in den RPB ist auf zweifache Weise m glich siehe den folgenden Ab schnitt 22 987 2135 8 Vervvendung der Kennzeichen vor Ausf hrung nach Ausf hrung vor Ausf hrung nach Ausf hrung Er ffnen YOPEN ACB ACB Kennzeichen lk sicherstellen 1 1 YSHOWCB AID Prim r und Sekund rtask Kennzeichen z B mit YMODCB z B mit YMODCB oder YOPNCON in oder YOPNCON eintragen RPB RPB YOPNCON RBP Empfang YRECEIVE RBP 3 Aufbau einer A Kennzeichen der Nachricht A Kennzeichen 2 sicherstellen Es ANY H 2 sicherstellen C gen Partners I ysHowcB CCB CID CID Sekund rtask 1 z B mit YMODCB Kennzeichen nur bei evtl auch in RPB Verteilcodes 1 DIP SHOVVCB m oder YSEND eintragen Doe Senden YsEND PES achricht Prim rtask DCG nur bei Verwendung von Verteilcodes NEA z B mit YMODCB Kennzeichen Ps in RPB oder YSEND RPB
317. t in Register 6 die laufende Nummer der Nachricht die quittiert wurde in Register 7 45 SECOND 2 8 7 46 Asynchrone Meldungen SECOND Mit dieser Contingency kann sich eine Prim rtask in drei F llen Informationen ber eine Sekund rtask geben lassen Eine Sekund rtask er ffnet die Anwendung nach einer Prim rtask Eine Sekund rtask meldet sich von der Anwendung ab Eine Nachricht trifft f r einen Verteilungsnamen ein der keiner Sekund rtask zugeordnet ist nur bei NEA Transport Service Folgende Informationen werden beim Einsprung in die SECOND Contingency Routine bergeben das Kennzeichen der DCAM Anvvendung AID in Register 3 der Grund f r den Ansto der SECOND Contingency s oben in Register 4 der Verteilungsname gegebenenfalls in Register 5 und 6 nur bei NEA Transport Service 987 2135 8 Anvvendung der Funktionen von DCAM 3 Anvvendung der Funktionen von DCAM Bevor der Anwender mit der Lekt re dieses Kapitels beginnt sollte er unbedingt mit den Funktionen von DCAM vertraut sein wie sie im Kapitel Funktionen von DCAM des Benutzerhandbuchs DCAM Programmsoehnittstellen beschrieben sind Er findet dort die gleiche Abfolge und Aufteilung des Kapitels wie hier So kann er ohne weitere Querver weise falls notwendig im Handbuch DCAM Programmsoehnittstellen nachschlagen Besonderer Wert wird darauf gelegt zur Erleichterung der Einarbeitung die Sch
318. t wenn der Aufruf nicht sofort beendet werden kann 987 2135 8 229 YRPB 230 NQ Makroaufrufe Dies kann auftreten bei YRECE VE wenn auf die Ankunft von Daten gewartet werden mu YOPNCON OPTCD ACCEPT wenn auf eine Aufforderung zum Verbindungsaufbau gewartet werden mu Ein Makroaufruf der sich auf diesen RPB Steuerblock bezieht wird nicht in eine Warteschlange eingereiht wenn der Aufruf nicht sofort beendet werden kann Dieser Operand wird ausgewertet bei YOPNCON YRECEIVE und YSENDREC Die Angabe OPTCD Q ist obligatorisch wenn gleichzeitig OPTCD ASY gesetzt wird REOLOGON NAMXLATE TPTN Be APPSTAT CIDXLATE Die Art des YINQUIRE Aufrufs wird festgelegt REQLOGON TOPLOGON NAMXLATE COUNTPTN APPSTAT CIDXLATE SPEC OPTCD ANY SPEC Nach einer LOGON Meldung sollen Informationen ber den zum Verbin dungsaufbau auffordernden Partner gegeben werden Es sollen Informationen ber den ersten wartenden Partner gegeben werden der zum Verbindungsaufbau auffordert Partner und Prozessornamen sollen in das Kennzeichen der Verbin dung CID bersetzt werden Es wird die Anzahl der verbundenen Partner und die Anzahl der zum Verbindungsaufbau auffordernden Partner abgefragt Es werden Informationen dar ber abgefragt ob eine Anwendung er ff net ist oder nicht und ob sie sich im START oder STOP Zustand befin det Ein Verbindungskennzeichen CID
319. t garantiert Der Zugriff zur DCAM Datenstruktur darf daher nur ber die symbolischen Feldnamen erfolgen bei DCM Versionswechsel k nnen Neu bersetzungen notwendig werden 1 DCAM interner Arbeitsbereich DARPPAR Format symbol YDDDVEC PP 1 2 DCAM application control block DACB Format symbol YDDDACB D lel prefix e YDDH 289 DCAM SYSTEM EXIT 3 DCAM connection control block DCCB Format YDDDCCB Pl Le prefix 4 DCAM request parameter block DRPB Format YDDL symbol symbol YDDDRPB D 1 prefix m Erkl rung der Operanden symbol symbolische Adresse f r den Makroaufruf Wird keine Adresse angege ben so wird als Adresse der Makroname angenommen D gibt an da ein Pseudoabschnitt generiert werden soll C gibt an da ein Code Abschnitt generiert werden soll prefix Zeichenfolge von maximal 4 Zeichen die dem Namen vorangestellt wird Fehlt diese Angabe so wird jeweils die unterstrichene Zeichen folge vorangestellt 290 U987 J Z135 8 Anhang 7 1 987 2135 8 Tabelle der Steuerblockfelder Anhang Tabelle der Steuerblockfelder Die folgende Tabelle fa t alle Steuerblockfelder zusammen die durch Steuerblock oder Aktionsaufrufe belegbar bzw ver nderbar sind Es wird der Wert oder der mnemotechnische Wert der f r das jeweilige Feld benutzt werden kann angegeben Die Aufrufe YGENCB YMODCB
320. t werden kann Er kann maximal 8 Byte lang sein und mu alphanumerisch und links b ndig ausgerichtet sein Das erste Zeichen mu alphabetisch sein A Z d h der Name mu den Konventionen f r Assembler Namen entsprechen register enth lt die Adresse eines 8 Byte langen Feldes in dem der Vertei lungsname linksb ndig steht Nach rechts sind freie Bytes mit Leerzei chen X 40 aufzuf llen fkennvort3 1 2 nur bei NEA Transport Service register kennvvort3 gibt das Kennvvort zum Aufbau einer Verbindung an gegeben in der Primartask als Vorgabe f r die Kommunikationspartner Das Kennvvort ist 4 Byte lang und ist eine Zeichenkonstante C konstante oder eine Sedezimalkonstante X konstante Dieses Kennwort kann w hrend einer bestehenden Anwendung nicht ge ndert werden register enth lt die Adresse einer 4 Byte langen Adre konstanten in der das Kennwort rechtsb ndig steht 987 2135 8 167 YAPPL Makroaufrufe R ckmeldung Von DCAM zur ckgegebene nformationen Register R ckinformation Bedingung 15 X 007 Der Aufruf vurde vie links gev nscht ausgef hrt b ndig X 04 Der Aufruf wurde nicht ausgef hrt weil nicht genug Speicherplatz vor handen war X 087 Der angegebene Kettungsname vurde nicht vervendet xos Der Aufruf konnte vegen eines Systemfehlers nicht ausgef hrt verden X 247 Das Subsystem DCAM ist nicht verf gbar 168 987 2135
321. tern Voraussetzung ist da die Nachricht in EBCDIC vorliegt Diese Angabe ist die Voraussetzung f r die Benutzung logischer Datenstationen Dieser Operand wird ausgewertet bei YOPNCON Bei OPTCD ACQUIRE ist die Angabe von ED T SYSTEM nicht notwendig Die tat s chlich eingestellte Nachrichtenbehandlung wird dann von DCAM eingetragen PHYS EDITIN LINE FORM Dieser Operand legt die Nachrichtenaufbereitung bei der Eingabe fest nur bei NEA Transport Service PHYS Das System beschr nkt die Nachrichtenaufbereitung auf eine evtl notwendige Entblockung und evtl auf bergabe von Kleinbuchsta ben Dabei wird vom System eine Reassemblierung geblockter Nachrichten unterst tzt und ggf Kleinbuchstaben bergeben Beim YRECEIVE mu der Benutzerbereich AAREALN mindestens gro genug sein um den Nachrichtenkopf aufnehmen zu k nnen LINE Das System bereitet Nachrichten mit Hilfe von logischen Datenstatio nen auf Hinweis Die logischen Steuerzeichen k nnen mit symbolischen Namen angegeben werden siehe Handbuch VTSU Kapitel Logische Steuerzeichen 987 2135 8 Makroaufrufe 987 2135 8 YCCB FORM Die Nachrichtenaufbereitung wird vom Systemprogramm FHS oder FORM durchgef hrt Format Datenstation Dieser Operand wird ausgewertet bei YOPNCON und YCHANGE jedoch nur wenn EDIT SYSTEM gesetzt wurde GETBS m nur bei NEA Transport Service NGETBS GETBS Der Anwender behande
322. terst tzung log Daten stationen Codierung und Ausf hrung Katalog der Makroaufrufe von DCAM Programmen Beschreibung DCAM System EXIT Aufbau der Einf hrung und des Programmierhandbuchs Dieses Handbuch enth lt die Beschreibungen sowohl f r DCAM ISO Transport Service Anwendungen wie auch f r DCAM NEA Transport Service Anwendungen Dort wo es Unterschiede zwischen den beiden Anwendungen gibt ist dies gekennzeichnet Textteile Abschnitte oder ganze Kapitel die nur f r DCAM NEA Transport Service Anwendungen gelten sind am Anfang des Textes links mit L gekennzeichnet 987 2135 8 987 2135 8 Einleitung VVie soll der DCAM Programmierer vorgehen Er sollte mit einem gr ndlichen Studium des Benutzerhandbuchs Programm schnittstellen beginnen Erst wenn er dieses Benutzerhandbuchs durchgearbeitet hat besitzt er die Vorkenntnisse die f r das vorliegende Benutzerhandbuch n tig sind Das Benutzerhandbuch Programmschnittstellen ist so geschrieben da es sequentiell zu lesen ist Der Anwender wird Schritt f r Schritt in DCAM eingef hrt Im Kapitel DCAM Assembler Schnittstelle wird die Einf hrung aus Programm schnittstellen weitergef hrt Es erkl rt die besonderen Techniken bei der Verwendung der Makroaufrufe Im Kapitel Anwendung der Funktionen von DCAM wird jeder Aufruf mit der n tigen Versorgung der Felder vollst ndig beschrieben Die Beschreib
323. tiges DID Ung ltiges LID Die Verbindung ist durch eine Anforderung des Benutzers abgebaut worden oder durch einen YCLSCON Es ist eine erzwungene Verbindungsunterbrechung zum Partner aufgetreten oder der Partner hat die Verbindung abgebrochen Der Partner befindet sich im CS Zustand und der bergang in den CA Zustand ist noch nicht abgeschlossen Der Partner befindet sich im CS Zustand mit noch nicht beendeten YRECEIVE Befehlen Der angeforderte bergang in den CA Zustand ist nicht zul ssig Der Partner befindet sich im CS Zustand f r einen anderen Task 306 nur in Kombination mit 21 1 und 20 1 24 1 in FDB4 GO Signal 987 2135 8 Anhang Tabelle der R ckmeldungen R ckmelde Feld Bedeutung Makroaufruf F F F E Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OTO G T TI I I R T N N G G E R T D V E E E C oc 26 Der Partner befindet sich im CA Zustand YRECEIVE mit OPTCD SPEC ist nicht zul ssig x x oc 30 Die Nachricht ist zu lang l nger als MAXLN x x oc 34 Die Lage des Verteilcodes berschreitet die maximale L nge der Nachricht x x 38 Die fortlaufende Nummer ist bereits benutzt der Quittierungsvorgang ist noch
324. tur FHS BS2000 OSD TRANSDATA Benutzerhandbuch Netzzugang f r Datenstationen TRANSDATA Benutzerhandbuch TRANSDATA PDN GA Generierung eines Datenkommunikationssystems TRANSDATA Benutzerhandbuch DCAM BS2000 OSD TRANSDATA COBOL Aufrufe Benutzerhandbuch DCAM BS2000 OSD TRANSDATA Programmschnittstellen Beschreibung BS2000 0SD Dienstprogramme Benutzerhandbuch BS2000 OSD Benutzer Kommandos SDF Format Band 1 A Q Benutzerhandbuch BS2000 OSD Benutzer Kommandos SDF Format Band 2 R Z Benutzerhandbuch BS2000 OSD Makroaufrufe an den Ablaufteil Benutzerhandbuch TIAM TRANSDATA BS2000 OSD Benutzerhandbuch 387 Literatur TRANSDATA TRANSIT CD Benutzerhandbuch Datensichtstationen TRANSDATA Funktionelle Beschreibung Datensichtstationen TRANSDATA Code Tabellen VTSU BS2000 OSD TRANSDATA Benutzerhandbuch XHCS Extended Host Code Support f r BS2000 0SD Benutzerhandbuch Bestellen von Handb chern Die aufgef hrten Handb cher finden Sie mit ihren Bestellnummern im Druckschrif tenverzeichnis Datentechnik Dort ist auch der Bestellvorgang erkl rt Neu erschienene Titel finden Sie in den Druckschriften Neuerscheinungen Datentechnik Beide Ver ffentlichungen erhalten Sie regelm ig wenn Sie in den entsprechenden Ver teiler aufgenommen sind Wenden Sie sich bitte hierf r an Ihre zust ndige Siemens Zweigniederlassung au erhalb der Bundesrepublik Deutschland hilft Ihnen die zust
325. u Zur cknehmen von Empfangs Aufrufen und ndern des CS CA Zustands einer Verbindung Erzeugen eines Anforderungsparameter Blocks Senden einer Nachricht oder Expre nachricht bei DCAM NEA Transport Service Anwendungen Senden einer Nachricht bei DCAM ISO Anwendungen Kombiniertes Senden einer Nachricht oder Expre nachricht und Empfangen einer Nachricht Expre nachricht oder Transportquittung bei DCAM NEA Transport Service Anwendungen Kombiniertes Senden und Empfangen einer Nachricht bei DCAM ISO Transport Service Anwendungen ndern des Zustands einer DCAM NEA Transport Service Anwendungen bertragen einzelner Feldinhalte aus einem Steuerblock in den Benutzerbereich Vergleichen eines Feldinhalts in einem Steuerblock mit einem vorgegebenen Wert 987 2135 8 Makroaufrufe 4 1 YACB Funktion YACB Es wird ein Anwendungssteuerblock ACB application control block erzeugt siehe auch Seite 11 Format symbol 987 2135 8 Operanden Y APP ATT PRO bi VER ATT DIS LOG DCA AME relexp SHARE R NSHARE AME relexp ENB relexp K relexp PERM TEMP EPASS kennwort1 EPW kennwort2 fNO IFY 4 PRIMARY SECONDARY VER absexp DISCO x 1 NDISCO NOTACK AME relexp PRIMTASK LOGON 1 lb h NLOGON PASS kennwort3 157 YACB 158 Makroaufrufe Operanden
326. uali siert werden 987 2135 8 Makroaufrufe YSETLOG 987 2135 8 Folgende Angaben sind bei der Bearbeitung des YSETLOG von Bedeutung schl sselwort neuer wert ACB 1 addr arp 2 register OPTCD 10 stop 1 Entweder ACB oder A D mu angegeben werden Werden sowohl ACB wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird 2 Entweder CCB oder CID mu angegeben werden Werden sowohl CCB wie auch CID angegeben und passen CCB und CID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird Zur Beschreibung der einzelnen Felder siehe YRPB Seite 223 und die Tabelle der Steu erblockfelder Anhang Seite 298 R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung siehe auch Seite 67 und der Tabelle der Meldungen Anhang Seite 298 zu entnehmen 247 YSHOVVCB 4 25 248 Makroaufrufe YSHOVVCB Funktion Mit dem YSHOVVCB Makroaufruf werden die Inhalte von einem oder mehreren ACB CCB DIP ENB oder RPB Feldern in einen vom Anwender bestimmten Bereich ber tragen Mit einem YSHOVVCB Aufruf k nnen nur die Felder von jeweils einem bestimm ten Steuerblock bertragen werden in der Reihenfolge wie sie im FIELDS Operanden angegeben wurden Die erforderliche L nge des Bereiches ist der Tabelle der Steuer blockfelder zu entnehmen Ist der Benutzerbereich zu kurz um alle Felder a
327. uf VVird keine Adresse angege ben so wird die Adresse YDDEXPL abgesetzt D es wird ein Pseudoabschnitt DSECT generiert prefix gibt eine Zeichenfolge von max 4 Zeichen an die den Namen voraus gestellt vvird Standardvvert ist YDDX 281 DCAM SYSTEM EXIT Beispiel YDDEXPL DSECT kkkxkkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkkkkkkkkkkxkkkkkkkkxkkxkxkxkxkkkkkkkkkkkkkkxk DCAM EXIT PARAMETERLISTE kkkkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkxkkxkxkkkxkkxkkxkkkkkkxkkkkxkxkxkxkxkxkxkkkkkkkkkkkxk EINGABEPARAMETER YDDXDPAR DS A YDDXMAIN DS x YDDXAPPL EQU 1 YDDXCONN EQU 2 YDDXSUB DS x YDDXAOPN EQU 1 YDDXACLS EQU 2 YDDXASHU EQU 3 YDDXATRM EQU 4 YDDXAFCL EQU 5 YDDXCACQ EQU 6 YDDXCACC EQU 7 YDDXCCPL EQU 8 YDDXCREQ EQU 9 YDDXCCLS EQU 10 YDDXCFCL EQU 11 YDDXCBAD EQU 12 x EINGABE RUECKGABEPARAMETER YDDXLOGL DS H YDDXLOGM DS CL80 YDDXL DS XL4 EQU YDDEXPL x YDDEXPL A DARPPA DCAM INTERNER ARBEITSBEREICH EXIT MAIN CASE APPL CONN EXIT SUB PPOP D PCLS PPSHU PPTRM PPFCL CONACQ CONACC CONCPL CONREQ CONCLS CONFCL CONBAD 450 R CASE PASSWORT LAENGE DER DCAM EXIT PARAMETERLISTE 840126 LAENGE DER LOGON MESSAGE LOGON MESSAGE 55647211 98
328. uf bezieht der Daten berlauf angezeigt Im ARECLN Feld siehe Anhang Seite 291 desselben Steuerblocks wird die L nge des Datenre stes angezeigt 7 KEEP Wenn die Nachricht eine L nge hat die die L nge des im Empfangs Makroaufruf angegebenen Empfangsbereichs berschreitet wird der berlange Teil f r einen nachfolgenden YRECEIVE OPTCD SPEC aufgehoben 987 2135 8 231 YRPB 232 Makroaufrufe Der Empfangsaufruf wird erfolgreich beendet Es wird jedoch im RPB Steuerblock auf den sich der Aufruf bezieht im FDBK Feld siehe Anhang Seite 298 angezeigt da die Restdaten aufgehoben werden Im ARECLN FELD siehe Anhang Seite 291 desselben Steuerblocks wird die L nge des Datenrestes angezeigt CCBTK Es gilt der im PROC Operanden des CCB Steuerblocks angegebene Wert TRUNC oder KEEP Dieser Operand wird ausgewertet bei YRECEIVE und YSENDREC jedoch nur wenn ein Daten berlauf eintritt Bei Abweichung haben hier getroffene Angaben Vorrang vor denen im CCB In einfach benutzbaren DCAM Anwendungen oder in mehrfach benutzbaren DCAM Anwendungen bei DCAM NEA Transport Service Anwendungen mit ATTR NDISCO wird die KEEP Funktion nur ausgef hrt wenn der Partner im CS Zustand ist oder vom Empfangs Makroaufruf der den ersten Teil der Nachricht empfangen hat in den CS Zustand versetzt wird Der Rest der Nachricht kann nur mit einem YRECEIVE OPTCD SPEC Makroaufruf empfangen werden der von der Task ausgegeben wird di
329. ufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm ACB addrl YOPEN ACB NEA Name der APPNAME relexp 1 DCAM Anwendung 8 Byte DISNAME relexp 2 Verteilungsname 8 Byte USEPW C konstante X konstante 3 ATTR SHARE 4 DCAMVER absexp 5 ENB relexp 6 PRONAME relexp 7 LIN relexp 8 Kettungsname 8 Byte LINKMODE PERM 9 VERIFY SECONDARY 10 AID Kennzeichen der DCAM Anwendung Symbolischer Name des eigenen Prozessors FDBK R ckmeldung siehe Anhang Seite 298 8 Byte CLT Information Register 15 siehe Anhang Seite 298 DCAM gibt zur ck FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte ENB NEA COMEND relexp 6 Contingency Kennzeichen 4 Byte TACK relexp 2 6 LOSCO relexp 6 x SECOND relexp 6 s n LOGON relexp 7 En LOSCO relexp 7 s la SECOND relexp 7 1 Adresse des Steuerblocks der die DCAM Anvendung beschreibt 2 nur wenn der Primproze ATTR REQTASK gegeben hat 64 987 2135 8 Nachfolgendes Er ffnen Vervvendung von Verteilcodes YOPEN Es soll eine DCAM Anwendung nachfolgend er ffnet werden und mit Verteilcodes arbei ten Vorraussetzung ist da in der Prim rtask die Attribute SHARE und DISCO angege ben wurden siehe Seite 58 Dazu mu angegeben werden 1 der Name der DCAM Anvvendung der Name mu mit dem von der Prim rtask vergebenen identisch sein Er steht in einem hier adressierten Feld von 8 Byte
330. ufen werden Format Name Operanden symbol YCHANGE RPB addr schl sselwort neuer wert Operanden Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer wert Hiermit k nnen Werte des RPB Steuerblocks wie auch mit dem Aufruf YMODCB aktuali siert werden 987 2135 8 Makroaufrufe YCHANGE Folgende Angaben sind bei der Bearbeitung des YCHANGE von Bedeutung schl sselwort neuer Wert ACB 1 addr arp 1 register CCB addr VCBADR relexp 1 Entweder ACB oder A D mu angegeben werden Werden sowohl ACB wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird nur bei DCAM NEA Transport Service Anwendungen Zur Beschreibung der einzelnen Felder siehe YRPB Seite 223 oder die Tabelle der Steuerblockfelder Anhang Seite 291 R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung und der Tabelle der Meldungen zu ent nehmen siehe Seite 118 und Anhang Seite 298 987 2135 8 187 YCLOSE 4 5 188 Makroaufrufe YCLOSE Funktion Der YCLOSE schlie t eine DCAM Anwendung f r eine Task bzw l st sie auf siehe auch Seite 71 Format Name Operanden symbol YCLOSE AcB addr I register ACB addr Adresse des ACB Steuerblocks der das Kennzeichen der DCAM Anvvendung enth lt die geschlossen werden soll AID register
331. ufruf vvird mit einem Namen versehen damit die Operandenliste adres siert vverden kann Aus den angegebenen Operanden vird eine Operandenliste erzeugt Konstanten Adre konstanten usw Die Befehlsform MF E addr wird im Befehlsteil des Programms abgesetzt Sie erzeugt eine Befehlsfolge die den SVC supervisor call an DCAM enth lt und den Bezug zur Operandenliste deren Adresse in addr angegeben wird Die Adresse der Operandenliste kann auch in einem Register angegeben werden Register 2 15 Das Register 1 darf dazu nicht verwendet werden wahlweise eine Parameterliste die Werte der adressierten Operandenliste erg nzt oder aktualisiert Dieses Verfahren ist eigens f r DCAM eingef hrt worden um Operandenlisten universell einsetzen zu k nnen Die Steuerbl cke werden erzeugt mit den Operanden der gesonderten Liste und den neuen Werten die hier angege ben wurden siehe Bild unten alte Operandenliste LISTE YGENCB MF L BLK ACB ATTR SHARE weitere Operanden neue Operandenliste und Erzeugung Erzeugen eines YGENCB MF E LISTE Steuerblocks ACB BLK ACB ATTR NSHARE NSHARE Beispiel f r nderung bei der dynamischen Erzeugung des Steuerblocks 987 2135 8 15 Steuerbl cke erzeugen Das folgende Bild zeigt an einem Beispiel vvie der Aufruf YGENCB eingesetzt vverden kann Es werden Steuerbl cke im Klasse 5 Speicherbereich von DCAM verwaltet erze
332. ufzuneh men tr gt DCAM einen Fehlercode in Register 15 ein und hinterlegt die erforderliche L nge im Register 0 Der Aufruf YSHOVVCB kann nur benutzt werden wenn das DCAM Subsystem erfolg reich geladen wurde Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kom mando oder einen DCAM Aufruf erfolgreich abgesetzt hat kann er trotz HOLD Sub system oder DELETE Subsystem bis Taskende mit DCAM arbeiten gilt auch f r Format Name Operanden symbol YSHOWCB ACB CCB BLK ENB RPB BLKADDR addr WAREA addr LENGTH value L E addr fsehl sselvort FIELDS schl sselvort mo 987 2135 8 Makroaufrufe YSHOVVCB 987 2135 8 ACB er BLK Es RPB Gibt den Typ des Steuerblocks an aus dem Felder gelesen werden sollen BLKADDR addr Gibt die Adresse des Steuerblocks an dessen Felder mit YSHOWCB behandelt werden sollen WAREA addr Gibt die Adresse des Speicherbereiches im Anwendungsprogramm an wohin die Steuer blockfelder bertragen werden sollen Dieser Bereich mu an einer Wortgrenze beginnen LENGTH wert Gibt die L nge des durch den WAREA Operand bestimmten Bereiches an L MF E addr Gibt die Form des Makroaufrufs an siehe Seite 13 fsehl sselvort 1 a schl sselvort Gibt eines oder mehrere Steuerblockfelde
333. ugt Die Adressierung erfolgt ausschlie lich ber Register um diese M glichkeit zu zeigen Es wird der MF Operand verwendet Damit wird die gleiche Programmauftei lung wie im Bild auf Seite 12 erreicht Es wird damit ferner die Verwendung bei ab laufinvarianter Programmierung gezeigt In diesem Beispiel wird ein ENB und ein ACB dynamisch erzeugt um eine DCAM Anwendung er ffnen zu k nnen siehe Abschnitt Erstmaliges Er ffnen Verwendung von Verteilcodes Seite 58 Anwendungsprogramm Befehle Konstanten und Variable Erzeugung der Steuerbl cke Operandenlisten YGENCB BLK ENB MF LOGON 4 PR 5 K ACB ME PNAME 4 SNAME 5 TTR SHARE DISCO RIFY PRI RY EPASS X F1F2C1 YGENCB YGENCB MF E 3 BLK ENBL Ho Tor 15 FEHLER 6 1 ANAMI ti c o m 4 5 1 3 ACBL L8 ANWEND 1 YGENCB MF E 3 BLK ACB L8 PRIMPROZ co2 l Eintr ge werden vom Makroaufruf ENACO gemacht nur f r DCAM NEA Transport Service Anvendungen Beispiel f r dynamische Steuerblockerzeugung 16 987 2135 8 987 2135 8 Steuerbl cke erzeugen Steuerbl cke durch den Anvvender erzeugen Mit Hilfe der Makros YDDACB YDDCCB YDDENB YDDRPB und zus tzlich f r DCAM NEA Transport Service Anwendungen mit YDDDCG und YDDDIP kann der Anwender Steuerbl cke direkt erzeugen und anpassen statt mit YGENCB YM
334. und berschrieben Das Kommunikationssystem stellt sicher da keine l ngeren Nachrichten eintreffen Dieser Operand wird ausgewertet bei YOPNCON RLTH hat keinen Einflu auf die L nge in Senderichtung von MAXLN abh ngig Weitere Informationen zum RLTH Operand sind im Handbuch DCAM Programmsehnitt stellen DIP relexp nur bei NEA Transport Service Adresse des DIP Steuerblocks Er enth lt Die Lage und L nge des Verteilcodes in der Nachricht die auf der durch diesen CCB Steuerblock beschriebenen Verbindung bermittelt wird Die Adresse des DCG Steuerblocks Dieser Operand wird ausgewertet bei YOPNCON und YCHANOE jedoch nur wenn mit Nachrichtenverteilung anhand von Verteilcodes gearbeitet wird 987 2135 8 177 YCCB 178 Makroaufrufe USER 1 f nur bei NEA Transport Service d l USER Die Nachrichtenaufbereitung bei Ein oder Ausgabe vvird vom Benut zer selbst durchgef hrt Es vverden keine logischen Datenstationen benutzt Falls auch der Operand PROC SYSCODE gesetzt ist wird die Nachricht in EBCDIC bersetzt Hinweis Nicht bei lokal angeschlossenen Datenstationen SYSTEM Das Kommunikationssystem f hrt die Nachrichtenaufbereitung durch Die Nachrichtenaufbereitung erfolgt entweder gem den EDITIN bzw EDITOUT Operanden die im CCB Steuerblock gesetzt worden sind oder nach den im VTSUCB siehe Handbuch VTSU Kapitel VTSU Control Block gegebenen Parame
335. ung der einzelnen Aufrufe wurde in beiden Handb chern nach Funktionen geordnet Die Einteilung der Abschnitte ist weitgehend gleich Der Anwender kann von der Detailbeschreibung der Funktion im Handbuch Programmschnittstellen ausgehen und findet nun hier die praktische Anwendung Im Kapitel Katalog der Makroaufrufe werden alle DCAM Makroaufrufe beschrieben Sie sind alphabetisch geordnet Ferner werden die R ckinformationen gezeigt die nach Ausf hrung eines Aufrufs auszuwerten sind Im Kapitel Beispiele sind einige Beispiele f r DCAM ISO Transport Service Anwendun gen und DCAM NEA Transport Service Anwendungen enthalten Im Kapitel Der DCAM System Exit wird diese benutzerspezifische Exit Routine be schrieben Im Anhang wurden ferner alle wichtigen bersichten und Tabellen zusammengefa t Am Ende dieses Handbuchs befinden sich ein Fachwortverzeichnis ein Literaturverzeich nis und ein Stichwortverzeichnis Thematisch zugeordnet sind diesem Benutzerhandbuch Informationsschriften ber Rech nernetze und Datenfernverarbeitung mit BS2000 F r Generierung und Administration zur Programmierung der Kommunikationsrechner und der Datenstationen und zur Unter st tzung logischer Datenstationen stehen eigene Handb cher zur Verf gung Einleitung 1 2 nderungen gegen ber Vorg ngerausgabe VTSU Schnittstelle Das Kapitel VTSU Schnittstelle wurde aus diesem Handbuch entfernt Eine genaue
336. ung im System des Partners x 30 DCAM Zuviele DCAM Ereignisse die nicht abgeholt x vurden 0 08 Warnung Beendigung des DCM x x x x 0 oc Beendigung des DCM 0 0 DCM ist nicht aktiv 0 4 s u DCM Fehler xixixixix ixixi ixixi ixixi ixixi ix 0 4 00 DCM Fehler 0 4 04 xx BCAM Unbekannter BCINF Returncode 0 4 08 xx BCAM Unbekannter APINF Returncode 0 4 oc xx BCAM Unbekannter STINF Returncode 0 4 10 xx BCAM Unbekannter Returncode 0 20 DCAM vor bergehend gesperrt x BCAM Returncode 987 2135 8 311 Tabelle der R ckmeldungen Anhang R ckmelde Feld Bedeutung Makroaufruf F F F E Y Y Y Y Y Y Y Y Y Y Y Y Y Y D D D D O C O C R S C P F S R S R B B B B P L P L E E H N E O E E E E 1 2 3 4 E O N S G T A Q R R N C N S N S C C L L N U M B D E D E E O O OT O G TI TI I I R T N N G G E R T D V E E E C 4 Unzul ssiger Gebrauch des Makroaufrufs 4 04 Der Makroaufruf kann nicht von einer Sekund r task ausgegeben verden 4 08 Der Makroaufruf ist nicht anwendbar im Zusam menhang mit DCAM Anvendungen die die Eigen schaft ATTR NSHARE oder ATTR SHARE NDISCO haben xix 4 oc Der Makroaufruf ist nicht anwendbar im Zusam menhang mit DCAM Anwendungen die die Eigenschaft ATTR NLO
337. ungen Fachw rter Literatur Stichw rter 291 291 298 317 322 326 360 365 368 380 383 387 389 987 2135 8 DCAM V11 0A BS2000 OSD TRANSDATA Makroaufrufe Zielgruppe Programmierer von DCAM Assembler Programmen Inhalt Besondere Techniken bei der Verwendung der DCAM Makroaufrufe DCAM Makroaufrufe nach Funktionen geordnet Katalog aller DCAM Makroaufrufe Ausgabe April 1994 Datei DCAM_MAK PDF BS2000 ist ein eingetragenes Warenzeichen der Siemens Nixdorf Informationssysteme AG Copyright Siemens Nixdorf Informationssysteme AG 1994 Alle Rechte vorbehalten insbesondere auch auszugsweise die der bersetzung des Nachdrucks Wiedergabe durch Kopieren oder hnliche Verfahren Zuwiderhandlungen verpflichten zu Schadenersatz Alle Rechte vorbehalten insbesondere f r den Fall der Patenterteilung oder GM Eintragung Lieferm glichkeiten und technische nderungen vorbehalten 987 2135 8 403 o FUJITSU Information on this document On April 1 2009 Fujitsu became the sole owner of Fujitsu Siemens Compu ters This new subsidiary of Fujitsu has been renamed Fujitsu Technology So lutions This document from the document archive refers to a product version which was released a considerable time ago or which is no longer marketed Please note that all company references and copyrights in this document have been legally transferred to Fujitsu Technology Solutions Cont
338. ur vorgeschrieben u immer die Anwendung selbst durchf hren ur EBCDI Code m glich Ist immer beliebig Partner Anwendung erh lt immer den Eintrag X 0133 Die Transportverbin dung wird abgebaut Gr nde in LOSCON genannt 987 2135 8 369 IDCAM Benutzerschnittstelle IDCAM Funktion X 25 Funktion Einschrankung gegen ber TRANSDATA 370 Daten bermittlungs funktion Sequenznummer der Nachricht SEQNO im YRPB Nachrichten strukturierung OPTCD ELEMENT SUBGROUP im YRPB Byte der Nachricht REA AAREA im YRPB Expre nachricht OPTCD EXPRESS im YRPB Anhang Wird nicht Nicht m glich bermittelt Wird nicht Nicht m glich bermittelt Transport Quittung Wird nicht Nur die bergabe an PTCD TACK im YRPB bermittelt DPVN wird quittiert Q Bit TQ Bit R ck Die Vervendung der setzpaket D Bit einzelnen Bits vird im M Bit Makro XSTAT Operand 1X25 vereinbart Unterbrechungspaket Nur 1 Byte ist relevant 1 Die Bedeutung der Bits im 1 Nachrichtenbyte ist wie folgt Bit 20 Q Bit Bit 21 TQ Bit Bit 27 und 23 R cksetzpaket Bit 24 D Bit Bit 25 M Bit 987 2135 8 Anhang 987 2135 8 IDCAM Benutzerschnittstelle Q Bit D Bit Das Q ualfier Bit erlaubt die Unterscheidung von zwei Datentypen durch die Datenen deinrichtung Die D Bit Unterst tzung erm glicht eine Ende zu Ende Kontrolle sagt aber nichts ber den Trans
339. ur ck Register 15 siehe Anhang Seite 298 Partnername 8 Byte FDB 1 FDB 2 FDB 3 FDB 4 1 Byte 1 Byte 1 Byte 1 Byte Prozessorname 8 Byte ACB Steuerblock mit g ltigem Kennzeichen AID 1 Adresse des Steuerblocks der den Aufruf beschreibt 114 987 2135 8 Partner und Prozessornamen 987 2135 8 Es soll der Partner und Prozessorname abgefragt vverden Dazu mu angegeben werden die Adresse eines 8 Byte langen Feldes in das der Partnername geschrieben wer den soll 2 die Adresse eines 8 Byte langen Feldes in das der Prozessornamen des Partners eingetragen werden soll 3 da der Partner und Prozessornamen abgefragt werden soll 5 ein Register welches das Kennzeichen der Verbindung CID enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB ein getragen worden sein 4 entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen der Anwendung AID enth lt oder ein Register welches das g ltige Kennzeichen ent h lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein Hinweis Das erste Byte des zur ckgegebenen Partnernamens wird mit Leerzeichen ber schrieben falls das angegebene Kennzeichen CID ung ltig war YINQUIRE 115 YREJLOG Aufforderung zum Verbindungsaufbau zur ckweisen 3 2 3 Aufforderung zu
340. ur ck da die Peripherie abgefragt werden soll entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen AID enth lt oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein entweder die Adresse des Steuerblocks CCB der das g ltige Kennzeichen der Ver bindung enth lt CID oder ein Register welches das g ltige Kennzeichen enth lt Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein 987 2135 8 105 YIN QUIRE 3 2 2 6 Grundinformation ber die Datenstation Grundinformation ber die Datenstation 2 Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen Makroaufrufe Steuerbl cke und Register Besch Speicherbereiche im Anwendungsprogramm AID register FE gt Register n Nummer des Registers AID Kennzeichen der Anwendung 4 CID register px m gt Register m Nummer des Registers CID Kennzeichen der Verbindung 5 RPB addr1 YINQUIRE RPB NEA AAREA relexp 1 AAREALN absexp 2 OPTCD BTERMINF 3 ACB relexp 4 CCB relexp 5 DCAM gibt zur ck Feld f r Grundinformationen siehe Handbuch VTSU Kapitel Statusinformation 20 Byte 1 106 Steuerblock mit g ltigem Kennzeiche
341. urchgef hrt Folgende Informationen werden beim Einsprung in die COMEND Contingency Routine bergeben das Kennzeichen der DCAM Anvvendung AID in Register 3 die Ursache SHUTDOVVN oder erzwungenes Schlie en SHUTDOVVN oder erzwungenes Schlie en Warnung in Register 4 43 EXPR 2 8 5 44 Asynchrone Meldungen EXPR 0 Dieser Abschnitt gilt nur f r DCAM NEA Transport Service Anvvendungen VVenn eine Expressnachricht f r die DCAM Anvvendung angekommen ist kann sie ber diese Meldung sofort dem entsprechenden Programm zugestellt werden In der Regel wird das Programm welches die Prim rtask steuert die Expre nachricht erhalten Dies trifft zu wenn mit Verteilcodes gearbeitet wird ohne Verteilcodes gearbeitet wird und f r diese Verbindung keine Verkn pfung zu einer Sekund rtask besteht CS Zustand Eine Sekund rtask erh lt diese Meldung nur wenn sie auf der betreffenden Verbindung den CS Zustand eingestellt hat Auf einer Verbindung die mit EDIT SYSTEM definiert wurde die also mit logischen Datenstationen arbeitet werden keine Expre nachrichten an den Anwender bergeben und damit auch keine EXPR Meldungen erzeugt Folgende Informationen werden beim Einsprung in die EXPR Contingency Routine ber geben das Kennzeichen der DCAM Anvvendung AID in Register 3 das Kennzeichen der Verbindung auf der die Nachricht ankam CID in Register 4 die Begleitinformatio
342. urden Dazu mu angegeben werden 1 die Adresse des Steuerblocks CCB in dem die aufzubauende Verbindung beschrie ben ist 2 OPTCD ACQUIRE um sich an die vordefinierte Verbindung anschlie en zu k n nen 3 entweder die Adresse des Steuerblocks ACB der das g ltige Kennzeichen der Anwendung AID enth lt oder ein Register welches das g ltige Kennzeichen ent h lt Diese Angabe kann entfallen wenn das Kennzeichen vorher z B mit YMODCB in den RPB eingetragen worden ist Weiterhin kann angegeben werden 5 da die Nachrichtenverteilung ber die absenderspezifische Warteschlange erfolgen soll CS Wird nichts angegeben so wird die empf ngerglobale Warteschlange ein gestellt CA Dies kann bei der Daten bermittlung wieder ge ndert werden 6 da der Befehl asynchron ausgef hrt werden soll ASY Die synchrone Ausf hrung wird eingestellt SYN wenn nichts angegeben wird 7 die Adresse eines Feldes von 4 Byte L nge in dem das Ereigniskennzeichen steht jedoch nur wenn der Befehl asynchron ausgef hrt werden soll Dann jedoch darf die Angabe nicht entfallen siehe auch Seite 30 8 das erste Wort der Ereignisinformation die bergeben werden soll wenn der asynchron ausgef hrte Befehl beendet wird Das 1 Byte wird bei der R ckgabe mit X 0C berschrieben Fehlt diese Angabe wird der Standardwert X 00000000 bergeben 8a das zweite Wort der Ereignisinformation die bergeben werden soll
343. v und AT absolut ist 3 Ein relativer Ausdruck darf nicht in einer Multiplikations oder Divisionsoperation auf tauchen Das Paaren relativer Ausdr cke mit entgegengesetzten Vorzeichen und demselben rela tiven Attribut l scht den Effekt der Relativierung Der von den gepaarten Ausdr cken dargestellte Wert bleibt konstant auch bei Programmverschiebung Zum Beispiel ist A in dem absoluten zusammengesetzten Ausdruck A Y X ein absoluter Ausdruck w hrend X und Y relative Ausdr cke mit demselben relativen Attribut sind Ist A 50 Y 25 und X 10 w rde der Wert des zusammengesetzten Ausdrucks 35 sein Sind X und Y um den Faktor 100 verschoben w ren ihre Werte 125 und 110 Der zusammengesetzte Ausdruck wird jedoch weiterhin gewertet als 35 50 125 110 35 Ein absoluter zusammengesetzter Ausdruck wird auf einen einzelnen absoluten Wert reduziert In den folgenden Beispielen von absoluten zusammengesetzten Ausdr cken sind JOE und SAM relativ und in demselben Programmabschnitt definiert w hrend BERNY und DAVE absolut sind BERNY DAVE 83 JOE SAM DAVE 4 BERNY 324 987 2135 8 Anhang 987 2135 8 Mnemotechnische VVerte der Makroaufrufe Code Ein Code vvird vvie ein Makroaufruf geschrieben vvie z B symbol FTBAL ziel code ziel code gibt die gew nschte Aktion an BB Bodenber hrung FT Fu balltor HZ Halbzeit Der Makroaufruf k nnte in einem Programm so geschrieben werden SAM FTBAL BB FTBAL F
344. vervvendbar Die Operandenliste der zu lesenden Felder kann damit vom Aufruf getrennt im Programm definiert vverden Der Aufruf YSHOVVCB kann auch durch k rzere und schnellere Befehlsfolgen ersetzen werden bei denen die Felder ber die DSECTs YDDxxB adressiert werden Allerdings kann dann in einer neuen Version eine Neu bersetzung n tig werden 27 Steuerblockfelder abfragen und testen 2 6 28 Steuerblockfelder abfragen und testen Um einzelne Steuerblockfelder auf ihren Inhalt pr fen zu k nnen ohne diese Felder in einen eigenen Speicherbereich bertragen zu m ssen gibt es den Aufruf YTESTCB Es k nnen dazu die Schl sselworte und Testwerte verwendet werden die in der Tabelle der Steuerblockfelder im Anhang Seite 291ff aufgef hrt sind Der Aufruf YTESTCB kann nur benutzt werden wenn das DCAM Subsystem erfolgreich geladen wurde Ebenso darf sich das DCAM Subsystem nicht im HOLD DELETE Status befinden Wenn ein Task bereits vor dem HOLD DELETE Status ein DCAM Kommando oder einen DCAM Aufruf erfolgreich abgesetzt hat kann er trotz HOLD Subsystem oder DELETE Sub system bis Taskende mit DCAM arbeiten gilt auch f r Zur Unterst tzung der ablaufinvarianten Programmierung wird der MF Operand siehe Seite 13ff verwendet Die Operandenliste kann somit im Programm getrennt vom Auf ruf zur Ausf hrung definiert werden Im folgenden Bild wird an einem Beispiel die Verwendung gezeigt Es wird in einem Steuerblock das Feld
345. vice EDITIN PHYS Der Anwender erh lt die Nachricht wie sie die Datenstation erzeugt hat Nachrichtenk pfe werden im Ger tecode empfangen Dabei wird vom System eine Reassemblierung geblockter Nachrichten unter st tzt und ggf Kleinbuchstaben bergeben FORM Es wird die Formatsteuerung f r Nachrichten verwendet Fehlt die Angabe wird EDITIN LINE angenommen Verwendung der Zeilen Datenstation die Behandlung ankommender Nachrichten nur bei NEA Transport Service bei LINE FORM Backspace Zeichen sollen nicht ausgewertet sondern dem An wender bergeben werden GETBS bei LINE der logische Funktionstastencode der Datenstation soll als erstes Zeichen ber geben werden GETFC es sollen Kleinbuchstaben bergeben werden LCASE Fehlen die Angaben werden Backspace Zeichen ausgewertet und nicht berge ben NGETBS wird der logische Funktionstastencode nicht bergeben NGETFC werden alle evtl vom Partner gesendeten Kleinbuchstaben umgesetzt in Gro buchstaben NLCASE die Art der logischen Datenstation f r das Senden von Nachrichten nur bei NEA Transport Service EDITOUT PHYS Der Anwender baut die Nachricht incl Kopfl ngenbyte so auf wie sie die Datenstation verstehen kann den Nachrichtenkopf im Ger te code FORM Es wird die Formatsteuerung f r Nachrichten verwendet 77 YOPNCON 78 12 17 Verbindung aufbauen Fehlt die Angabe wird EDITOUT LINE ang
346. welche Angabe ausgewertet wird Zur Beschreibung der einzelnen Felder siehe YRPB Seite 223 und die Tabelle der Steu erblockfelder Anhang Seite 291 R ckmeldung Die R ckmeldung ist der Funktionsbeschreibung siehe auch Seite 116 und der Tabelle der Meldungen Anhang Seite 298 zu entnehmen 220 U987 J Z135 8 Makroaufrufe 4 20 987 2135 8 YRESET Funktion YRESET Noch anstehende YRECEIVE Aufrufe k nnen zur ckgenommen werden Der CS CA Zustand kann bei einer bestimmten Verbindung ge ndert werden Format Name Operanden symbol YRESET RPB addr schl sselwort neuer wert Operanden Adresse des RPB Steuerblocks der den Makroaufruf beschreibt schl sselwort neuer Wert Hiermit k nnen Werte des RPB Steuerblocks wie auch mit dem Makroaufruf YMODCB aktualisiert werden 221 YRESET Makroaufrufe Folgende Angaben sind bei der Bearbeitung des YRESET von Bedeutung schl sselvort neuer Wert ACB 1 addr 1 AID register 2 addr 2 CID register OPTCD b lany B 1 lca 1 Entweder ACB oder AID mu angegeben werden Werden sowohl ACB wie auch AID angegeben und passen ACB und AID nicht zusammen h ngt es vom verwende ten Makro ab welche Angabe ausgewertet wird 2 Entweder CCB oder CID mu angegeben werden Werden sowohl CCB wie auch CID angegeben und passen CCB und CID nicht zusammen h ngt es vom verwende ten Makro ab welche An
347. wenn die Verbindung mit MDATA Y er ffnet wurde da bei der Strukturierung der Nachricht bei DCAM NEA Transport Service An wendungen angegeben werden soll welcher Teil der Nachricht bermittelt werden soll Hier kann ELEMENT oder SUBGROUP angegeben werden Fehlt die Angabe wird GROUP angenommen Die Angabe ist nur m glich wenn im CCB f r EDIT USER oder EDIT SYSTEM mit EDITOUT PHYS festgelegt wurde 987 2135 8 127 YSEND 128 Nachricht senden die Adresse eines Bereichs in dem der VTSUCB bergeben wird nur bei NEA Transport Service st VCBADR NULL wird der VTSUCB in die DCAM interne Datenstruktur kopiert Ist VCBADR NULL wird die DCAM interne Kopie des VTSUCB gel scht Die Nach richtenaufbereitung wird mit den Optionen die im CCB Steuerblock festgelegt wur den fortgesetzt Die Daten werden beim Verbindungsaufbau YOPNCON bzw bei der letzten nderung der Verbindungseigenschaften YCHANGE bernommen Die Angabe wird nur ausgewertet wenn OPTCD VTSUCB gesetzt wurde eine Laufnummer der Nachricht die vom Anwender festgelegt wird nur bei NEA Transport Service Diese Angabe ist erforderlich wenn eine Transportquittung angefordert wird Wird sie weggelassen wird die Nummer 0 eingetragen da eine Transportquittung f r diese hier gesendete Nachricht angefordert wird nur bei NEA Transport Service da nach Ausf hrung dieses Aufrufs die Nachrichten die von diesem Partner kom men in die absenders
348. werden 1 die Adresse des Bereichs der die Daten aufnehmen soll ferner die L nge dieses Bereichs die mindestens 8 Byte umfassen mu 2 entweder die Adresse des Steuerblocks ACB in dem das g ltige Kennzeichen der Anwendung AID steht oder ein Register in dem das g ltige Kennzeichen steht Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein 3 entweder die Adresse des Steuerblocks CCB in dem das g ltige Kennzeichen der Verbindung CID steht oder ein Register in dem das g ltige Kennzeichen steht Fehlt die Angabe mu vorher z B mit YMODCB das g ltige Kennzeichen in den RPB eingetragen worden sein Die Angabe kann weggelassen werden wenn die Nachricht eines beliebigen Partners ANY empfangen werden soll Ferner kann angegeben werden 4 da die Nachricht eines bestimmten Partners SPEC empfangen werden soll Die Angabe kann nicht gemacht werden wenn die absenderspezifische Warte schlange eingestellt war CS und bereits ein YRECEIVE oder YSENDREC mit SPEC und Umschaltung auf die empf ngerglobale Warteschlange CA gegeben wurde der noch nicht beendet ist Die Angabe darf nicht gemacht werden wenn die empf ngerglobale Warte schlange eingestellt ist Fehlt diese Angabe wird die Nachricht eines beliebigen Partners empfangen ANY U987 J Z135 8 131 YRECEIVE 132 Nachricht oder Transportquittung empfangen da nach Ausf hrung dieses Aufrufs

Download Pdf Manuals

Related Search

Related Contents

Asrock N68C-GS FX  mode d`emploi CDFC 2011  Betriebsanleitung Plattformwaage  Industrial Electrical Engineering and Automation - IEA  Bernadette - Hospitalité Notre  MANUAL DE INSTALACIÓN Puertas de paso  

Copyright © All rights reserved. Failed to retrieve file