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 “Using SNA IMF Intrinsics” 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 clauses to 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 COBOL is listed in Table 3-5 “COBOL Data Types”.

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 “COBOL Intrinsic Calls, MPE V and CM” 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 SNA IMF/V)	`CALL "CACQUIRE3270" USING SNALNKINFO DEVICENUM LDEV ENHANCE PRIORITY BLANKS FORMAT FLAGS RESULT.`
`ACQUIRE3270` (for SNA IMF/XL in compatibility mode)	`CALL "CACQUIRE3270" USING SNALNKINFO DEVICENUM LDEV ENHANCE PRIORITY BLANKS FORMAT FLAGS OPTIONS PFN RESULT.`
`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.`
`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 “COBOL Intrinsic Calls, MPE XL Native Mode” 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.`
`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 "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 “FORTRAN Intrinsic Calls” 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	COBOL Calling Sequence
`ACQUIRE3270` (for SNA IMF/V)	`CALL ACQUIRE3270 (SNALNKINFO, DEVICENUM, LDEV, ENHANCE, PRIORITY, BLANKS, FORMAT, FLAGS, RESULT)`
`ACQUIRE3270` (for SNA IMF/XL	`CALL ACQUIRE3270 (SNALNKINFO, DEVICENUM, LDEV, ENHANCE, PRIORITY, 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)`
`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 “BASIC Intrinsic Calls, MPE V and CM” 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	COBOL Calling Sequence
`ACQUIRE3270` (for SNA IMF/V)	`CALL BACQUIRE3270 (C$, D1, L0, E1, P2, B1, F3, F, R)`
`ACQUIRE3270` (for SNA IMF/XL in compatibility mode)	`CALL BACQUIRE3270 (C$, D1, L0, E1, P2, B1, F3, F, O4, P$, R)`
`ATTRLIST`	`CALL BATTRLIST (T, 01, L1, L2, N, 02(*)`, 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)`
`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 “BASIC Intrinsic Calls, MPE XL Native Mode” 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	COBOL 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)`
`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 “Basic Variables” 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`	01	`OFFSET`
D1	`DEVICENUM`	02(*)	`OFFSETLIST`
D2	`DEVTYPE`
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 “SPL Intrinsic Calls” 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 SNA IMF/V)	`ACQUIRE3270 (SNALNKINFO, DEVICENUM, LDEV, ENHANCE, PRIORITY, BLANKS, FORMAT, FLAGS, RESULT)`
`ACQUIRE3270` (for SNA IMF/XL)	`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)`
`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 “Pascal Intrinsic Calls” 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 SNA IMF/V)	`ACQUIRE3270 (SNALNKINFO, DEVICENUM, LDEV, ENHANCE, PRIORITY, BLANKS, FORMAT, FLAGS, RESULT);`
`ACQUIRE3270` (for SNA IMF/XL)	`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);`
`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 “C/XL Intrinsic Calls” 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);`
`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)`;

Summary of Intrinsic Calls

Technical documentation

» Table of Contents