Data update

2026-04-30 12:34:36 -04:00 · 2026-04-30 12:34:36 -04:00 · cbaf4c4b64
commit cbaf4c4b64
parent 4bb20c9b71
12390 changed files with 318560 additions and 27248 deletions
--- a/Task/Environment-variables/COBOL/environment-variables.cob
+++ b/Task/Environment-variables/COBOL/environment-variables.cob
@ -0,0 +1,18 @@
+       IDENTIFICATION DIVISION.
+       PROGRAM-ID. Environment-Vars.
+
+       DATA DIVISION.
+       WORKING-STORAGE SECTION.
+       01  home PIC X(75).
+
+       PROCEDURE DIVISION.
+*          *> Method 1.
+           ACCEPT home FROM ENVIRONMENT "HOME"
+           DISPLAY home
+
+*          *> Method 2.
+           DISPLAY "HOME" UPON ENVIRONMENT-NAME
+           ACCEPT home FROM ENVIRONMENT-VALUE
+
+           GOBACK
+           .