Σάββατο 27 Φεβρουαρίου 2016

Αναθεώρηση 169 (σημαντική)

Στην αναθεώρηση 169 διόρθωσα ένα πρόβλημα στην χρήση αρχείων με την Άνοιξε/Open, στη χρησιμοποίηση του ";", δημιουργούσε σε μετέπειτα γραμμές πρόβλημα με την μη αποστολή αλλαγή γραμμής.
Μαζί με την διόρθωση μπήκε και μια προσθήκη.

κ=1
\\ με χρήση BOM (ενδεικτικού χαρακτήρα)
Άνοιξε "αλφα.csv" για ευρεία εξαγωγή ως κ
      Τύπωσε #κ, χαρκωδ$(0xFEFF);  \\ λέγεται BOM και μαρκάρει το κείμενο ως  UTF-16LE
      Γράψε με χαρ$(9), τοπικο$(0xE) \\ το 0xE δίνει το σύμβολο για τα δεκαδικά
      Γράψε #κ, "Τιμή Α", "Τιμή Β","Αποτέλεσμα Κ"
      Γράψε #κ, 12.24, 213.23, 213.23+12.24
      Γράψε #κ, 15.24, 215.23, 215.23+15.24
      Γράψε #κ, "=A2+A3","=B2+B3","=C2+C3"
Κλείσε #κ
Σύστημα "Excel.exe "+παράθεση$(κατ$+"αλφα.csv")


Προς το παρόν δεν διαβάζει η Μ2000 αυτό το csv άμεσα με Εισαγωγή #κ, γιατί θέλει το κανονικό, τελεία για δεκαδικά και κόμμα μεταξύ των πεδίων
Για να γυρίσουμε την εξαγωγή στο κανονικό:
Γράψε με "",""

Στο εγχειρίδιο τεύχος 21 θα δείξω και την ρουτίνα μετατροπής από το φορμά με τα tab (χαρ$(9)) και τα "," σε "," και ".".

(η συνάρτηση Παράθεση$ βάζει στο αλφαριθμητικό εισαγωγικά, και το κάνουμε αυτό γιατί  ο κατάλογος ή το όνομα μπορεί να περιέχουν κενά)

Δεν υπάρχουν σχόλια:

Δημοσίευση σχολίου

You can feel free to write any suggestion, or idea on the subject.