;+
; Project     : SOLAR-B - EIS
;
; Name        : EIS_CPT_PARSE_ORL_C
;
; Purpose     : Parses an orl c. command.
;
; Explanation : Parses an orl c. command.
;
; Use         : < result = eis_cpt_parse_orl_c ( operand ) >
;
; Inputs      : operand : STRING operand
;
; Opt. Inputs : None.
;
; Outputs     : result   : INT flag :
;                            1 : processed OK.
;                            0 : processing failed.
;
; Opt. Outputs: None.
;
; Keywords    : None.
;
; Calls       : None.
;
; Common      : None.
;
; Restrictions: None.
;
; Side effects: May output ASCII files.
;
; Category    : EIS_CPT.
;
; Prev. Hist. : None.
;
; Written     : Martin Carter RAL 11/05/07
;
; Modified    : Version 0.0, 11/05/07, MKC
;
; Version     : 0.0, 11/05/07
;-
;**********************************************************

FUNCTION eis_cpt_parse_orl_c, operand

  ; decipher string operand

  IF NOT STREGEX(operand, '^[''|"][^''"]*[''|"]$', /BOOLEAN) THEN BEGIN

    eis_cpt_message, 'ERROR, INVALID STRING OPERAND', /INFORMATIONAL

    GOTO, error

  ENDIF

  RETURN, 1

error :

  ; issue routine name

  MESSAGE, 'ERROR', /INFORMATIONAL

  ; return error flag

  RETURN, 0

END