I obcs_file, obcsmask, nNz,
CHARACTER*(MAX_LEN_FNAM) obcs_file
IF ( obcs_file .NE. ' ' ) THEN
I obcs_file,
I obcs_file, obcsmask,
CHARACTER*(128) obcs_file