{
{    The purpose of this procedure is to obtain the information associated with
{ an application defined with either DEFINE_APPLICATION_RPC or
{ DEFINE_CLIENT_APPLICATION_RPC.  This routine is only available from ring 3.
{ Currently the only information particular to an application is the sequence
{ pointer defined on the DEFINE_APPLICATION_RPC or
{ DEFINE_CLIENT_APPLICATION_RPC manage_file_server subcommands.  If the
{ application has not been defined an error will be returned.
{
{       DFP$GET_APPLICATION_INFO (PARTNER_MAINFRAME_ID, PARTNER_IS_SERVER,
{             APPLICATION_NAME, P_SEQUENCE, STATUS)
{
{ PARTNER_MAINFRAME_ID: (input)  This parameter specifies the name of the
{       mainframe for which information is to be obtained.
{
{ PARTNER_IS_SERVER: (input)  This parameter specifies whether the partner
{       mainframe is a server or a client mainframe.  If TRUE is specified then
{       the information about the server mainframe is return.  This is the
{       information specified on the DEFINE_CLIENT_APPLICATION_RPC subcommand
{       is returned.  If the mainframe is not defined as a server then an error
{       status is returned.  If FALSE is specified then the information about
{       the client mainframe is return.  This is the information specified on
{       the DEFINE_APPLICATION_RPC subcommand is returned.  If the mainframe is
{       not defined as a client then an error status is returned.
{
{  APPLICATION_NAME: (input)  This parameter specifies name of application for
{        which information is desired.
{
{  P_SEQUENCE: (output)  This parameter returns the defined applications area
{        in server wired memory.  If none was defined, NIL will be returned.
{
{  STATUS: (output) This parameter returns the request status.
{        CONDITIONS:
{              dfe$application_not_known
{              dfe$mainframe_not_client
{              dfe$mainframe_not_server
{
