It is possible to move the data in one format to another, but you cannot use the file format name. The better solution is to use data structures to move the data. Then in the program, MOVE one data structure to the other. The only rule you need to follow is to insure the fields within the data structures line up.

Ex1.
D FLDATA E DS EXTNAME(FILE1)
D FLSAVE E DS EXTNAME(FILE1) PREFIX(SV)
.
.
.
C MOVEL FLDATA FLSAVE

In the above example, the DS’s have the same format (reference the same file), and as long as the data structures have the same field positioning (definition) as the other, then the logic works.

Ex2.
D DS1 DS
D FLD1 1 35
D FLD2 36 70
D FLD3 71 105
.
.
D DS2 DS
D FFLD1 1 35
D FFLD2 36 70
.
.
C MOVEL DS1 DS2

This will work also. If the fields in the data structures do not line up, the you run the risk of corrupting the data.

Hope this helps.

FKLCUSFIL IF E K DISK
FCAPIHC UF A E K DISK PREFIX(H)

D CUSREC_DS E DS EXTNAME(CAPIHC)
D CAPIHC_DS E DS EXTNAME(CAPIHC) Prefix(H)

MOVEL CUSREC_DS CAPIHC_DS