// JOB   ADD2KCOS                                                       ADD00010
// WRTBIG 'JOB$'                                                        ADD00020
// COS2KADD                                                             ADD00030
/&                                                                      ADD00040
