// JOB   PRP2KCOS                                                       PRP00010
// WRTBIG 'JOB$'                                                        PRP00020
// COS2PREP                                                             PRP00030
/&                                                                      PRP00040
