HP3000-L Archives

November 2001, Week 1

HP3000-L@RAVEN.UTC.EDU
Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
Re: UDC triggered from JSMAIN or Program?
From:
Paul H Christidis <[log in to unmask]>
Reply To:
Paul H Christidis <[log in to unmask]>
Date:
Fri, 2 Nov 2001 09:49:07 -0800
Content-Type:
text/plain
Parts/Attachments:
text/plain (40 lines) 
Thomas,

You could use the following two step approach:

1.  Somewhere in your system wide logon UDC set a variable:
     setvar CIPIN hppin

2.  Your UDC command then would contain the following code:
     ...
     If hppin = CIPIN then
       echo UDC command entered from MPE-Prompt
     else
       echo UDC invoked from user program
     endif
     ...

Regards
Paul Christidis





Hi all,

inside an UDC, I should find out whether this UDC-Command was entered
from the MPE-Prompt (:) or via HPCICOMMAND-Intrinsic out of a
Cobol-Program.

What is the easy way to find out ?

Thank you
Thomas

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2