[vastaus aiempaan viestiin]
| Kirjoittaja: | Kimmo Vehkalahti |
|---|---|
| Sähköposti: | - |
| Päiväys: | 24.11.2009 15:22 |
Hei, Tässä vinkki etunollien säilyttämiseen: SAVEP CUR+1,CUR+7,K.TXT / talletetaan pieni koedata pvm1 kg1 pvm2 kg2 010409 50 020709 60 020509 60 030809 70 030609 70 041109 80 040709 80 050909 90 110409 90 120509 100 220509 100 230909 110 FILE SAVE K.TXT TO NEW K / siirretään datatiedostoksi FILE SHOW K / etunollat häviävät, koska pvm:t numeerisia (N) FILE STATUS K / luodun datatiedoston rakenne näyttää tältä Copied from text file K.TXT FIELDS: (active) 1 NA_ 8 pvm1 pvm1 (######) 2 NA_ 2 kg1 kg1 (###) 3 NA_ 8 pvm2 pvm2 (######) 4 NA_ 2 kg2 kg2 (###) END Survo data file K: record=45 bytes, M1=9 L=64 M=4 N=6 .............................. Luodaan data uudelleen kopioimalla äsken saatu FIELDS-lista, mutta muutetaan siinä pvm-muuttujat merkkijonoiksi (S): FILE CREATE K Painomittauksia kahtena eri ajankohtana FIELDS: (active) 1 SA_ 8 pvm1 pvm1 (######) 2 NA_ 2 kg1 kg1 (###) 3 SA_ 8 pvm2 pvm2 (######) 4 NA_ 2 kg2 kg2 (###) END Nyt tiedot uudelleen sisään (valmiiseen) datarakenteeseen (otetaan avainsana "NEW" pois ja käytetään valmiita nimiä): FILE SAVE K.TXT TO K / NAMES=DEFAULT FIRST=2 FILE SHOW K / nyt etunollat säilyvät ............................... Lasketaan punnitusten väliset ajat päivinä: DATE K,EROT / IDATE=DDMMYY DATE_RULES EROT ero:2=pvm2-pvm1 END ............................... FILE LOAD K CUR+2 / tältä näyttää: DATA K*,A,B,C pvm1 kg1 pvm2 kg2 ero 010409 50 020709 60 92 020509 60 030809 70 93 030609 70 041109 80 154 040709 80 050909 90 63 110409 90 120509 100 31 220509 100 230909 110 124 terv. Kimmo
| 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!