Example: Embed SQL statements in RPG/400 applications that use SQL

An UPDATE statement coded in an RPG/400® program might be coded as this example shows.

*...1....+....2....+....3....+....4....+....5....+....6....+....7...*
C/EXEC SQL UPDATE DEPARTMENT
C+           SET MANAGER = :MGRNUM
C+           WHERE DEPTNO = :INTDEP
C/END-EXEC