> I was asking where I would find the "little blinking numbers"

I've got a list from "IBM 3180 Model 2 Display Station User's Guide"
GA21-9469-2, Chapter 3. Error Codes And Recovery Procedures. AFAIK,
the book is not available in any but print form, I've found mine in
one of those boxes filled with dust in a conner of our computer room.
I could type the text as is from the book, but the following fragment
of code could be all you need for operator keying errors:


  { Operator keying error numbers }

  KErrHelpWithNoErrorCode                        = 0;
  KErrCannotKeepUpWithYou                        = 1;
  KErrInvalidKeyCode                             = 2;
  KErrNoInputAllowedIntoTheField                 = 4;
  KErrNoInputAllowedInProtectedArea              = 5;
  KErrInvalidKeyWhileInSysReq                    = 6;
  KErrMustFillInBeforeNextScreen                 = 7;
  KErrOnlyAlphaAllowed                           = 8; { A-Z, blank,
hyphen }
  KErrOnlyNumericAllowed                         = 9; { 0-9, blank,
                                                        period, plus,
minus }
  KErrOnlySignedNumericAllowed                   = 10; { 0-9 }
  KErrNoDataInLastPositionOfSignedNumericAllowed = 11;
  KErrNoMoreRoomInThisField                      = 12;
  KErrCannotLeaveWithInsertOn                    = 13;
  KErrMandatoryFillField                         = 14;
  KErrSelfCheckField                             = 15;
  KErrFildMinusNotAllowedInThisField             = 16;
  KErrFieldExitBeforeMandatoryFillSatisfied      = 17;
  KErrUseFieldExitToLeaveTheField                = 18;
  KErrDupNotAllowedInThisField                   = 19;
  KErrTheKeyNotAllowedInThisField                = 20;
  KErrMandatoryEnterField                        = 21;
  KErrFieldStatusUnknown                         = 22;
  KErrInvalidHexKey                              = 23;
  KErrLastPositionMustBe0To9InThisField          = 26;
  KErrKeyNotUsedByThisStation                    = 27;
  KErrKeyNotUsedByThisStation2                   = 28;
  KErrInvalidSecondKeyForDiacriticKeyFunction    = 29;

You surely don't have to implement all of them. You just display the
number as Mark suggested on the error line and send that number while
processing KeyHelp in PreHelp error state. AS/400 will send you your
full error message while placing the terminal in PostHelp state. It's
a bit of a bugger to rap your head around it first, but when it's
done, it works flawlessly. Also if you implement it for operator key
errors listed above, you can just do 5250 stream parsing errors


from 5494 Remote Control Unit Functions Ref

the same way, thus making emulator error proof since it makes AS/400
responsibility to handle ALL errors.

> and
> how to tell which one to put in the corner, not how to send the help
> sequence.

As I've mentioned earlier, my const declarations should be descriptive
enough (I hope <g>) otherwise, I could probably type those couple
pages from the manual in for you.

> I decided to forego having those numbers blink in the corner, and
> display the human-readable error message immediately.

You could do that too <g> ...


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2021 by and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.