PGM
             CPYFRMIMPF FROMSTMF('/formation/bacchus/data/pays.csv') +
                          TOFILE(BDVIN_00/PAYS) MBROPT(*ADD) +
                          RCDDLM(*CRLF) DTAFMT(*DLM) STRDLM('"') +
                          FLDDLM(';') DECPNT(*COMMA)
 
             CPYFRMIMPF +
                          FROMSTMF('/formation/bacchus/data/region.cs+
                          v') TOFILE(BDVIN_00/REGIONS) +
                          MBROPT(*ADD) RCDDLM(*CRLF) +
                          DTAFMT(*DLM) STRDLM('"') FLDDLM(';') +
                          DECPNT(*COMMA)
 
             CPYFRMIMPF +
                          FROMSTMF('/formation/bacchus/data/sousregio+
                          n.csv') TOFILE(BDVIN_00/SOUSR00001) +
                          MBROPT(*ADD) RCDDLM(*CRLF) +
                          DTAFMT(*DLM) STRDLM('"') FLDDLM(';') +
                          DECPNT(*COMMA)
 
             CPYFRMIMPF +
                          FROMSTMF('/formation/bacchus/data/appellati+
                          on.csv') TOFILE(BDVIN_00/APPEL00001) +
                          MBROPT(*ADD) RCDDLM(*CRLF) +
                          DTAFMT(*DLM) STRDLM('"') FLDDLM(';') +
                          DECPNT(*COMMA)
 
             CPYFRMIMPF +
                          FROMSTMF('/formation/bacchus/data/classific+
                          ation.csv') TOFILE(BDVIN_00/CLASS00001) +
                          MBROPT(*ADD) RCDDLM(*CRLF) +
                          DTAFMT(*DLM) STRDLM('"') FLDDLM(';') +
                          DECPNT(*COMMA)
 
             CPYFRMIMPF +
                          FROMSTMF('/formation/bacchus/data/cartes.cs+
                          v') TOFILE(BDVIN_00/CARTES) +
                          MBROPT(*ADD) RCDDLM(*CRLF) +
                          DTAFMT(*DLM) STRDLM('"') FLDDLM(';') +
                          DECPNT(*COMMA)
             CPYFRMIMPF +
                          FROMSTMF('/formation/bacchus/data/garde.csv+
                          ') TOFILE(BDVIN_00/GARDE) +
                          MBROPT(*ADD) RCDDLM(*CRLF) +

                          DTAFMT(*DLM) STRDLM('"') FLDDLM(';') +
                          DECPNT(*COMMA)
             CPYFRMIMPF +
                          FROMSTMF('/formation/bacchus/data/hotelrest+
                          o.csv') TOFILE(BDVIN_00/HOTELRESTO) +
                          MBROPT(*ADD) RCDDLM(*CRLF) +
                          DTAFMT(*DLM) STRDLM('"') FLDDLM(';') +
                          DECPNT(*COMMA)
             CPYFRMIMPF +
                          FROMSTMF('/formation/bacchus/data/producteu+
                          rs.csv') TOFILE(BDVIN_00/PRODU00001) +
                          MBROPT(*ADD) RCDDLM(*CRLF) +
                          DTAFMT(*DLM) STRDLM('"') FLDDLM(';') +
                          DECPNT(*COMMA)
             CPYFRMIMPF +
                          FROMSTMF('/formation/bacchus/data/typedevin+
                          .csv') TOFILE(BDVIN_00/TYPEDEVIN) +
                          MBROPT(*ADD) RCDDLM(*CRLF) +
                          DTAFMT(*DLM) STRDLM('"') FLDDLM(';') +
                          DECPNT(*COMMA)
             CPYFRMIMPF FROMSTMF('/formation/bacchus/data/vins.csv') +
                          TOFILE(BDVIN_00/VINS) MBROPT(*ADD) +
                          RCDDLM(*CRLF) DTAFMT(*DLM) STRDLM('"') +
                          FLDDLM(';') DECPNT(*COMMA)
 
             CPYFRMIMPF +
                          FROMSTMF('/formation/bacchus/data/ma_cave.c+
                          sv') TOFILE(BDVIN_00/MA_CAVE) +
                          MBROPT(*ADD) RCDDLM(*CRLF) DTAFMT(*DLM) +
                          STRDLM('"') FLDDLM(';') DECPNT(*COMMA)
ENDPGM