Comet32 NUM problem

[ Follow Ups ] [ Post Followup ] [ Signature.net Forum ]

Posted by Grant Foraker on August 11, 2015 at 14:30:20:

Exported a PDF to TXT via Adobe so I could parse out the important stuff. Crummy output :(

Trying to use NUM to sort out the junk lines.

-------------------------------
LET DATA$ = STRIP(DATA$)
IF STRIP(DATA$) EQ '' GOTO PDF10 ! BLANK LINE
IF SUB(DATA$,1,5) EQ '-----' GOTO PDF10
IF SUB(DATA$,1,1) EQ '@0C@' GOTO PDF10

IF SUB(DATA$,1,3) EQ '***'
LET DATA$ = SUB(DATA$,4,252)
LET DATA$ = STRIP(DATA$)
ENDIF

LET Y = NUM(SUB(DATA$,1,2),ERR)
IF ERR EQ 1 GOTO PDF10 ! NOT EARNINGS
---------------
NUM isn't giving me an error when the tested data is "--" or "@0C@".

Had to add extra logic to filter those lines out.

Follow Ups:


Post a Followup

Name:
E-Mail:

Subject:

What is the name of the main Signature System's Product?  

Comments:

Optional Link URL:
Link Title:
Optional Image URL:

You may attach up to 5 files to your followup (see below):





Each file can be a maximum of 1MB in length Uploaded files will be purged from the server on a regular basis.

[ Follow Ups ] [ Post Followup ] [ Signature.net Forum ]