This file contains 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 |
This file contains 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 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 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 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 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 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
IDENTIFICATION DIVISION. | |
PROGRAM-ID. CBLMERG. | |
* | |
****************************************************************** | |
* AUTHOR: SANDEEP | |
* DESC : COBOL PROGRAM USING INTERNAL SORT TO MERGE | |
* : TWO INPUT FILE IN OUTPUT FILE. | |
****************************************************************** | |
ENVIRONMENT DIVISION. | |
* |
This file contains 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
IDENTIFICATION DIVISION. | |
PROGRAM-ID. CBL1DTBL. | |
AUTHOR. SANDEEP R PRAJAPATI. | |
****************************************************************** | |
*DESCRIPTION: COBOL PROGRAM LOADS DATA INTO EMPLOYEE TABLE * | |
* USING EXTERNAL FILE * | |
*DATE : 23-09-2020 * | |
****************************************************************** | |
* | |
ENVIRONMENT DIVISION. |
This file contains 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
IDENTIFICATION DIVISION. | |
PROGRAM-ID. CBLV1TBL. | |
AUTHOR. SANDEEP R PRAJAPATI. | |
****************************************************************** | |
*DESCRIPTION: COBOL PROGRAM LOADS DATA INTO EMPLOYEE TABLE * | |
* USING EXTERNAL FILE * | |
*DATE : 24-09-2020 * | |
****************************************************************** | |
* | |
ENVIRONMENT DIVISION. |
This file contains 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
A111BILLY BIGGS NCPROGRAMMER/ANALYST 0320000505007500COBOL Y | |
B222FRED TANAKA ALGRAPHIC DESIGNER 0071110506005000JAVASCRIPT Y | |
C333SALLY FIDDLER NCDATABASE ADMIN 1110220515017500CDB2 N | |
A111LEONARD STEIN NYJES/JCL SPECIALIST 0220330510027500COBOL Y | |
A111AL YANKOV NCPROGRAMMER/ANALYST 0110000504017500JCL L Y | |
B222KYUHEE PARK NYSYSTESM PROGRAMMER 0410300504027500ASSEMBLER Y | |
D444MEL HUDAK NCMANAGER 0640900506537500VISIO N | |
B333CARLOS RAMOS NYPROGRAMMER/ANALYST 0410100511011100COBOL Y | |
B222ELIZABETH W ALSYSTEMS ARCHITECT 0190200545433300ECLIPSE N | |
B222MILLARD FILL CAPROGRAMMER/ANALYST 0980030521044500COBOL N |
OlderNewer