ILE RPG Language Reference


INFDS Get Attributes Feedback Example

To specify an INFDS which contains fields in the get attributes feedback section, you can make the following entries:

Figure 37. Example of Coding an INFDS with Display file Get Attributes Feedback Information
FFilename++IPEASFRlen+LKlen+AIDevice+.Keywords+++++++++++++++++++++++++++++Comments++++++++++
FMYFILE    CF   E             WORKSTN INFDS(DSPATRFBK)
DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++++++Comments++++++++++
DDSPATRFBK        DS
D PGM_DEV               241    250                                         * Program device
D DEV_DSC               251    260                                         * Dev description
D USER_ID               261    270                                         * User ID
D DEV_CLASS             271    271                                         * Device class
D DEV_TYPE              272    277                                         * Device type
D REQ_DEV               278    278                                         * Requester?
D ACQ_STAT              279    279                                         * Acquire status
D INV_STAT              280    280                                         * Invite status
D DATA_AVAIL            281    281                                         * Data available
D NUM_ROWS              282    283I 0                                      * Number of rows
D NUM_COLS              284    285I 0                                      * Number of cols
D BLINK                 286    286                                         * Allow blink?
D LINE_STAT             287    287                                         * Online/offline?
D DSP_LOC               288    288                                         * Display location
D DSP_TYPE              289    289                                         * Display type
D KBD_TYPE              290    290                                         * Keyboard type
D CTL_INFO              342    342                                         * Controller info
D COLOR_DSP             343    343                                         * Color capable?
D GRID_DSP              344    344                                         * Grid line dsp?
 * The following fields apply to ISDN.
D ISDN_LEN              385    386I 0                                      * Rmt number len
D ISDN_TYPE             387    388                                         * Rmt number type
D ISDN_PLAN             389    390                                         * Rmt number plan
D ISDN_NUM              391    430                                         * Rmt number
D ISDN_SLEN             435    436I 0                                      * Rmt sub-address
D                                                                          *   length
D ISDN_STYPE            437    438                                         * Rmt sub-address
D                                                                          *   type
D ISDN_SNUM             439    478                                         * Rmt sub-address
D ISDN_CON              480    480                                         * Connection
D ISDN_RLEN             481    482I 0                                      * Rmt address len
D ISDN_RNUM             483    514                                         * Rmt address
D ISDN_ELEN             519    520                                         * Extension len
D ISDN_ETYPE            521    521                                         * Extension type
D ISDN_ENUM             522    561                                         * Extension num
D ISDN_XTYPE            566    566                                         * X.25 call type
D
Figure 38. Example of Coding an INFDS with ICF file Get Attributes Feedback Information
FFilename++IPEASFRlen+LKlen+AIDevice+.Keywords+++++++++++++++++++++++++++++Comments++++++++++
FMYFILE    CF   E             WORKSTN INFDS(ICFATRFBK)
DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++++++Comments++++++++++
DICFATRFBK        DS
D PGM_DEV               241    250                                         * Program device
D DEV_DSC               251    260                                         * Dev description
D USER_ID               261    270                                         * User ID
D DEV_CLASS             271    271                                         * Device class
D DEV_TYPE              272    272                                         * Device type
D REQ_DEV               278    278                                         * Requester?
D ACQ_STAT              279    279                                         * Acquire status
D INV_STAT              280    280                                         * Invite status
D DATA_AVAIL            281    281                                         * Data available
D SES_STAT              291    291                                         * Session status
D SYNC_LVL              292    292                                         * Synch level
D CONV_TYPE             293    293                                         * Conversation typ
D RMT_LOC               294    301                                         * Remote location
D LCL_LU                302    309                                         * Local LU name
D LCL_NETID             310    317                                         * Local net ID
D RMT_LU                318    325                                         * Remote LU
D RMT_NETID             326    333                                         * Remote net ID
D APPC_MODE             334    341                                         * APPC Mode
D LU6_STATE             345    345                                         * LU6 conv state
D LU6_COR               346    353                                         * LU6 conv
D                                                                          *    correlator
 * The following fields apply to ISDN.
D ISDN_LEN              385    386I 0                                      * Rmt number len
D ISDN_TYPE             387    388                                         * Rmt number type
D ISDN_PLAN             389    390                                         * Rmt number plan
D ISDN_NUM              391    430                                         * Rmt number
D ISDN_SLEN             435    436I 0                                      * sub-addr len
D ISDN_STYPE            437    438                                         * sub-addr type
D ISDN_SNUM             439    478                                         * Rmt sub-address
D ISDN_CON              480    480                                         * Connection
D ISDN_RLEN             481    482I 0                                      * Rmt address len
D ISDN_RNUM             483    514                                         * Rmt address
D ISDN_ELEN             519    520                                         * Extension len
D ISDN_ETYPE            521    521                                         * Extension type
D ISDN_ENUM             522    561                                         * Extension num
D ISDN_XTYPE            566    566                                         * X.25 call type
 * The following information is available only when program was started
 * as result of a received program start request. (P_ stands for protected)
D TRAN_PGM              567    630                                         * Trans pgm name
D P_LUWIDLN             631    631                                         * LUWID fld len
D P_LUNAMELN            632    632                                         * LU-NAME len
D P_LUNAME              633    649                                         * LU-NAME
D P_LUWIDIN             650    655                                         * LUWID instance
D P_LUWIDSEQ            656    657I 0                                      * LUWID seq num

 * The following information is available only when a protected conversation
 * is started on a remote system.  (U_ stands for unprotected)
D U_LUWIDLN             658    658                                         * LUWID fld len
D U_LUNAMELN            659    659                                         * LU-NAME len
D U_LUNAME              660    676                                         * LU-NAME
D U_LUWIDIN             677    682                                         * LUWID instance
D U_LUWIDSEQ            683    684I 0                                      * LUWID seq num

[ Top of Page | Previous Page | Next Page | Contents | Index ]