| File |
Line number |
Procedure |
Code |
|
./pkg/mdsio/mdsio_check4file.F |
100 |
MDS_CHECK4FILE |
& filePfx(1:ip), '.', iG, '.', jG, fileSfx(1:is) |
|
./pkg/mdsio/mdsio_check4file.F |
108 |
MDS_CHECK4FILE |
& filePfx(1:ip), '.001.001', fileSfx(1:is) |
|
./pkg/mdsio/mdsio_check4file.F |
111 |
MDS_CHECK4FILE |
& filePfx(1:ip), '.001.001', fileSfx(1:is) |
|
./pkg/mdsio/mdsio_check4file.F |
117 |
MDS_CHECK4FILE |
ip = MAX(ILNBLNK(filePfx),1) |
|
./pkg/mdsio/mdsio_check4file.F |
128 |
MDS_CHECK4FILE |
& filePfx(1:ip), ' , ', fileSfx(1:is), ' , ', fileName(1:i) |
|
./pkg/mdsio/mdsio_check4file.F |
12 |
MDS_CHECK4FILE |
I filePfx, fileSfx, prtID, |
|
./pkg/mdsio/mdsio_check4file.F |
39 |
MDS_CHECK4FILE |
CHARACTER*(*) filePfx, fileSfx, prtID |
|
./pkg/mdsio/mdsio_check4file.F |
64 |
MDS_CHECK4FILE |
ip = ILNBLNK(filePfx) |
|
./pkg/mdsio/mdsio_check4file.F |
83 |
MDS_CHECK4FILE |
WRITE(fileName,'(A)') filePfx(1:ip) |
|
./pkg/mdsio/mdsio_check4file.F |
88 |
MDS_CHECK4FILE |
WRITE(fileName,'(2A)') filePfx(1:ip), fileSfx(1:is) |
|
./pkg/mdsio/mdsio_check4file.F |
97 |
MDS_CHECK4FILE |
& filePfx(1:ip), '.', iG, '.', jG, fileSfx(1:is) |