samples/gen_addr_sql.ysl2
author Hartmut Goebel <h.goebel@crazy-compilers.com>
Thu, 19 Mar 2020 10:47:36 +0100
changeset 63 37d51c3abaae
parent 26 0c3815cbb51e
permissions -rw-r--r--
Release 2.6.3
26
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
     1
include yslt.yml2
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
     2
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
     3
tstylesheet {
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
     4
    template "/list" {
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
     5
        apply "address", 0;
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
     6
        | 1000 FOR I=1 TO 2 STEP 1
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
     7
        | 1010 READ NAME$, STREET$, VILLAGE$
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
     8
        | 1020 PRINT "INSERT INTO address (name, street, village) VALUES ('" + NAME$ + "', '" + STREET$ + "', '" + VILLAGE$ + "');"
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
     9
        | 1030 NEXT I
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
    10
    }
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
    11
    template "address" {
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
    12
        | «position() * 10 + 100» DATA "«name»", "«street»", "«village»"
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
    13
    }
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
    14
}
0c3815cbb51e adding samples
Volker Birk <vb@pep-project.org>
parents:
diff changeset
    15