Mars Planet Webshop intro page

Sorry, there is no return ticket back to Earth...

The session id is written on this page in the cookie.

Mars Planet Webshop start page

Implement this section, if you want to set a cookie. *>------------------------------------------------------------------------------ HTM2COB-SET-COOKIE SECTION. *>------------------------------------------------------------------------------ *> create session-id PERFORM HTM2COB-GET-SESS-ENV-PARAMS PERFORM HTM2COB-CREATE-SESSION-ID *> save session-id in cookie INITIALIZE LNK-HTM2COB-SET-COOKIE SET V-SET OF LNK-COOKIE-FUNC OF LNK-HTM2COB-SET-COOKIE TO TRUE MOVE "SESSIONID" TO LNK-COOKIE-NAME OF LNK-HTM2COB-SET-COOKIE MOVE HTM2COB-HIDDEN-SESSION-ID TO LNK-COOKIE-VALUE OF LNK-HTM2COB-SET-COOKIE MOVE 1800 TO LNK-MAX-AGE-SEC OF LNK-HTM2COB-SET-COOKIE MOVE "localhost" TO LNK-DOMAIN-VALUE OF LNK-HTM2COB-SET-COOKIE MOVE "/" TO LNK-PATH-VALUE OF LNK-HTM2COB-SET-COOKIE SET V-YES OF LNK-HTTPONLY-FLAG OF LNK-HTM2COB-SET-COOKIE TO TRUE SET V-YES-LAX OF LNK-SAMESITE-FLAG OF LNK-HTM2COB-SET-COOKIE TO TRUE CALL "HTM2COB-SET-COOKIE" USING LNK-HTM2COB-SET-COOKIE END-CALL *> The last DISPLAY in this section is always with "WITH NO ADVANCING" DISPLAY FUNCTION TRIM(LNK-COOKIE-STR OF LNK-HTM2COB-SET-COOKIE) WITH NO ADVANCING END-DISPLAY EXIT SECTION . ?>