AS/400 - Manual Sobre select, update, insert, delete

   
Vista:

Manual Sobre select, update, insert, delete

Publicado por andres segundo (6 intervenciones) el 13/09/2012 21:10:00
Buenas tardes,

Necesito por ravor, un manual donde pueda aprender un poco de mas comandos SQL desde RPGILE,

Por ejemplo

* Definición y apertura de Cursor
C/Exec Sql
C+ Declare WSP47 Cursor for
C+ SELECT
C+ A.TRE121, A.MEI121, A.MES121, C.F01CAQ, SUM(A.KIL121)
C+ FROM "SP0121" A,
C+ "SP0110" B,
C+ "SP0001" C
C+ WHERE (NOT(TRE121 = 0 AND MEI121 = 0 AND MES121 = 0)
C+ AND (FEC121 >= :PFED)
C+ AND (FEC121 <= :PFEH)
C+ AND (:SELTRE = 0 OR TRE121 = :SELTRE)
C+ AND (:SELSEC = 0 OR SEC121 = :SELSEC)
C+ AND (:SELCEN = 0 OR CEN121 = :SELCEN))
C+ AND (ORD121 = ORD110)
C+ AND (ITE121 = ITE110)
C+ AND (ART110 = F01COD)
C+ GROUP BY A.TRE121, A.MEI121, A.MES121, C.F01CAQ
C+ ORDER BY A.TRE121, A.MEI121, A.MES121, C.F01CAQ
C+ For Fetch Only
C/End-Exec
C/Exec Sql
C+ Open WSP47
C/End-Exec
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder