Pick One
Database Reengineering
CICS to AS/400
IDMS/DC to CICS
IDMS/DC to AS/400
ADS/O to CICS
ADS/O to AS/400
Gener/OL to
CICS

Gener/OL to AS/400
UFO to AS/400
What we do with the ADS/O or ADS/A Dialogue …

  • Create a structured COBOL program for each dialogue using automated tools.

  • All comments in the original code can be carried through to the migrated code.

  • Each copy IDMS is converted to a COBOL copy statement with IDMS copybooks becoming COBOL copybooks.

  • Subroutines are converted to COBOL sections and all call statements become COBOL Perform thru exit.

  • Copybooks are inserted for the SQLCA and additional working storage areas including record areas, work areas, screen buffer areas, and necessary SQL and screen I/O areas.

    What about the map definition and I/O …

  • For each ADS/O or ADS/A map or menu, the Data Definition Specifications for the display file are generated and a COBOL copybook that reflects the structure of the display buffer is generated.

  • Replace all map related statements with the appropriate AS/400 display statements.

  • MODIFY MAP is replaced with a move to the screen buffer.

  • Cursor positioning is translated.

  • Maps are displayed with an AS/400 write and received with an AS/400 read.

    And what about navigation and ADS/A security…

  • Navigation throughout the application is maintained.

  • A traffic cop manages program-to-program flow.

  • ADS/A security is built in to the migrated application.

  • ADS/O statements for invoking the next dialogue are converted return to the traffic cop to call the next program. ADS/A definitions for RESPONSES and FUNCTIONS are handled the same way.

  • ADS/O LINK becomes a Cobol CALL.

  • Program to program communication is maintained.

    And special ADS/O functions …

  • ADS/O functions are replaced with the appropriate COBOL statements.

  • SUBSTRING is converted to FIELD POSTIONING.

  • The DO verb is replaced with inline code and DO WHILE structures are replaced with PERFORM UNTIL structures.

  • INIT becomes INITIALIZE.

  • All information obtainable via CALL ADSOINFO is available to the converted application.

    Back to Top

    Home - Solutions - Company History - Consulting Services
    FAQ - Our Clients - Customer Support -