Re: Muutujien poistaminen - yhden muuttujan tapaus

[vastaus aiempaan viestiin]

Kirjoittaja: Petri Palmu
Sähköposti:    -
Päiväys: 5.10.2007 16:49

Moi,

Mulla on tehtynä pikasukro DEL_VAR siltä varalta, kun aina välillä on
tullut tehtyä jokin yksittäinen muuttuja väärin.
Se käyttää hyväkseen
VARS=ALL,-X tekniikkaa, kopioiden datan (pl. X) väliaikaiseen
tiedostoon (TEMP1) ja sitten takas alkuperäiseen dataan.

Isoilla datoilla kopiointi saattaa kestää (en ole keksinyt nopeampaa
tapaa). Kopioinnissa kannattaa huomioida, ettei ole IND,CASES,SELECT
täsmennyksiä, siksi rajarivit... (sama juttu on muuten tuon
FILE EXPAND käytössä...)

Ton voisi yleistää useammalle muuttujallekin (eli VARS=ALL,-X8,-X1)

t. Petri


Talleta tämä sukroille tarkoitettuun hakemistoon

*TUTSAVE DEL_VAR  /
/ Poistaa yhden sarakkeen Survo datatiedostosta
/ Usage:  /DEL_VAR <var> IN <data> 
/
*{init}{tempo 0}
- if W2 '<>' IN then goto ERR1
*{ref set 1}{ins line}{line start}
*................{ins line}{ins line}{line start}
*................{u}{ins line}{line start}
*FILE COPY {print W3} TO NEW TEMP1 / VARS=ALL,-{print W1}{act}
*{line start}{erase}
*FILE COPY TEMP1 TO NEW {print W3}{act}{u2}{line start}
*{del line}{del line}{del line}{del line}{ref jump 1}{goto END}
+ ERR1: {message}        Usage: /DEL_VAR var_name IN data@
*{goto E1}
+ E1:
- on key
-   key _: continue
-   wait 300
*{goto END}
+ END: {end}
*
*


Petri Leinonen kirjoitti 4.10.2007 22:03 :

> 
>>Osaisiko joku neuvoa, kuinka Survossa poistetaan tarpeettomia
>>muuttujia?
> 
>Kopioidaan  vanhasta tiedostosta uuteen vain halutut muuttujat.
>Eli file act-komennolla (alt-F6)muutetaan osa muuttujista
>passiivisiksi
>(A:n tilalle -), niin eivät kopioidu siihen uuteen. Tiedostojen
>nimeämisessä pitää sitten tietty olla joku logiikka...
> 
>Petri Leinonen

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.