INPEXIT TO DELETE COLUMNS 1-2-3 OF EACH RECORD

[Leticia Vigo]

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.

[ewirtz]

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

[Leticia Vigo]

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.

[ewirtz]

Hi Leticia,

which kind of Indexer do you use?

regards Egon

[Leticia Vigo]

We use INDEXER ACIF ...

Thanks.
Leticia.

[ewirtz]

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