shr_stream_getCurrFile Subroutine

public subroutine shr_stream_getCurrFile(strm, fileopen, currfile, currpioid)

Arguments

Type	Intent	Optional	Attributes		Name
type(shr_stream_streamType),	intent(in)			::	strm
logical,	intent(out),	optional		::	fileopen
character(len=*),	intent(out),	optional		::	currfile
type(File_desc_t),	intent(out),	optional		::	currpioid