To accomodate such needs, SREhttp/2 can be told to call up to five post-response procedures. As with the pre-response procedure, these post-response procedures are custom designed REXX procedures.
Note: |
The post-response procedure(s) are called after a response
has been sent to the client.
Therefore, you can not use a post-response procedure to modify the response sent to the client! |
parse arg request_line,source,sel0,seluse2,reqnum,user , , fileused,rcode,host_nickname,id_info,post_response foo=sre_pmprintf( "") foo=sre_pmprintf("For request number "reqnum,1) foo=sre_pmprintf(" : Original request_line= " ||request_line,1) foo=sre_pmprintf(" : Host nickname= "host_nickname,1) foo=sre_pmprintf(" : Source= "source,1) foo=sre_pmprintf(" : Selector (after URL-decoding)=" sel0,1) foo=sre_pmprintf(" : Selector after redirection=" seluse2,1) foo=sre_pmprintf(" : User= " user,1) foo=sre_pmprintf(" : FileUsed = " fileused,1) foo=sre_pmprintf(" : Response code: " rcode,1) foo=sre_pmprintf(" : Post_Response: "||post_response,1) foo=sre_pmprintf(" : ID_INFO: "||left(id_info,80)||' ...',0) foo=sre_pmprintf(" ") return 0SREhttp/2 comes with several post-response procedures, all of them are stored in the SREHTTP2\PROCS directory: