Error in ProcessFontDescriptorDictionary

LeeC — Wed, 23 Jun 2010 01:11:35 +0000

Approximately line 2076 in PDFextract.p ProcessFontDescriptorDictionary:

IF ENTRY(4, text-temp, " ") = "R" THEN DO:
curr-ptr = SEEK(INPUT).

This will error out when text-temp contains less than 4 " " delimited entries.

I changed it to:

IF NUM-ENTRIES(text-temp, " ") > 3
AND ENTRY(4, text-temp, " ") = "R" THEN DO:
curr-ptr = SEEK(INPUT).

Has anyone else run into this or is it something unique to my environment?

TIA.

The OpenEdge Hive - pdfinclude error ProcessFontDescriptorDictionary PDFextract.p