CIPRIME CNB0                                                            CNB0        1
      COMMON /B0C/ ITITLE(6,20),ITEXT(20),ICASID(3)                     CNB0        2
      COMMON /B0/ ISWTEX(20),JTEXT(20),LDATE(3)                         CNB0        3
     &,NGENO,NGCOSO,NGOVVO,NGENSO,NGENYO,NMOTRO,NSVCO,NCONVO            CNB0        4
     &,NLOADO,NLINEO,NINTEO,IPRTSW,NDVOLO,NUDCO,NUEXCO                  CNB0        5
     &,NUPSSO,NUUELO,NUGOVO,NUSVCO,NURANO,NUSTCO,NUSPSO,NUSDBO          CNB0        6
     &,NFFBCO,NFBOUT,NPWRO,NCANO,NBWROT                                 CNB0        7
