Re: Tulostus tiedostosta kohdilleen?

[vastaus aiempaan viestiin]

Kirjoittaja: Seppo Mustonen
Sähköposti:    -
Päiväys: 17.12.2007 8:49

Jos olen ymmärtänyt oikein, monen peräkkäisen havainnon tulostus
omille sivuilleen tarkkaan määrittelyn sijoittelun mukaan lomakkeelle
tapahtuu kätevästi käyttäen FILE LOAD-komentoa FORMAT-täsmennyksellä.
Tulostettavat muuttujat osoitetaan paikoilleen muotoa
- [Point(x,y)] olevilla ohjauksilla. Siinä x ja y ovat millimetrin
kymmenesosia ja (x,y) on piste koordinaatistossa, jonka origo on
lähellä arkin alakulmaa. Paikat lomakkeella löytyvät yksinkertaisesti
kokeilemalla parin yrityksen jälkeen.
Koska hakasuluilla [] osoitetaan tulostettavat kentät esim. [Kunta],
PRINT:iä varten tarkoitetut ohjaukset on pantava esim. aaltosulkujen
väliin, esim. {Point(100,2400)}.
Kun FILE LOAD on aktivoitu ja saatu tulostettavat sivut kenttään
(Huom. / sivunvaihtoa varten muotoiluasetuksen lopussa), aaltosulut
korvataan hakasuluilla kahdella REPLACE-komennolla.

Tässä koko juttu saadaan valmiiksi yhdellä /ACTIVATE-komennolla
seuraavasti:

 /ACTIVATE +
+FILE LOAD KUNNAT,A / FORMAT=Muoto1 IND=Väestö,100000,500000
*FORMAT Muoto1
*
- {Swiss(12)}
- {Point(100,2400)}
*[Kunta]
- {Point(400,2400)}
*[Lääni]
*
- {Swiss(10)}{line_spacing(11)}{margin(200)}
- {Point(150,2200)}
*Tässä on
*vapaamuotoista
*tekstiä.......
*
- {Swiss(11)}{line_spacing(12)}{margin(100)}
*
- {Point(300,1500)}
*Väestö [Väestö]
- {Point(500,1800)}
*Veroäyri [Äyri]
/
*END
*
+REPLACE {,[,C
+REPLACE },],C
+PRINT CUR+2,END TO ARKIT.PS
+/GS-PDF ARKIT.PS
A

            * * *

Toimituskenttä näyttää tämän jälkeen riviltä A alkaen seuraavalta
A
- [Swiss(12)]
- [Point(100,2400)]
*Espoo
- [Point(400,2400)]
*UUS
*
- [Swiss(10)][line_spacing(11)][margin(200)]
- [Point(150,2200)]
*Tässä on
*vapaamuotoista
*tekstiä.......
*
- [Swiss(11)][line_spacing(12)][margin(100)]
*
- [Point(300,1500)]
*Väestö 133556
- [Point(500,1800)]
*Veroäyri 14.50
/
*
- [Swiss(12)]
- [Point(100,2400)]
*Helsinki
- [Point(400,2400)]
*UUS
*
- [Swiss(10)][line_spacing(11)][margin(200)]
- [Point(150,2200)]
*Tässä on
*vapaamuotoista
*tekstiä.......
*
- [Swiss(11)][line_spacing(12)][margin(100)]
*
- [Point(300,1500)]
*Väestö 483057
- [Point(500,1800)]
*Veroäyri 15.00
/
*
- [Swiss(12)]
- [Point(100,2400)]
*Tampere
- [Point(400,2400)]
jne.

ja lopulliset sivut ovat Acrobat Readerissa katseltavana ja
tulostettavana.
Tositilanteessa on tietenkin syytä varata toimituskenttään riittävästi
tilaa REDIM-komennolla.

- Seppo

Vastaukset:

Survo-keskustelupalstan (2001-2013) viestit arkistoitiin aika ajoin sukrolla, joka automaattisesti rakensi viesteistä (yli 1600 kpl) HTML-muotoisen sivukokonaisuuden. Vuoden 2013 alusta Survo-keskustelua on jatkettu entistäkin aktiivisemmin osoitteessa forum.survo.fi. Tervetuloa mukaan!

Etusivu  |  Keskustelu
Copyright © Survo Systems 2001-2013. All rights reserved.
Updated 2013-06-15.