Symbol Description Uses
caller_sub name of subroutine which is calling this S/R 10


File Line number Procedure Code
./model/src/packages_unused_msg.F 103 PACKAGES_UNUSED_MSG 
           WRITE(msgBuf,'(5A)') '** Warning ** ', caller_sub(1:iLen2),
./model/src/packages_unused_msg.F 107 PACKAGES_UNUSED_MSG 
           WRITE(msgBuf,'(5A)') '** Warning ** ', caller_sub(1:iLen2),
./model/src/packages_unused_msg.F 48 PACKAGES_UNUSED_MSG 
      CHARACTER*(MAX_LEN_MBUF) caller_sub
./model/src/packages_unused_msg.F 56 PACKAGES_UNUSED_MSG 
      WRITE(caller_sub,'(A)') ' '
./model/src/packages_unused_msg.F 76 PACKAGES_UNUSED_MSG 
        WRITE(caller_sub,'(2A)') pkgUpc(1:iLen), '_READPARMS'
./model/src/packages_unused_msg.F 79 PACKAGES_UNUSED_MSG 
        WRITE(caller_sub,'(2A)') sr_name(1:iLen2)
./eesupp/src/open_copy_data_file.F 10 OPEN_COPY_DATA_FILE 
     I                                data_file, caller_sub,
./eesupp/src/open_copy_data_file.F 113 OPEN_COPY_DATA_FILE 
       WRITE(msgBuf,'(A,A)') 'S/R CALLED BY ',caller_sub
./eesupp/src/open_copy_data_file.F 37 OPEN_COPY_DATA_FILE 
      CHARACTER*(*) caller_sub
./eesupp/src/open_copy_data_file.F 75 OPEN_COPY_DATA_FILE 
       WRITE(msgBuf,'(A,A)') 'S/R CALLED BY ',caller_sub