*> --------------------------------------------------------------------- *> 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).