S
PL_
PL_
PL_GET_HDR{%}FROM{%}{WTHEN\ELSE}
*
      R$$$ = ''
      LOCATE({%2},ST$HTTP.HDR,1;L$$$) THEN
         I1$$$ = DCOUNT(ST$HTTP.VAL<1,L$$$>,SVM)
         FOR I$$$ = 1 TO I1$$$
            R$$$<-1> = ST$HTTP.VAL<1,L$$$,I$$$>
         NEXT I$$$
      END
*
      IF R$$$ <> '' THEN
         {%1} = R$$$
      END
*
      IF R$$$ <> '' {%3}
