lnPosition = ATC("TAG", tcIndex) IF lnPosition != 0 *--- Get a substring of the INDEX command...from TAG, forward lcTagString = SUBSTR(tcIndex, lnPosition)to
lnPosition = ATC(" TAG ", tcIndex) IF lnPosition != 0 *--- Get a substring of the INDEX command...from TAG, forward lcTagString = SUBSTR(tcIndex, lnPosition+1)and
tcIndex = STUFF(tcIndex, lnPosition+lnStartTagName+lnSpaceAfterTagName-1, 0, "OF (CDX(1)) ")to
tcIndex = STUFF(tcIndex, lnPosition+lnStartTagName+lnSpaceAfterTagName-1, 0, " OF (CDX(1)) ")