OnDemand Users Group

Support Forums => CMOD for Multiplatforms => Topic started by: Leticia Vigo on October 23, 2013, 06:07:55 PM

Title: INPEXIT TO DELETE COLUMNS 1-2-3 OF EACH RECORD
Post by: Leticia Vigo on October 23, 2013, 06:07:55 PM
Hi ... I need to generate a "c" user exit that should eliminate the first 3 bytes of each record of the input file ...

For example ... If my record is  "000Program ADDI426 - Date 10/22/2013", after executing the INPEXIT, it should be "Program ADDI426 - Date 10/22/2013".

I think I should also modify the record length ...

Can you help me?

Thanks.
Title: Re: INPEXIT TO DELETE COLUMNS 1-2-3 OF EACH RECORD
Post by: ewirtz on October 24, 2013, 06:45:28 AM
Hi Leticia

you can use the input exit but you can also use the preview exit to drop the first columns. (see for coding examples in the documentation)

regards

Egon
Title: Re: INPEXIT TO DELETE COLUMNS 1-2-3 OF EACH RECORD
Post by: Leticia Vigo on October 24, 2013, 04:36:37 PM
Egon ... thanks for your answer ... I think we need the input user exit because we have the CARRIAGE CONTROL in column number 4. We need to delete columns 1, 2 and 3 before indexing the file.

We have implemented some user exits ... but I can't find any example related to this.

Thanks.
Leticia.
Title: Re: INPEXIT TO DELETE COLUMNS 1-2-3 OF EACH RECORD
Post by: ewirtz on October 25, 2013, 06:24:10 AM
Hi Leticia,

which kind of Indexer do you use?

regards Egon

Title: Re: INPEXIT TO DELETE COLUMNS 1-2-3 OF EACH RECORD
Post by: Leticia Vigo on October 28, 2013, 12:34:26 PM
We use INDEXER ACIF ...

Thanks.
Leticia.
Title: Re: INPEXIT TO DELETE COLUMNS 1-2-3 OF EACH RECORD
Post by: ewirtz on November 06, 2013, 11:58:07 AM
Hi Litecia,

we have implemented an exit in COBOL. The exit logic works like:

The exit will be called with a pointer to a structure. One of the elements is a pointer to the current record. You can change the record. At the end you have to return to arsload what to do with the changed record (p.e. use it). That's all


regards Egon