CSAINDX contains two attachment definitions in the WORKING-STORAGE SECTION: one for connecting to DB2 with DirectConnect and one for connecting to Adaptive Server Enterprise. If you want to write a CSA to transfer data between two LAN services, such as a DirectConnect and Adaptive Server Enterprise, you need two attachment definitions, as this CSAINDX example illustrates:
05 ATTNAME-1 PIC X(08) VALUE 'GWSERVNM'.
05 ATTNAME-2 PIC X(08) VALUE 'SQLSERVE'.
