« ferramentas progress modernaças | Entrada | prova de contacto 4 »
abril 01, 2005
Writing Modern Progress
C1350-LV Its Not Your Father’s 4GL
apresentação sobre como aplicar novos métodos de programação no ambiente progress.
gostei principalmente deste bocado de código
Def input parameter tablename as char no-undo.
Def input parameter wherestring as char no-undo.
Def input parameter sortby as char no-undo.
Def var qrystring as char no-undo.
…
Create buffer hbuf for table tablename.
Hqry:add-buffers(hbuf).
Qrystring = “ for each “ + tablename + “no-lock” +
+ wherestring + sortby.
Hqry:query-prepare(qrystring).
Hqry:query-open.
Writing Modern Progress: Techniques for using the 4GL in OpenEdge.
Publicado por vitorsilva às abril 1, 2005 09:39 AM