D checkCust       PR              N
     D   custID                       8A   Const

     D deleteCust      PR              N
     D   custID                       8A   Const