Conference acadmy::tpas_notes

52.0. "Calling PAS_CALC_TRNSFR_PRC causes crash" by FUTURS::TON () Thu Dec 15 1994 09:07

Same environment as 50.0, 51.0


SKNEES::TON> run tpas_demosite_basic/NODEB
 
PART NUMBER ? VSXXX-AA
SHIP FROM   ? AY
SHIP From Type (S/P/T/B) ? P
SHIP TO     ? AUI
SHIP To Type (S/P/T/B) ? B
Order MLP or return    ? 100
Local Standard Cost or return    ? 12
Shipment Type (01,02,03,04)? 01



%COB-F-INVDECDIG, invalid decimal digit: "A"
%TRACE-F-TRACEBACK, symbolic stack dump follows
module name     routine name                     line       rel PC    abs PC

                                                           000672AA  000672AA
----- above condition handler called with exception 00198224:
%COB-F-INVDECDIG, invalid decimal digit: "A"
----- end of exception message
                                                           000672AA  000672AA
----- above condition handler called with exception 00198224:
%COB-F-INVDECDIG, invalid decimal digit: "A"
----- end of exception message
                                                           0008E641  0008E641
TPAS_CALC_TRNSF TPAS_CALC_TRNSFR_PRC                       00000720  00005B94
TPAS_DEMOSITE_B TPAS_DEMOSITE_BASIC$MAIN          153      0000051F  00004D1F
TPAS_DEMOSITE_B TPAS_DEMOSITE_BASIC$MAIN           88      000000AD  000048AD

I used the TPAS_DEMOSITE_BASIC.BAS supplied in the kit and got the above. I 
tried putting some error trapping into  TPAS_DEMOSITE_BASIC, but because
TPAS_CALC_TRNSFR_PRC crashes,  control never returns to
TPAS_DEMOSITE_BASIC.

I understand that 'AUI' and 'B' are not valid, but I would not expect the
routine to crash. I was expecting an error condition and message to be
returned.

Have I done something wrong?

george ton
TOLAS Development

Will add this to the .1 release list.
Looking at the test plans/results here, it was just tested passing in
0 through 9 for billing codes.

Thanks

OK, I will build in a test before I call TPAS_CALC_TRNSFR_PRC until we
get .1 (has it been scheduled yet?).

Am I correct in assuming that TPAS_CALC_TRNSFR_PRC has no global catch-all
error handler to cope with errors not specifically coded for?

george

I have encountered another crash. I was moving the TPAS data directory, but
incorrectly defined the TPAS$DATA logical. When I ran TPAS_DEMOSITE, it
crashed with


%COB-F-ERRON_FIL, error on file USER2:[TPAS.DATA]TPAS_AUDIT_TRAIL.DAT;
-RMS-E-DNF, directory not found
-SYSTEM-W-NOSUCHFILE, no such file
%TRACE-F-TRACEBACK, symbolic stack dump follows
module name     routine name                     line       rel PC    abs PC

                                                           0004BF43  0004BF43
TPAS_CALC_TRNSF TPAS_CALC_TRNSFR_PRC                       00000212  00005FB6
DEMOSITE        DEMOSITE                          216      000004F6  000058F6


I would have expected TPAS_CALC_TRNSFR_PRC to return a 'F' status, along
with the appropriate VMS status.

What is happening here?
Also, please answer my question in 52.2.

george ton
TOLAS development

George,

I will post this a a PCR. This should be captured and a fatal error should be 
returned.
 
I appreciate the feedback, you are doing a great job and should have been 
our 2nd test site !
Lois