Lines Matching refs:SRNAMT
109 CHARACTER*6 SRNAMT
112 COMMON /SRNAMC/SRNAMT
288 SRNAMT = SNAMES( ISNUM )
2286 SUBROUTINE DCHKE( ISNUM, SRNAMT, NOUT )
2300 CHARACTER*6 SRNAMT
2326 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2329 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2332 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2335 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2338 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2341 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2345 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2348 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2351 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2354 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2357 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2360 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2363 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2366 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2370 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2373 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2376 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2379 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2382 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2386 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2389 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2392 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2395 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2398 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2401 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2405 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2408 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2411 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2414 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2418 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2421 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2424 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2427 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2430 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2433 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2437 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2440 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2443 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2446 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2449 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2452 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2455 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2459 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2462 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2465 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2468 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2471 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2475 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2478 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2481 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2484 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2487 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2490 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2494 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2497 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2500 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2503 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2506 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2509 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2512 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2516 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2519 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2522 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2525 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2528 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2532 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2535 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2538 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2541 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2544 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2548 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2551 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2554 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2557 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2561 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2564 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2567 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2571 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2574 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2577 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2580 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2583 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2587 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2590 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2593 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2596 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2599 WRITE( NOUT, FMT = 9999 )SRNAMT
2601 WRITE( NOUT, FMT = 9998 )SRNAMT
3057 SUBROUTINE CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
3070 CHARACTER*6 SRNAMT
3073 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3108 CHARACTER*6 SRNAMT
3111 COMMON /SRNAMC/SRNAMT
3122 IF( SRNAME.NE.SRNAMT )THEN
3123 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT