This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
****************************************************************** | |
* AUTHOR: SANDEEP * | |
* PROGRAM: HELLO * | |
* DESCRIPTION: THIS MODULE IS RECEIVE AND SENDS DATA TO CICS * | |
* REGION * | |
* DATE: 05-08-2020 * | |
****************************************************************** | |
IDENTIFICATION DIVISION. | |
PROGRAM-ID. HELLO. | |
* |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
****************************************************************** | |
* Author: SANDEEP PRAJAPATI * | |
* Date: 03-07-2020 * | |
* Purpose: REPORT GENERATION USING COBOL PROGRAM. * | |
* : THIS PROGRAM READS A CUSTOMER TABLE * | |
* : WHICH WRITES A REPORT FORMAT * | |
****************************************************************** | |
IDENTIFICATION DIVISION. | |
* | |
PROGRAM-ID. DB2PGM8. |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
****************************************************************** | |
* Author: SANDEEP PRAJAPATI | |
* Date: 23-06-2020 | |
* Purpose: INTERACTIVE COBOL DB2 PROGRAM | |
****************************************************************** | |
IDENTIFICATION DIVISION. | |
* | |
PROGRAM-ID. DB2PGM6. | |
* | |
ENVIRONMENT DIVISION. |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
****************************************************************** | |
* Author: SANDEEP PRAJAPATI | |
* Date: 20-06-2020 | |
* Purpose: INTERACTIVE COBOL DB2 PROGRAM | |
****************************************************************** | |
IDENTIFICATION DIVISION. | |
* | |
PROGRAM-ID. DB2PGM3. | |
* | |
ENVIRONMENT DIVISION. |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
****************************************************************** | |
* Author: SANDEEP | |
* Date: 10-06-2020 | |
* Purpose: TO UNDERSTAND ONE LEVEL TABLE AND SUBSCRIPTS | |
* Tectonics: COBC | |
****************************************************************** | |
IDENTIFICATION DIVISION. | |
PROGRAM-ID. CTABLE. | |
* | |
ENVIRONMENT DIVISION. |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
11 23 12345 CAREER TRAINING CTR 1234567 2222222 00000100 | |
11 23 22222 HOMELITE TEXTRON CO 3454500 0000000 00000200 | |
11 33 55555 POLOT LIFE INS. CO. 1000000 0100000 00000300 | |
12 33 00111 DAUPHIN DEPOSIT BANK 1409900 1993000 00000400 | |
12 33 12121 GENERAL SERVICES CO. 1144400 1104956 00000500 | |
12 33 24680 INFO MANGEMENT CO. 1748145 1389247 00000600 | |
12 33 14680 ZEN TECHNOLOGIES CO. 748143 89347 00000700 | |
13 41 14681 TATA COFFEE PRIVATE. 2748345 2183247 00000800 | |
13 42 14682 TATA CONSUMER CO. 5748145 5143247 00000900 | |
14 43 14683 TATA CHEMICAL LTD. 4344345 4183447 00001000 |
NewerOlder