Calling G1CPLKC - Code-1_Plus - 5.0

CODE-1 Plus Reference for all Platforms

Product type
Software
Portfolio
Verify
Product family
Data Quality - Postals
Product
CODE-1 Plus
Version
5.0
Language
English
Product name
CODE-1 Plus
Title
CODE-1 Plus Reference for all Platforms
Copyright
2024
First publish date
1998
ft:lastEdition
2024-05-15
ft:lastPublication
2024-05-15T00:07:55.920704

The G1CPDSM sample program calls the G1CPLKC callable routine for your platform. The following example is from G1CPDSM. For the most current version, please refer to G1CPDSM included with your installation in the sample library.

01 WS-C1P-DBLOOK-PGM          PIC X(8) VALUE 'G1CPLKC'.
01 WS-MISC-LENGTHS.05 WS-LENGTH-DBLOOK-AREAS     PIC S9(04) COMP.
      .
01 WS-C1P-DBLOOK-AREAS COPY LOOKREQ.   .
MOVE LENGTH OF WS-C1P-DBLOOK-AREAS TO WS-LENGTH-DBLOOK-AREAS.EXEC CICS LINKPROGRAM (WS-C1P-DBLOOK-PGM)COMMAREA (WS-C1P-DBLOOK-AREAS)   LENGTH (WS-LENGTH-DBLOOK-AREAS)END-EXEC.

 

To ensure the integrity of the database to be passed, initialize the following areas in the calling program, along with any other fields accessing data to be passed:

  • Move spaces to G1CPLK-USER-REQUEST-AREA

  • Move LOW-VALUES to G1CPLK-MAX-RETURN-CONTROL.

Note: iThe CODE-1 Plus installation provides sample source code for COBOL only.