Lines Matching refs:SRNAMT
140 CHARACTER*6 SRNAMT variable
143 COMMON /SRNAMC/SRNAMT local
314 SRNAMT = SNAMES( ISNUM )
1988 SUBROUTINE ZCHKE( ISNUM, SRNAMT, NOUT ) argument
2009 CHARACTER*6 SRNAMT local
2047 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2050 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2053 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2056 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2059 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2062 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2065 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2068 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2071 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2074 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2077 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2080 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2083 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2086 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2089 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2092 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2095 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2098 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2101 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2104 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2107 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2110 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2113 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2116 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2119 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2122 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2125 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2128 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2131 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2134 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2137 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2140 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2143 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2146 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2149 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2152 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2155 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2158 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2161 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2164 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2167 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2170 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2173 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2176 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2179 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2182 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2185 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2188 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2191 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2194 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2197 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2200 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2203 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2206 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2209 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2212 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2215 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2218 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2221 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2224 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2228 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2231 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2234 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2237 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2240 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2243 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2246 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2249 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2252 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2255 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2258 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2261 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2264 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2267 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2270 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2273 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2276 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2279 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2282 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2285 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2288 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2291 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2295 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2298 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2301 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2304 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2307 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2310 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2313 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2316 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2319 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2322 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2325 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2328 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2331 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2334 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2337 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2340 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2343 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2346 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2349 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2352 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2355 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2358 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2362 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2365 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2368 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2371 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2374 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2377 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2380 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2383 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 )
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 )
2419 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2422 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2425 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2428 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2431 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2434 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 )
2458 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2461 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2464 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2467 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2470 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2473 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2476 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2479 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2482 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2485 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2488 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2491 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 )
2515 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 )
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 )
2543 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2546 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2549 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2552 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2555 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2558 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 )
2570 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2573 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2576 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2579 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 )
2597 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2600 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2603 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2606 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2609 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2612 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2615 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2618 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2621 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2624 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 )
2636 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2639 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2642 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2645 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2648 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2651 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2654 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2657 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2660 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2663 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2666 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2669 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2672 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2676 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2679 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2682 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2685 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2688 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2691 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2694 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2697 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2700 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2703 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2706 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2709 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2712 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2715 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2718 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2721 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2724 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2727 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2731 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2734 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2737 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2740 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2743 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2746 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2749 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2752 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2755 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2758 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2761 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2764 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2767 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2770 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2773 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2776 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2779 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2782 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2786 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2789 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2792 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2795 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2798 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2801 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2804 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2807 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2810 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2813 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2816 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2819 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2822 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2825 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2828 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2831 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2834 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2837 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2840 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2843 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2846 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2849 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2853 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2856 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2859 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2862 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2865 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2868 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2871 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2874 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2877 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2880 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2883 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2886 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2889 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2892 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2895 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2898 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2901 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2904 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2907 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2910 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2913 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2916 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2919 WRITE( NOUT, FMT = 9999 )SRNAMT
2921 WRITE( NOUT, FMT = 9998 )SRNAMT
3417 SUBROUTINE CHKXER( SRNAMT, INFOT, NOUT, LERR, OK ) argument
3432 CHARACTER*6 SRNAMT local
3435 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3472 CHARACTER*6 SRNAMT local
3475 COMMON /SRNAMC/SRNAMT local
3486 IF( SRNAME.NE.SRNAMT )THEN
3487 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT