Decompress ->
Arg Archive_name : String  
    Target : DBTarget

- FS >Temp_path< FT 
' FT = FS_TMP | FS_DIR

- Ext <
        Name : 'Unzip.exe'
        Parameters : < '-jso' Archive_name '*.csv' >
        Workdir : Temp_path
      >
      (
        Line : - CharIn >CSV< File_name,
                 FS FS_DELETE File_name,
                 LoadToDatabase CSV Target,
                 [ File_name FILE_EXISTS ]
                 ' File_name <- Line # Space_position Line._
                 ' Space_position <- Line ': '
                 [ Line '.csv' ]
                 [ Line ': ' ]
      )

- FS FT Temp_path 
' FT = FS_DELETE | FS_DIR

/