Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Integer-comparison/RPG/integer-comparison.rpg
+++ b/Task/Integer-comparison/RPG/integer-comparison.rpg
@ -0,0 +1,22 @@
+     h dftactgrp(*no)
+
+     d                 pi
+     d integer1                      10i 0
+     d integer2                      10i 0
+
+     d message         s             50a
+
+       if integer1 < integer2;
+         message = 'Integer 1 is less than integer 2';
+       endif;
+
+       if integer1 > integer2;
+         message = 'Integer 1 is greater than integer 2';
+       endif;
+
+       if integer1 = integer2;
+         message = 'Integer 1 is equal to integer 2';
+       endif;
+
+       dsply message;
+       *inlr = *on;