summaryrefslogtreecommitdiffstats
path: root/copy/cepis-http.cpy
diff options
context:
space:
mode:
authorMurilo Ijanc <[email protected]>2026-07-26 12:49:48 -0300
committerMurilo Ijanc <[email protected]>2026-07-26 12:49:48 -0300
commitf979d07d23098b96e758b3feb555cd06d85d9b2d (patch)
tree47298197a17a3d6c438a1f4cc7cb61afd390cf05 /copy/cepis-http.cpy
downloadcobol-f979d07d23098b96e758b3feb555cd06d85d9b2d.tar.gz
Initial importv0.1.0
Diffstat (limited to 'copy/cepis-http.cpy')
-rw-r--r--copy/cepis-http.cpy17
1 files changed, 17 insertions, 0 deletions
diff --git a/copy/cepis-http.cpy b/copy/cepis-http.cpy
new file mode 100644
index 0000000..5868ed2
--- /dev/null
+++ b/copy/cepis-http.cpy
@@ -0,0 +1,17 @@
+*> ---------------------------------------------------------------------
+*> Internal layouts shared between CEPIS-REQUEST and its callers. Not
+*> part of the public surface; nothing outside this library needs it.
+*>
+*> HTTP-BODY is fixed at 256 KiB. A response larger than that is reported
+*> as CEPIS-INVALID-RESPONSE rather than being silently cut: 500 CSV rows
+*> come to roughly 60 KiB, so the margin is wide.
+*> ---------------------------------------------------------------------
+01 CEPIS-HTTP-REQUEST.
+ 05 HTTPQ-PATH PIC X(8192).
+ 05 HTTPQ-PATH-LEN PIC 9(9).
+ 05 HTTPQ-ALLOW-503 PIC X.
+
+01 CEPIS-HTTP-RESPONSE.
+ 05 HTTP-STATUS PIC 9(3).
+ 05 HTTP-BODY-LEN PIC 9(9).
+ 05 HTTP-BODY PIC X(262144).