giteaadmin/DUTAS
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DUTAS re-platformed to Raincode - Initial Source Code

Browse Source
This commit is contained in:
Neeraj Kumar
2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
Copybook/DTSICFKD.cpy Normal file
View File

@ -0,0 +1,18 @@
00001 ***** 10/20/98
00002 * DTSICFKD
00003 * DTSICFKD FUNCTION KEY DESCRIPTIONS. LV004
00004 * DTSICFKD
00005 * REVIEWED AND MODIFIED FOR DC. 08/11/1998 EHH CL**3
00006 * CL**3
00007 ***** DTSICFKD
00008 05 CFKD-FUNCTION-KEY-DESCRIPTIONS. DTSICFKD
00009 10 CFKD-FIRST PIC X(08) VALUE 'F5=FIRST'. DTSICFKD
00010 10 CFKD-LAST PIC X(07) VALUE 'F6=LAST'. DTSICFKD
00011 10 CFKD-BACKWARD PIC X(07) VALUE 'F7=BACK'. DTSICFKD
00012 10 CFKD-FORWARD PIC X(07) VALUE 'F8=FWRD'. DTSICFKD
00013 10 CFKD-ADD PIC X(07) VALUE 'F9=ADD'. DTSICFKD
00014 10 CFKD-MOD PIC X(07) VALUE 'F10=MOD'. DTSICFKD
00015 10 CFKD-NEW-SEARCH PIC X(20) CL**4
00016 VALUE 'F12=START NEW SEARCH'. CL**2
00017 10 CFKD-COMPRESS PIC X(12) VALUE 'F22=COMPRESS'. CL**2
00018 10 CFKD-DEL PIC X(07) VALUE 'F23=DEL'. CL**2