Lines Matching refs:SRNAMT
113 CHARACTER*6 SRNAMT variable
116 COMMON /SRNAMC/SRNAMT local
293 SRNAMT = SNAMES( ISNUM )
2335 SUBROUTINE CCHKE( ISNUM, SRNAMT, NOUT ) argument
2349 CHARACTER*6 SRNAMT local
2376 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2379 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2382 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2385 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2388 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2391 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 )
2404 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2407 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2410 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2413 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2416 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2420 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2423 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2426 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2429 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2432 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2436 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2439 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2442 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2445 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2448 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2451 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2455 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2458 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2461 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2464 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2468 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2471 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2474 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2477 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2480 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2483 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2487 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2490 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2493 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2496 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2499 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2502 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2505 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2509 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2512 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2515 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2518 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2521 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2525 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2528 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2531 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2534 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2537 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2540 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2544 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2547 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2550 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2553 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2556 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2559 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2562 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2566 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2569 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2572 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2575 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2578 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2582 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2585 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2588 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2591 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2594 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2598 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2601 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2604 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2607 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2610 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2614 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2617 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2620 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2623 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2627 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2630 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2633 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2637 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2640 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2643 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2646 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2649 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2653 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2656 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2659 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2662 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2665 WRITE( NOUT, FMT = 9999 )SRNAMT
2667 WRITE( NOUT, FMT = 9998 )SRNAMT
3160 SUBROUTINE CHKXER( SRNAMT, INFOT, NOUT, LERR, OK ) argument
3173 CHARACTER*6 SRNAMT local
3176 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3211 CHARACTER*6 SRNAMT local
3214 COMMON /SRNAMC/SRNAMT local
3225 IF( SRNAME.NE.SRNAMT )THEN
3226 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT