HP 3000 Manuals HP 3000 Manuals
Summary of Intrinsic Calls This section lists the calls to the SNA IMF intrinsics used with standard MPE I/O. It does not include ABORT3270, IODONTWAIT, IODONTWAIT3270, IOWAIT, and IOWAIT3270, which are intrinsics used only with no-wait I/O. Intrinsic calls are listed for each supported language: COBOL, FORTRAN, BASIC, SPL, Pascal, and C/XL.
NOTE On MPE XL, your application programs that call SNA IMF intrinsics may be in either native mode or compatibility mode. However, if your applications are written in BASIC or COBOL, the SNA IMF intrinsic calls in native mode are different from those in compatibility mode. See chapter 2 for more information on native mode and compatibility mode.
SNA IMF standard I/O intrinsics are patterned after and consistent with MPE V and MPE XL intrinsics. The following facts apply to MPE and SNA IMF standard I/O intrinsics: * You can call intrinsics from COBOL, COBOL II, BASIC, FORTRAN, SPL, Pascal, and C/XL programs. * All intrinsic parameters are passed by reference. * The parameter lists are fixed; all parameters are required. * Intrinsics do not return condition codes. * The intrinsic calling sequences are essentially the same for all languages. The next few sections in this chapter list the SNA IMF intrinsic calls for COBOL, BASIC, FORTRAN, SPL, Pascal, and C/XL. Intrinsic Calls in COBOL This section lists the SNA IMF intrinsic calls for COBOL and COBOL II. Use COMPUTATIONAL and SYNCHRONIZED in COBOL picture clausesto guarantee the alignment of parameters on word boundaries. Use LEVELS 01 and 77 to describe parameters passed in COBOL calls to guarantee the alignment of parameters on word boundaries. The syntax of numeric, alphanumeric, and numeric table data items in COBOLis listed in table 3-5. Table 3-5. COBOL Data Types ------------------------------------------------------------------------------------------- | | | Data Type Syntax | | | | Numeric (1 Word) PICTURE S9(4) COMPUTATIONAL SYNCHRONIZED | | | | Alphanumeric PICTURE X(n) | | | | Numeric Table PICTURE S9(4) COMPUTATIONAL SYNCHRONIZED OCCURS | | | ------------------------------------------------------------------------------------------- Table 3-6 lists the COBOL and COBOL II intrinsic calls used on MPE V and in compatibility mode on MPE XL. The MSGBUF, SNALNKINFO, INBUF, LOCATION, OUTBUF, VERSION, and PFN parameters are alphanumeric (character) data items. The TIMEOUT and OFFSETLIST parameters are computational synchronized numeric tables. All other parameters are computational synchronized numerics. Table 3-6. COBOL Intrinsic Calls, MPE V and CM ------------------------------------------------------------------------------------------- | | | Intrinsic COBOL calling sequence | | | | ACQUIRE3270 (for CALL "CACQUIRE3270" USING SNALNKINFO DEVICENUM LDEV ENHANCE PRIORITY | | SNA IMF/V) BLANKS FORMAT FLAGS RESULT. | | | | ACQUIRE3270 (for CALL "CACQUIRE3270" USING SNALNKINFO DEVICENUM LDEV ENHANCE PRIORITY | | SNA IMF/XL in BLANKS FORMAT FLAGS OPTIONS PFN RESULT. | | compatibility | | mode) | | | | ATTRLIST CALL "CATTRLIST" USING TERMINALID OFFSET SUBSCREENSIZE MAXLISTLEN | | FIELDNUM OFFSETLIST ACTLISTLEN RESULT. | | | | CLOSE3270 CALL "CCLOSE3270" USING TERMINALID RESULT. | | | | ERR3270 CALL "CERR3270" USING ERRORCODE MSGBUF MSGLEN RESULT. | | | | EXTFIELDATTR CALL "CEXTFIELDATTR" USING TERMINALID FIELDNUM FIELDROW FIELDCOLUMN | | PROTECTEDATTR NUMERICATTR DISPLAYATTR MDT DBCSATTR CURRENTFIELDLEN | | MAXFIELDLEN RESULT. | | | | FIELDATTR CALL "CFIELDATTR" USING TERMINALID FIELDNUM FIELDROW FIELDCOLUMN | | PROTECTEDATTR NUMERICATTR DISPLAYATTR MDT CURRENTFIELDLEN MAXFIELDLEN | | RESULT. | | | | OPEN3270 CALL "COPEN3270" USING DEVICENUM SNALNKINFO FLAGS TERMINALID DEVTYPE | | FFINDEX SCREENSIZE TIMEOUT RESULT. | | | | PRINT3270 CALL "CPRINT3270" USING TERMINALID FILEID ACTION LOCATION PRIORITY | | RESULT. | | | | READFIELD CALL "CREADFIELD" USING TERMINALID FIELDNUM OFFSET MAXINBUFLEN INBUF | | ACTINBUFLEN RESULT. | | | ------------------------------------------------------------------------------------------- Table 3-6. COBOL Intrinsic Calls, MPE V and CM (cont.) ------------------------------------------------------------------------------------------- | | | Intrinsic COBOL calling sequence | | | | READSCREEN CALL "CREADSCREEN" USING TERMINALID OFFSET MAXINBUFLEN INBUF | | ACTINBUFLEN RESULT. | | | | READSTREAM CALL "CREADSTREAM" USING TERMINALID OFFSET MAXINBUFLEN INBUF | | ACTINBUFLEN RESULT. | | | | RECV3270 CALL "CRECV3270" USING TERMINALID RESULT. | | | | RESET3270 CALL "CRESET3270" USING TERMINALID RESULT. | | | | SCREENATTR CALL "CSCREENATTR" USING TERMINALID PRINTFORMAT STARTPRINT SOUNDALARM | | KEYBOARDLOCK NUMFIELDS SCREENSTATUS CURSORROW CURSORCOLUMN RESULT. | | | | STREAM3270 CALL "CSTREAM3270" USING TERMINALID CURSORROW CURSORCOLUMN OUTBUF | | OUTBUFLEN NUMPROCESSED RESULT. | | | | TRAN3270 CALL "CTRAN3270" USING TERMINALID AID CURSORROW CURSORCOLUMN RESULT. | | | | VERS3270 CALL "CVERS3270" USING VERSION. | | | | WRITEFIELD CALL "CWRITEFIELD" USING TERMINALID FIELDNUM OFFSET OUTBUF OUTBUFLEN | | RESULT. | | | | WRITESTREAM CALL "CWRITESTREAM" USING TERMINALID OFFSET OUTBUFLEN OUTBUF RESULT. | | | ------------------------------------------------------------------------------------------- Table 3-7 lists the COBOL and COBOL II intrinsic calls used on MPE XL in native mode. The MSGBUF, SNALNKINFO, INBUF, LOCATION, OUTBUF, VERSION, and PFN parameters are alphanumeric (character) data items. The TIMEOUT and OFFSETLIST parameters are computational synchronized numeric tables. All other parameters are computational synchronized numerics. Table 3-7. COBOL Intrinsic Calls, MPE XL Native Mode ------------------------------------------------------------------------------------------- | | | Intrinsic COBOL calling sequence | | | | ACQUIRE3270 CALL INTRINSIC "ACQUIRE3270" USING SNALNKINFO DEVICENUM LDEV ENHANCE | | PRIORITY BLANKS FORMAT FLAGS OPTIONS PFN RESULT. | | | | ATTRLIST CALL INTRINSIC "ATTRLIST" USING TERMINALID OFFSET SUBSCREENSIZE | | MAXLISTLEN FIELDNUM OFFSETLIST ACTLISTLEN RESULT. | | | | CLOSE3270 CALL INTRINSIC "CLOSE3270" USING TERMINALID RESULT. | | | | ERR3270 CALL INTRINSIC "ERR3270" USING ERRORCODE MSGBUF MSGLEN RESULT. | | | | EXTFIELDATTR CALL INTRINSIC "EXTFIELDATTR" USING TERMINALID FIELDNUM FIELDROW | | FIELDCOLUMN PROTECTEDATTR NUMERICATTR DISPLAYATTR MDT DBCSATTR | | CURRENTFIELDLEN MAXFIELDLEN RESULT. | | | | FIELDATTR CALL INTRINSIC "FIELDATTR" USING TERMINALID FIELDNUM FIELDROW | | FIELDCOLUMN PROTECTEDATTR NUMERICATTR DISPLAYATTR MDT CURRENTFIELDLEN | | MAXFIELDLEN RESULT. | | | | OPEN3270 CALL INTRINSIC "OPEN3270" USING DEVICENUM SNALNKINFO FLAGS TERMINALID | | DEVTYPE FFINDEX SCREENSIZE TIMEOUT RESULT. | | | | PRINT3270 CALL INTRINSIC "PRINT3270" USING TERMINALID FILEID ACTION LOCATION | | PRIORITY RESULT. | | | | READFIELD CALL INTRINSIC "READFIELD" USING TERMINALID FIELDNUM OFFSET | | MAXINBUFLEN INBUF ACTINBUFLEN RESULT. | | | ------------------------------------------------------------------------------------------- Table 3-7. COBOL Intrinsic Calls, MPE XL Native Mode (cont.) ------------------------------------------------------------------------------------------- | | | Intrinsic COBOL calling sequence | | | | READSCREEN CALL INTRINSIC "READSCREEN" USING TERMINALID OFFSET MAXINBUFLEN INBUF | | ACTINBUFLEN RESULT. | | | | READSTREAM CALL INTRINSIC "READSTREAM" USING TERMINALID OFFSET MAXINBUFLEN INBUF | | ACTINBUFLEN RESULT. | | | | RECV3270 CALL INTRINSIC "RECV3270" USING TERMINALID RESULT. | | | | RESET3270 CALL INTRINSIC "RESET3270" USING TERMINALID RESULT. | | | | SCREENATTR CALL INTRINSIC "SCREENATTR" USING TERMINALID PRINTFORMAT STARTPRINT | | SOUNDALARM KEYBOARDLOCK NUMFIELDS SCREENSTATUS CURSORROW CURSORCOLUMN | | RESULT. | | | | STREAM3270 CALL INTRINSIC "STREAM3270" USING TERMINALID CURSORROW CURSORCOLUMN | | OUTBUF OUTBUFLEN NUMPROCESSED RESULT. | | | | TRAN3270 CALL INTRINSIC "TRAN3270" USING TERMINALID AID CURSORROW CURSORCOLUMN | | RESULT. | | | | VERS3270 CALL INTRINSIC "VERS3270" USING VERSION. | | | | WRITEFIELD CALL INTRINSIC "WRITEFIELD" USING TERMINALID FIELDNUM OFFSET OUTBUF | | OUTBUFLEN RESULT. | | | | WRITESTREAM CALL INTRINSIC "WRITESTREAM" USING TERMINALID OFFSET OUTBUFLEN OUTBUF | | RESULT. | | | ------------------------------------------------------------------------------------------- Intrinsic Calls in FORTRAN Table 3-8 lists the SNA IMF intrinsic calls for FORTRAN. The MSGBUF, SNALNKINFO, INBUF, LOCATION, OUTBUF, VERSION, and PFN parameters are character arrays. The TIMEOUT and OFFSETLIST parameters are integer arrays. All other parameters are one-word integer variables. Table 3-8. Fortran Intrinsic Calls ------------------------------------------------------------------------------------------- | | | Intrinsic FORTRAN calling sequence | | | | ACQUIRE3270 (for CALL ACQUIRE3270 (SNALNKINFO, DEVICENUM, LDEV, ENHANCE, PRIORITY, | | SNA IMF/V) BLANKS, FORMAT, FLAGS, RESULT) | | | | ACQUIRE3270 (for CALL ACQUIRE3270 (SNALNKINFO, DEVICENUM, LDEV, ENHANCE, PRIORITY, | | SNA IMF/XL) BLANKS, FORMAT, FLAGS, OPTIONS, PFN, RESULT) | | | | ATTRLIST CALL ATTRLIST (TERMINALID, OFFSET, SUBSCREENSIZE, MAXLISTLEN, | | FIELDNUM, OFFSETLIST, ACTLISTLEN, RESULT) | | | | CLOSE3270 CALL CLOSE3270 (TERMINALID, RESULT) | | | | ERR3270 CALL ERR3270 (ERRORCODE, MSGBUF, MSGLEN, RESULT) | | | | EXTFIELDATTR CALL EXTFIELDATTR (TERMINALID, FIELDNUM, FIELDROW, FIELDCOLUMN, | | PROTECTEDATTR, NUMERICATTR, DISPLAYATTR, MDT, DBCSATTR, | | CURRENTFIELDLEN, MAXFIELDLEN, RESULT) | | | | FIELDATTR CALL FIELDATTR (TERMINALID, FIELDNUM, FIELDROW, FIELDCOLUMN, | | PROTECTEDATTR, NUMERICATTR, DISPLAYATTR, MDT, CURRENTFIELDLEN, | | MAXFIELDLEN, RESULT) | | | | OPEN3270 CALL OPEN3270 (DEVICENUM, SNALNKINFO, FLAGS, TERMINALID, DEVTYPE, | | FFINDEX, SCREENSIZE, TIMEOUT, RESULT) | | | | PRINT3270 CALL PRINT3270 (TERMINALID, FILEID, ACTION, LOCATION, PRIORITY, | | RESULT) | | | | READFIELD CALL READFIELD (TERMINALID, FIELDNUM, OFFSET, MAXINBUFLEN, INBUF, | | ACTINBUFLEN, RESULT) | | | | READSCREEN CALL READSCREEN (TERMINALID, OFFSET, MAXINBUFLEN, INBUF, ACTINBUFLEN, | | RESULT) | | | ------------------------------------------------------------------------------------------- Table 3-8. Fortran Intrinsic Calls (cont.) ------------------------------------------------------------------------------------------- | | | Intrinsic FORTRAN calling sequence | | | | READSTREAM CALL READSTREAM (TERMINALID, OFFSET, MAXINBUFLEN, INBUF, ACTINBUFLEN, | | RESULT) | | | | RECV3270 CALL RECV3270 (TERMINALID, RESULT) | | | | RESET3270 CALL RESET3270 (TERMINALID, RESULT) | | | | SCREENATTR CALL SCREENATTR (TERMINALID, PRINTFORMAT, STARTPRINT, SOUNDALARM, | | KEYBOARDLOCK, NUMFIELDS, SCREENSTATUS, CURSORROW, CURSORCOLUMN, | | RESULT) | | | | STREAM3270 CALL STREAM3270 (TERMINALID, CURSORROW, CURSORCOLUMN, OUTBUF, | | OUTBUFLEN, NUMPROCESSED, RESULT) | | | | TRAN3270 CALL TRAN3270 (TERMINALID, AID, CURSORROW, CURSORCOLUMN, RESULT) | | | | VERS3270 CALL VERS3270 (VERSION) | | | | WRITEFIELD CALL WRITEFIELD (TERMINALID, FIELDNUM, OFFSET, OUTBUF, OUTBUFLEN, | | RESULT) | | | | WRITESTREAM CALL WRITESTREAM (TERMINALID, OFFSET, OUTBUFLEN, OUTBUF, RESULT) | | | ------------------------------------------------------------------------------------------- Intrinsic Calls in BASIC Table 3-9 lists the BASIC intrinsic calls used on MPE V and in compatibility mode on MPE XL. The M$ (MSGBUF), C$ (SNALNKINFO), I$ (INBUF), L$ (LOCATION), O$ (OUTBUF), V$ (VERSION), and P$ (PFN) parameters are character arrays. The T2(*) (TIMEOUT) and O2(*) (OFFSETLIST) parameters are integer arrays. All other parameters are one-word integer variables. Table 3-9. BASIC Intrinsic Calls, MPE V and CM ------------------------------------------------------------------------------------------- | | | Intrinsic BASIC calling sequence | | | | ACQUIRE3270 (for CALL BACQUIRE3270 (C$, D1, L0, E1, P2, B1, F3, F, R) | | SNA IMF/V) | | | | ACQUIRE3270 (for CALL BACQUIRE3270 (C$, D1, L0, E1, P2, B1, F3, F, O4, P$, R) | | SNA IMF/XL in | | compatibility | | mode) | | | | ATTRLIST CALL BATTRLIST (T, O1, L1, L2, N, O2(*), L3, R) | | | | CLOSE3270 CALL BCLOSE3270 (T, R) | | | | ERR3270 CALL BERR3270 (E, M$, L4, R) | | | | EXTFIELDATTR CALL BEXTFIELDATTR (T, N, R0, C0, A1, A2, A3, A4, A5, L5, L6, R) | | | | FIELDATTR CALL BFIELDATTR (T, N, R0, C0, A1, A2, A3, A4, L5, L6, R) | | | | OPEN3270 CALL BOPEN3270 (D1, C$, F, T, D2, F1, S, T2(*), R) | | | | PRINT3270 CALL BPRINT3270 (T, F2, O3, L$, P2, R) | | | | READFIELD CALL BREADFIELD (T, N, O1, L7, I$, L8, R) | | | | READSCREEN CALL BREADSCREEN (T, O1, L7, I$, L8, R) | | | | READSTREAM CALL BREADSTREAM (T, O1, L7, I$, L8, R) | | | | RECV3270 CALL BRECV3270 (T, R) | | | | RESET3270 CALL BRESET3270 (T, R) | | | ------------------------------------------------------------------------------------------- Table 3-9. BASIC Intrinsic Calls, MPE V and CM (cont.) ------------------------------------------------------------------------------------------- | | | Intrinsic BASIC calling sequence | | | | SCREENATTR CALL BSCREENATTR (T, P, P1, A, K, N9, S9, R9, C9, R) | | | | STREAM3270 CALL BSTREAM3270 (T, R9, C9, O$, L9, N5, R) | | | | TRAN3270 CALL BTRAN3270 (T, A9, R9, C9, R) | | | | VERS3270 CALL BVERS3270 (V$) | | | | WRITEFIELD CALL BWRITEFIELD (T, N, O1, O$, L9, R) | | | | WRITESTREAM CALL BWRITESTREAM (T, O1, L9, O$, R) | | | ------------------------------------------------------------------------------------------- Table 3-10 lists the BASIC intrinsic calls used on MPE XL in native mode. The M$ (MSGBUF), C$ (SNALNKINFO), I$ (INBUF), L$ (LOCATION), O$ (OUTBUF), V$ (VERSION), and P$ (PFN) parameters are character arrays. The T2(*) (TIMEOUT) and O2(*) (OFFSETLIST) parameters are integer arrays. All other parameters are one-word integer variables. Table 3-10. BASIC Intrinsic Calls, MPE XL Native Mode ------------------------------------------------------------------------------------------- | | | Intrinsic BASIC calling sequence | | | | ACQUIRE3270 CALL ACQUIRE3270 (C$, D1, L0, E1, P2, B1, F3, F, O4, P$, R) | | | | ATTRLIST CALL ATTRLIST (T, O1, L1, L2, N, O2(*), L3, R) | | | | CLOSE3270 CALL CLOSE3270 (T, R) | | | | ERR3270 CALL ERR3270 (E, M$, L4, R) | | | | EXTFIELDATTR CALL EXTFIELDATTR (T, N, R0, C0, A1, A2, A3, A4, A5, L5, L6, R) | | | | FIELDATTR CALL FIELDATTR (T, N, R0, C0, A1, A2, A3, A4, L5, L6, R) | | | | OPEN3270 CALL OPEN3270 (D1, C$, F, T, D2, F1, S, T2(*), R) | | | | PRINT3270 CALL PRINT3270 (T, F2, O3, L$, P2, R) | | | | READFIELD CALL READFIELD (T, N, O1, L7, I$, L8, R) | | | | READSCREEN CALL READSCREEN (T, O1, L7, I$, L8, R) | | | | READSTREAM CALL READSTREAM (T, O1, L7, I$, L8, R) | | | | RECV3270 CALL RECV3270 (T, R) | | | | RESET3270 CALL RESET3270 (T, R) | | | | SCREENATTR CALL SCREENATTR (T, P, P1, A, K, N9, S9, R9, C9, R) | | | ------------------------------------------------------------------------------------------- Table 3-10. BASIC Intrinsic Calls, MPE XL Native Mode (cont.) ------------------------------------------------------------------------------------------- | | | Intrinsic BASIC calling sequence | | | | STREAM3270 CALL STREAM3270 (T, R9, C9, O$, L9, N5, R) | | | | TRAN3270 CALL TRAN3270 (T, A9, R9, C9, R) | | | | VERS3270 CALL VERS3270 (V$) | | | | WRITEFIELD CALL WRITEFIELD (T, N, O1, O$, L9, R) | | | | WRITESTREAM CALL WRITESTREAM (T, O1, L9, O$, R) | | | ------------------------------------------------------------------------------------------- Table 3-11 lists the variables used in BASIC intrinsic calls and the parameters that correspond to the variables. Table 3-11. BASIC Variables ------------------------------------------------------------------------------------------- | | | Variable Parameter Variable Parameter | | | | A SOUNDALARM L5 CURRENTFIELD | | | | A1 PROTECTEDATTR L6 MAXFIELDLEN | | | | A2 NUMERICATTR L7 MAXINBUFLEN | | | | A3 DISPLAYATTR L8 ACTINBUFLEN | | | | A4 MDT L9 OUTBUFLEN | | | | A5 DBCSATTR L$ LOCATION | | | | A9 AID M$ MSGBUF | | | | B1 BLANKS N FIELDNUM | | | | C0 FIELDCOLUMN N5 NUMPROCESSED | | | | C9 CURSORCOLUMN N9 NUMFIELDS | | | | C$ SNALINKINFO O1 OFFSET | | | | D1 DEVICENUM O2(*) OFFSETLIST | | | | D2 DEVTYPE | | | ------------------------------------------------------------------------------------------- Table 3-11. BASIC Variables (cont.) ------------------------------------------------------------------------------------------- | | | Variable Parameter Variable Parameter | | | | E ERRORCODE 04 OPTIONS | | | | E1 ENHANCE 0$ OUTBUF | | | | F FLAGS P PRINTFORMAT | | | | F1 FFINDEX P1 STARTPRINT | | | | F2 FILEID P2 PRIORITY | | | | F3 FORMAT P$ PFN | | | | I$ INBUF R RESULT | | | | K KEYBOARDLOCK R0 FIELDROW | | | | L0 LDEV R9 CURSORROW | | | | L1 SUBSCREENSIZE S SCREENSIZE | | | | L2 MAXLISTLEN S9 SCREENSTATUS | | | | L3 ACTLISTLEN T TERMINALID | | | | L4 MSGLEN T2(*) TIMEOUT | | | | 03 ACTION V$ VERSION | | | ------------------------------------------------------------------------------------------- Intrinsic Calls in SPL Table 3-12 lists the SNA IMF intrinsic calls for SPL. The MSGBUF, SNALNKINFO, INBUF, LOCATION, OUTBUF, VERSION, and PFN parameters are byte arrays. The TIMEOUT and OFFSETLIST parameters are integer arrays. All other parameters are one-word integer variables. Table 3-12. SPL Intrinsic Calls ------------------------------------------------------------------------------------------- | | | Intrinsic SPL calling sequence | | | | ACQUIRE3270 (for ACQUIRE3270 (SNALNKINFO, DEVICENUM, LDEV, ENHANCE, PRIORITY, BLANKS, | | SNA IMF/V) FORMAT, FLAGS, RESULT) | | | | ACQUIRE3270 (for ACQUIRE3270 (SNALNKINFO, DEVICENUM, LDEV, ENHANCE, PRIORITY, BLANKS, | | SNA IMF/XL) FORMAT, FLAGS, OPTIONS, PFN, RESULT) | | | | ATTRLIST ATTRLIST (TERMINALID, OFFSET, SUBSCREENSIZE, MAXLISTLEN, FIELDNUM, | | OFFSETLIST, ACTLISTLEN, RESULT) | | | | CLOSE3270 CLOSE3270 (TERMINALID, RESULT) | | | | ERR3270 ERR3270 (ERRORCODE, MSGBUF, MSGLEN, RESULT) | | | | EXTFIELDATTR EXTFIELDATTR (TERMINALID, FIELDNUM, FIELDROW, FIELDCOLUMN, | | PROTECTEDATTR, NUMERICATTR, DISPLAYATTR, MDT, DBCSATTR, | | CURRENTFIELDLEN, MAXFIELDLEN, RESULT) | | | | FIELDATTR FIELDATTR (TERMINALID, FIELDNUM, FIELDROW, FIELDCOLUMN, | | PROTECTEDATTR, NUMERICATTR, DISPLAYATTR, MDT, CURRENTFIELDLEN, | | MAXFIELDLEN, RESULT) | | | | OPEN3270 OPEN3270 (DEVICENUM, SNALNKINFO, FLAGS, TERMINALID, DEVTYPE, FFINDEX, | | SCREENSIZE, TIMEOUT, RESULT) | | | | PRINT3270 PRINT3270 (TERMINALID, FILEID, ACTION, LOCATION, PRIORITY, RESULT) | | | | READFIELD READFIELD (TERMINALID, FIELDNUM, OFFSET, MAXINBUFLEN, INBUF, | | ACTINBUFLEN, RESULT) | | | | READSCREEN READSCREEN (TERMINALID, OFFSET, MAXINBUFLEN, INBUF, ACTINBUFLEN, | | RESULT) | | | ------------------------------------------------------------------------------------------- Table 3-12. SPL Intrinsic Calls (cont.) ------------------------------------------------------------------------------------------- | | | Intrinsic SPL calling sequence | | | | READSTREAM READSTREAM (TERMINALID, OFFSET, MAXINBUFLEN, INBUF, ACTINBUFLEN, | | RESULT) | | | | RECV3270 RECV3270 (TERMINALID, RESULT) | | | | RESET3270 RESET3270 (TERMINALID, RESULT) | | | | SCREENATTR SCREENATTR (TERMINALID, PRINTFORMAT, STARTPRINT, SOUNDALARM, | | KEYBOARDLOCK, NUMFIELDS, SCREENSTATUS, CURSORROW, CURSORCOLUMN, | | RESULT) | | | | STREAM3270 STREAM3270 (TERMINALID, CURSORROW, CURSORCOLUMN, OUTBUF, OUTBUFLEN, | | NUMPROCESSED, RESULT) | | | | TRAN3270 TRAN3270 (TERMINALID, AID, CURSORROW, CURSORCOLUMN, RESULT) | | | | VERS3270 VERS3270 (VERSION) | | | | WRITEFIELD WRITEFIELD (TERMINALID, FIELDNUM, OFFSET, OUTBUF, OUTBUFLEN, RESULT) | | | | WRITESTREAM WRITESTREAM (TERMINALID, OFFSET, OUTBUFLEN, OUTBUF, RESULT) | | | ------------------------------------------------------------------------------------------- Intrinsic Calls in Pascal Table 3-13 lists the SNA IMF intrinsic calls for Pascal. The MSGBUF, SNALNKINFO, INBUF, LOCATION, OUTBUF, VERSION, and PFN parameters are character arrays. The TIMEOUT and OFFSETLIST parameters are integer arrays. All other parameters are one-word integer variables. Table 3-13. Pascal Intrinsic Calls ------------------------------------------------------------------------------------------- | | | Intrinsic Pascal calling sequence | | | | ACQUIRE3270 (for ACQUIRE3270 (SNALNKINFO, DEVICENUM, LDEV, ENHANCE, PRIORITY, BLANKS, | | SNA IMF/V) FORMAT, FLAGS, RESULT); | | | | ACQUIRE3270 (for ACQUIRE3270 (SNALNKINFO, DEVICENUM, LDEV, ENHANCE, PRIORITY, BLANKS, | | SNA IMF/XL) FORMAT, FLAGS, OPTIONS, PFN, RESULT); | | | | ATTRLIST ATTRLIST (TERMINALID, OFFSET, SUBSCREENSIZE, MAXLISTLEN, FIELDNUM, | | OFFSETLIST, ACTLISTLEN, RESULT); | | | | CLOSE3270 CLOSE3270 (TERMINALID, RESULT); | | | | ERR3270 ERR3270 (ERRORCODE, MSGBUF, MSGLEN, RESULT); | | | | EXTFIELDATTR EXTFIELDATTR (TERMINALID, FIELDNUM, FIELDROW, FIELDCOLUMN, | | PROTECTEDATTR, NUMERICATTR, DISPLAYATTR, MDT, DBCSATTR, | | CURRENTFIELDLEN, MAXFIELDLEN, RESULT); | | | | FIELDATTR FIELDATTR (TERMINALID, FIELDNUM, FIELDROW, FIELDCOLUMN, | | PROTECTEDATTR, NUMERICATTR, DISPLAYATTR, MDT, CURRENTFIELDLEN, | | MAXFIELDLEN, RESULT); | | | | OPEN3270 OPEN3270 (DEVICENUM, SNALNKINFO, FLAGS, TERMINALID, DEVTYPE, FFINDEX, | | SCREENSIZE, TIMEOUT, RESULT); | | | | PRINT3270 PRINT3270 (TERMINALID, FILEID, ACTION, LOCATION, PRIORITY, RESULT); | | | | READFIELD READFIELD (TERMINALID, FIELDNUM, OFFSET, MAXINBUFLEN, INBUF, | | ACTINBUFLEN, RESULT); | | | | READSCREEN READSCREEN (TERMINALID, OFFSET, MAXINBUFLEN, INBUF, ACTINBUFLEN, | | RESULT); | | | ------------------------------------------------------------------------------------------- Table 3-13. Pascal Intrinsic Calls (cont.) ------------------------------------------------------------------------------------------- | | | Intrinsic Pascal calling sequence | | | | READSTREAM READSTREAM (TERMINALID, OFFSET, MAXINBUFLEN, INBUF, ACTINBUFLEN, | | RESULT); | | | | RECV3270 RECV3270 (TERMINALID, RESULT); | | | | RESET3270 RESET3270 (TERMINALID, RESULT); | | | | SCREENATTR SCREENATTR (TERMINALID, PRINTFORMAT, STARTPRINT, SOUNDALARM, | | KEYBOARDLOCK, NUMFIELDS, SCREENSTATUS, CURSORROW, CURSORCOLUMN, | | RESULT); | | | | STREAM3270 STREAM3270 (TERMINALID, CURSORROW, CURSORCOLUMN, OUTBUF, OUTBUFLEN, | | NUMPROCESSED, RESULT); | | | | TRAN3270 TRAN3270 (TERMINALID, AID, CURSORROW, CURSORCOLUMN, RESULT); | | | | VERS3270 VERS3270 (VERSION); | | | | WRITEFIELD WRITEFIELD (TERMINALID, FIELDNUM, OFFSET, OUTBUF, OUTBUFLEN, RESULT); | | | | WRITESTREAM WRITESTREAM (TERMINALID, OFFSET, OUTBUFLEN, OUTBUF, RESULT); | | | ------------------------------------------------------------------------------------------- Intrinsic Calls in C/XL Table 3-14 lists the SNA IMF intrinsic calls for C/XL. The MSGBUF, SNALNKINFO, INBUF, LOCATION, OUTBUF, VERSION, and PFN parameters are character arrays (pointers to char). The TIMEOUT and OFFSETLIST parameters are arrays of (pointers to) short integers. All other parameters are one-word integer variables (type short). Table 3-14. C/XL Intrinsic Calls ------------------------------------------------------------------------------------------- | | | Intrinsic C/XL calling sequence | | | | ACQUIRE3270 ACQUIRE3270 (SNALNKINFO, &DEVICENUM, &LDEV, &ENHANCE, &PRIORITY, | | &BLANKS, &FORMAT, &FLAGS, &OPTIONS, PFN, &RESULT); | | | | ATTRLIST ATTRLIST (&TERMINALID, &OFFSET, &SUBSCREENSIZE, &MAXLISTLEN, | | &FIELDNUM, OFFSETLIST, &ACTLISTLEN, &RESULT); | | | | CLOSE3270 CLOSE3270 (&TERMINALID, &RESULT); | | | | ERR3270 ERR3270 (&ERRORCODE, MSGBUF, &MSGLEN, &RESULT); | | | | EXTFIELDATTR EXTFIELDATTR (&TERMINALID, &FIELDNUM, &FIELDROW, &FIELDCOLUMN, | | &PROTECTEDATTR, &NUMERICATTR, &DISPLAYATTR, &MDT, &DBCSATTR, | | &CURRENTFIELDLEN, &MAXFIELDLEN, &RESULT); | | | | FIELDATTR FIELDATTR (&TERMINALID, &FIELDNUM, &FIELDROW, &FIELDCOLUMN, | | &PROTECTEDATTR, &NUMERICATTR, &DISPLAYATTR, &MDT, &CURRENTFIELDLEN, | | &MAXFIELDLEN, &RESULT); | | | | OPEN3270 OPEN3270 (&DEVICENUM, SNALNKINFO, &FLAGS, &TERMINALID, &DEVTYPE, | | &FFINDEX, &SCREENSIZE, TIMEOUT, &RESULT); | | | | PRINT3270 PRINT3270 (&TERMINALID, &FILEID, &ACTION, LOCATION, &PRIORITY, | | &RESULT); | | | | READFIELD READFIELD (&TERMINALID, &FIELDNUM, &OFFSET, &MAXINBUFLEN, INBUF, | | &ACTINBUFLEN, &RESULT); | | | | READSCREEN READSCREEN (&TERMINALID, &OFFSET, &MAXINBUFLEN, INBUF, &ACTINBUFLEN, | | &RESULT); | | | ------------------------------------------------------------------------------------------- Table 3-14. C/XL Intrinsic Calls (cont.) ------------------------------------------------------------------------------------------- | | | Intrinsic C/XL calling sequence | | | | READSTREAM READSTREAM (&TERMINALID, &OFFSET, &MAXINBUFLEN, INBUF, &ACTINBUFLEN, | | &RESULT); | | | | RECV3270 RECV3270 (&TERMINALID, &RESULT); | | | | RESET3270 RESET3270 (&TERMINALID, &RESULT); | | | | SCREENATTR SCREENATTR (&TERMINALID, &PRINTFORMAT, &STARTPRINT, &SOUNDALARM, | | &KEYBOARDLOCK, &NUMFIELDS, &SCREENSTATUS, &CURSORROW, &CURSORCOLUMN, | | &RESULT); | | | | STREAM3270 STREAM3270 (&TERMINALID, &CURSORROW, &CURSORCOLUMN, OUTBUF, | | &OUTBUFLEN, &NUMPROCESSED, &RESULT); | | | | TRAN3270 TRAN3270 (&TERMINALID, &AID, &CURSORROW, &CURSORCOLUMN, &RESULT); | | | | VERS3270 VERS3270 (VERSION); | | | | WRITEFIELD WRITEFIELD (&TERMINALID, &FIELDNUM, &OFFSET, OUTBUF, &OUTBUFLEN, | | &RESULT); | | | | WRITESTREAM WRITESTREAM (&TERMINALID, &OFFSET, &OUTBUFLEN, OUTBUF, &RESULT); | | | -------------------------------------------------------------------------------------------