... cDelm2 ) .OR. cDelm2 == CRLF ) // A517..21 IF cDelm1 $ cUpStr nPos1 := AT( cDelm1, cUpStr ) + LEN( cDelm1 ) IF cDelm2 $ SUBS( cUpStr, nPos1 ) inkey(.8) nPos2 := HL_PAT( nPos1, cDelm2, cUpStr ) cRVal := SUBS( cUpStr, nPos1, nPos2-nPos1 ) cUpStr := SUBS( cUpStr, 1, nPos1 - LEN( cDelm1 ) - 1 ...