Implementazione parser di sintassi SQL DBL (Data Binding Language)

[ghost]

Parser DBL

IBMi 7.2 SQL Reference

Convenzioni sintassi

• in maiuscolo i token
• in minuscolo i termini in ambiente embedded
• prefissati ':' i termini in ambiente host

  Termini in ambiente embedded

• il.esql.QCursor c1
• il.esql.QStatement s1

  Termini in ambiente host

• il.esql.QDescriptor sqlda
• il.data.QData v1
• il.data.QDataStructure ds

  Istruzioni da supportare

  SELECT

• [x] SELECT A, B, C INTO :v1, :v2, :v3 FROM FILE00
• [x] SELECT * INTO :ds FROM FILE00
• [x] SELECT BRARTI0F.* INTO :ds FROM FILE00
• [x] SELECT BRARTI0F.*, V5RDOC0F INTO :ds FROM file
• [x] SELECT :v1, SUM(:v2) as TOTPES INTO :ds FROM FILE00 GROUP BY :v1 HAVING SUM(:v2) >= 1000 ORDER BY :v3 DESC

  SET

• [x] SET TRANSACTION ISOLATION LEVEL NO COMMIT

  EXECUTE

• [x] EXECUTE s1
• [x] EXECUTE IMMEDIATE :v1

  OPEN

• [x] OPEN c1
• [x] OPEN c1 USING :v1
• [x] OPEN c1 USING DESCRIPTOR :sqlda

  PREPARE

• [x] PREPARE s1 FROM :v1
• [x] PREPARE s1 INTO :sqlda USING NAMES FROM :v1
• [x] PREPARE s1 INTO :sqlda USING SYSTEM NAMES FROM :v1
• [x] PREPARE s1 INTO :sqlda USING LABELS FROM :v1
• [x] PREPARE s1 INTO :sqlda USING ANY FROM :v1
• [x] PREPARE s1 INTO :sqlda USING BOTH FROM :v1
• [x] PREPARE s1 INTO :sqlda USING ALL FROM :v1

  DECLARE

• [x] DECLARE c1 CURSOR FOR (SELECT A, B, C FROM FILE)
• [x] DECLARE c1 SCROLL CURSOR FOR (SELECT A, B, C FROM FILE)
• [x] DECLARE c1 DYNAMIC SCROLL CURSOR FOR (SELECT A, B, C FROM FILE)
• [x] DECLARE c1 CURSOR WITH HOLD FOR (SELECT A, B, C FROM FILE)
• [x] DECLARE c1 CURSOR FOR s1

tra parenti oggetti di tipo dml -> QStatement

DESCRIBE

• [x] DESCRIBE s1 INTO :sqlda USING NAMES
• [x] DESCRIBE s1 INTO :sqlda USING SYSTEM NAMES
• [x] DESCRIBE s1 INTO :sqlda USING LABELS
• [x] DESCRIBE s1 INTO :sqlda USING ANY
• [x] DESCRIBE s1 INTO :sqlda USING BOTH
• [x] DESCRIBE s1 INTO :sqlda USING ALL

  FETCH

• [x] FETCH NEXT FROM c1 INTO :ds
• [x] FETCH PRIOR FROM c1 INTO :v1
• [x] FETCH FIRST FROM c1 INTO :v1
• [x] FETCH LAST FROM c1 INTO :v1
• [x] FETCH CURRENT FROM c1 INTO :ds
• [x] FETCH RELATIVE 1 FROM c1 INTO :v1
• [x] FETCH NEXT FROM c1 FOR 1 ROWS INTO :v1
• [x] FETCH NEXT FROM c1 FOR 1 ROWS USING DESCRIPTOR :sqlda INTO :ds
• [x] FETCH NEXT FROM c1

  CLOSE

• [x] CLOSE c1

  Variazione al modello db.core.dml

• [ ] EmbeddedQuerySelect -> ExtendedQuerySelect
• QString qTarget

Per altre istruzioni consultare il membro MUSER_XX nel file sorgente MUSRC nella libreria P_MULT