Loops/While: Difference between revisions

(→‎{{header|Dc}}: replaced do/until answer with a while example)
Line 2,100:
With SQL PL:
<lang sql pl>
--#SET TERMINATOR @
 
SET SERVEROUTPUT ON @
 
Line 2,116 ⟶ 2,118:
DB20000I The SET SERVEROUTPUT command completed successfully.
db2 => BEGIN
...
db2 (cont.) => DECLARE I SMALLINT DEFAULT 1024;
db2 (cont.) =>
db2 (cont.) => Loop: WHILE (I > 0) DO
db2 (cont.) => CALL DBMS_OUTPUT.PUT_LINE(I);
db2 (cont.) => SET I = I / 2;
db2 (cont.) => END WHILE Loop;
db2 (cont.) => END @
DB20000I The SQL command completed successfully.
Anonymous user