/*Abend THE version 3.2B for Win32 6/08/2004, Regina 3.3(MT) 5.00 4/25/2004 */ /* parse source . . me . */ /*parse source here doesn't cause abend*/ parse arg str if str = "" then x = abendB('next call') parse source . . me . /*parse source here causes abend*/ return 0