DUTAS re-platformed to Raincode - Initial Source Code

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

13
Copybook/LPAM007C.cpy Normal file
View File

@ -0,0 +1,13 @@
00001 ***************************************************************** 05/15/02
00002 ******** PBSS LPAM PRODUCT - LPAM GETZIP INPUT ********** LPAM007C
00003 ***************************************************************** LV003
00004 * 11-NEW----------------------------------------00000-JHC-060988* LPAM007C
00005 * 06/22/01 RLS CHANGED ZIP FIELD DEFINITION FROM 9(5) TO X(5) * LPAM007C
00006 * TO ALLOW WILDCARD (E.G. 605*) * LPAM007C
00007 ******************** (C) PBSS 1988 ****************************** LPAM007C
00008 * LPAM007C
00009 01 LPAM-GETZIP-INPUT. LPAM007C
00010 05 LPAM-GETZIP-TARGET-ZIP PIC X(05). LPAM007C
00011 05 LPAM-GETZIP-TARGET-IND PIC X(05). LPAM007C
00012 05 LPAM-GETZIP-REPLICATION PIC 9(03). LPAM007C
00013 05 LPAM-GETZIP-RESERVED PIC X(30). LPAM007C