Nmingott: importe material

2025-05-12T20:39:19Z

importe material

New page

'''TODO'''. Complete the task and upload an example data file with (prices made up).

Many files today are encoded as XML. Some of them have a quite complex data structure and are hard to read for human eyes. But good news! In ''Cuis'' we have a package to deal with XML and ''Smalltalk'' makes exploring XML a lot more enjoyable than in any other programming language.

'''Problem'''. I have a company price list in several ''LibreOffice'' '''.odt''' files. I want to update all those prices adding 1.5%.

'''Solution'''. Say you have a file ''priceList1.odt'' then:

* Make a directory ''printList1Dir'' and copy ''princeList1.odt'' in there.

$> mkdir princeList1Dir
$> cp priceList1.odt priceList1Dir
$> cd priceListdir

* Unzip the file (yes, .odt file as just zipped document, isn't it great?)
* Remove the zipped file from the new directory (you will see why later on)

$> unzip princeList1.odt
$> rm princeList1.odt

* Observe there is a file called '''content.xml''', tadaaaa, we are going to work on that !

'''TO FINISH'''

* Just started to collect the necessary commands for reading
* I miss commands for writing
* I need to work with true files to make this of any use

Feature require: 'YAXO'.

f1 _ '/home/p/download/test1-odt/content.xml' asFileEntry readStream .
xdoc _ XMLDOMParser parseDocumentFrom: f1.
f1 close.
xdoc class. " XMLDocument "
xdoc elements. " show all elements "
xdoc explore.

t1 _ xdoc firstTagNamed: #'table:table'.
t1 class. " XMLElement "
t1 elements .

t1 firstTagNamed: #'text:p'.
" <text:p text:style-name="P2">1A</text:p> "

t1 tagsNamed: #'text:p' do: [ :el |
Transcript log: (' {1}' format: {el. }).
Transcript log: ('- contents {1}' format: {el contents. }).
].

Deal with XML files - Revision history

Nmingott: importe material