ON ERROR DO ERRHAND WITH ; ERROR( ), MESSAGE( ), MESSAGE(1), PROGRAM( ), LINENO( ) PROCEDURE ERRHAND PARAMETER MERROR, Mess, MESS1, MPROG, MLINENO MESSAGEBOX('Error number: ' + Ltrim(Str(MERROR)) + Chr(13) + ; 'ERROR MESSAGE: ' + Mess + Chr(13) + ; 'LINE OF CODE WITH ERROR: ' + MESS1 + Chr(13) + ; 'LINE NUMBER OF ERROR: ' + Ltrim(Str(MLINENO)) + Chr(13) + ; 'PROGRAM WITH ERROR: ' + MPROG, ; 48, _SCREEN.CAPTION)But when some error occours, a screen appears as