>The ERROR is
>"1 File 'lockrec.prg' does not exist. 136 SHIPPING_MAIN.DESTROY"
>
>Exercpt of the code..................

>  else
>        repo form ship2 to prin
>     endi
>      NEXT                    &&TYPE P:&FF TO PRIN
>    ENDI
>
>     SET CONS ON
>     SET PRIN TO
>     SET PRIN OFF
>                       LINE 136 is HERE!
>MACT = 'SHIPSRC0-2001'
>USE &LD:JONTRANS
>APPE BLAN
>DO LOCKREC

You might want to try COMPILE FORM myForm -- it sounds like the object and source code may have gotten out of sync somehow.