Skip to content

Instantly share code, notes, and snippets.

View sandeep-sparrow's full-sized avatar
🏠
Working from home

Sandeep prajapati sandeep-sparrow

🏠
Working from home
View GitHub Profile
version: '2.1'
services:
zoo1:
image: confluentinc/cp-zookeeper:7.3.2
platform: linux/amd64
hostname: zoo1
container_name: zoo1
ports:
- "2181:2181"
@sandeep-sparrow
sandeep-sparrow / CBLINSP.cbl
Last active March 3, 2021 11:36
COBOL INSPECT Function
****** ***************************** Top of Data ******************************
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. CBLINSP.
000003 AUTHOR. SANDEEP R PRAJAPATI.
000004 *
000005 ENVIRONMENT DIVISION.
000006 INPUT-OUTPUT SECTION.
000007 *
000008 DATA DIVISION.
000009 WORKING-STORAGE SECTION.
@sandeep-sparrow
sandeep-sparrow / EXTERM.cbl
Created October 21, 2020 06:51
A Main Program that opens a sequential file and calls a subprogram each time it need a record. share the same file between the two program by making the file external with a shared file status.
IDENTIFICATION DIVISION.
PROGRAM-ID. EXTERM.
AUTHOR. SANDEEP.
DATE-WRITTEN. 21-10-2020.
************************************************************
* DATA DIVISION
************************************************************
ENVIRONMENT DIVISION.
@sandeep-sparrow
sandeep-sparrow / CBLTAXS.cbl
Last active September 30, 2020 06:48
SEARCH function in COBOL.
IDENTIFICATION DIVISION.
PROGRAM-ID. CBLTAXS.
*
ENVIRONMENT DIVISION.
*
DATA DIVISION.
*
WORKING-STORAGE SECTION.
*
01 TAX-SLAB.
@sandeep-sparrow
sandeep-sparrow / EMP1PROJ.asm
Created September 28, 2020 11:21
Using One-Dimensional Table to load records from external file.
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
@sandeep-sparrow
sandeep-sparrow / CBLV1TBL.cbl
Last active September 30, 2020 06:58
V1 computes no of occurs for dynamic table values.
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.
@sandeep-sparrow
sandeep-sparrow / CBL1DTBL.cbl
Created September 23, 2020 17:14
COBOL program loads data in 1-D table from External File.
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.
@sandeep-sparrow
sandeep-sparrow / CBLMERG.cbl
Last active April 22, 2021 23:30
COBOL PROGRAM USING INTERNAL SORT TO MERGE TWO INPUT FILE IN OUTPUT FILE
IDENTIFICATION DIVISION.
PROGRAM-ID. CBLMERG.
*
******************************************************************
* AUTHOR: SANDEEP
* DESC : COBOL PROGRAM USING INTERNAL SORT TO MERGE
* : TWO INPUT FILE IN OUTPUT FILE.
******************************************************************
ENVIRONMENT DIVISION.
*
@sandeep-sparrow
sandeep-sparrow / HELLO.cbl
Created August 21, 2020 14:34
A simple COBOL-CICS which sends and receives data from the CICS region
******************************************************************
      * AUTHOR:  SANDEEP                                               *
      * PROGRAM: HELLO                                                 *
      * DESCRIPTION: THIS MODULE IS RECEIVE AND SENDS DATA TO CICS     *
      *              REGION                                            *
      * DATE: 05-08-2020                                               *
      ******************************************************************
       IDENTIFICATION DIVISION.
       PROGRAM-ID. HELLO.
      *
@sandeep-sparrow
sandeep-sparrow / DB2PGM8.cbl
Last active March 5, 2023 03:51
COBOL program to Generate CUSTOMER-INVOICE Report using DB2 and JCL - Thanks to Murach's & Captain Uday Prasad
******************************************************************
* 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.