Yes, if what you want to do is ask the user to enter his/her electronic
signature.
BTW, if you waqnt to be SAC compliant, you cannot use * or # reads. I'm
sure the reason for this is partly historical and partly because they
are easy to get wrong! XGF is a powerful library that is much
underused.
--- Kevin Toppenberg <[EMAIL PROTECTED]> wrote:
> You all have been most helpful.
>
> In summary, if I were to want to turn on silent read,
> I would do this:
>
> X ^%ZOSF("EOFF")
>
> And to turn regular read back on, I do this:
>
> X ^%ZOSF("EON")
>
> But to do the entire task I really want to do, I do
> this:
>
> if $$SIG^XUSESIG(duz,x1)=x1 do Success
>
> Thanks so much.
>
> Kevin
>
>
> --- Greg Woodhouse <[EMAIL PROTECTED]> wrote:
>
> > That's something slightly different (and more
> > specialized). The point
> > of this API is that it allows you to promp the user
> > for their
> > electronic signature (something you, as a
> > programmer, never
> > would/should know) and verify that it is correct. It
> > doesn't help if
> > you want to do a "password" style read (i.e., with
> > user input echoing
> > as asterisks) and then get the cleartext value. But
> > that's something
> > you can do with XGF (the VistA equivalent of
> > curses).
> >
> > --- steven mcphelan <[EMAIL PROTECTED]>
> > wrote:
> >
> > > SIG^XUSESIG(): Verify Electronic Signature Code
> > >
> > > Reference Type
> > > Supported
> > >
> > > Category
> > > Electronic Signatures
> > >
> > > IA #
> > > 10050
> > >
> > > Description
> > > This API requests and verifies the electronic
> > signature code of
> > > the
> > > current user.
> > >
> > > Format
> > > SIG^XUSESIG(duz,x1)
> > >
> > > Input Parameters
> > > duz: (required) User number.
> > >
> > >
> > > Output Parameters x1: If the user entered the
> > correct electronic
> > > signature
> > > code, the encrypted electronic signature code as
> > stored in the NEW
> > > PERSON
> > > file (#200) is returned in x1. Otherwise, x1 is
> > returned as NULL.
> > >
> > > Even though the Format above shows parameter
> > passing, there is no
> > > parameter
> > > passing. Also, this call verifies the signed-on
> > user's esig.
> > >
> > >
> > > ----- Original Message -----
> > > From: "steven mcphelan" <[EMAIL PROTECTED]>
> > > To: <[email protected]>
> > > Sent: Wednesday, March 09, 2005 10:41 AM
> > > Subject: Re: [Hardhats-members] How do I do a
> > silent read?
> > >
> > >
> > > > I am leaving for the airport. I will have to
> > find it. It is in
> > > the
> > > Kernel
> > > > Systems Manager documentation or the new Kernel
> > programmer
> > > documentation.
> > > >
> > > > ----- Original Message -----
> > > > From: "Greg Woodhouse" <[EMAIL PROTECTED]>
> > > > To: <[email protected]>
> > > > Sent: Wednesday, March 09, 2005 10:13 AM
> > > > Subject: Re: [Hardhats-members] How do I do a
> > silent read?
> > > >
> > > >
> > > > > What API do you have in mind? The XGF
> > utilities?
> > > > >
> > > > > Incidentally, here's some code I wrote to
> > allow a user to enter
> > > "^" to
> > > > > interrupt a running process that's busy
> > writing dots to the
> > > keyboard.
> > > > > It's not exactly what you want, but it shows
> > how to read input
> > > one
> > > > > character at a time in a SAC compliant way and
> > also turn echo
> > > on/off.
> > > > > (The lock statements are a kludge and
> > shouldn't be needed.)
> > > > >
> > > > >
> > > > > WSTUP ; setup
> > > > > ;K DTOUT ;in case it is defined
> > > > > S CSLTMP=$NA(^XTMP("CSLVEN"_MID))
> > > > > D INITKB^XGF("*")
> > > > > X ^%ZOSF("EOFF")
> > > > > S TIMER=0,DELTA=1,DONE=0
> > > > > S:+$G(TTW)'>0 TTW=DTIME
> > > > > WLOOP ;
> > > > > S YCHR=$$READ^XGF(1,1)
> > > > > ;R YCHR#1:1
> > > > > ;S:$G(YCHR)["^" DONE=1
> > > > > I '$D(DTOUT) S:$G(YCHR)="^" DONE=1
> > > > > L [EMAIL PROTECTED]@(0):0
> > > > > L [EMAIL PROTECTED]@(0)
> > > > > G:'$D(@CSLTMP@(0)) WLOOP2
> > > > > L [EMAIL PROTECTED]@(0):0
> > > > > S X=$P(@CSLTMP@(0),"^",3)
> > > > > S:+X>0 DONE=1
> > > > > S:+X>0
> > @CSLTMP@("TIMEFOUND")=$$NOW^XLFDT
> > > > > L [EMAIL PROTECTED]@(0)
> > > > > G:DONE WCLN
> > > > > WLOOP2 ;
> > > > > D:IO=IO(0)
> > > > > .W ". " ;a 1 sec. wait is built into
> > the # read
> > > > > .;W:TIMER#2=0 ". "
> > > > > S:$D(DTOUT) YCHR=""
> > > > > S:YCHR["^" X=0
> > > > > G:YCHR["^" WCLN
> > > > > H DELTA
> > > > > S TIMER=TIMER+DELTA
> > > > > S:TIMER'<TTW X=0 ;timeout
> > > > > G:TIMER'<TTW WCLN
> > > > > G WLOOP
> > > > > Q
> > > > > WCLN ;
> > > > > D RESETKB^XGF
> > > > > X ^%ZOSF("EON")
> > > > > Q $G(X)
> > > > >
> > > > > --- steven mcphelan <[EMAIL PROTECTED]>
> > wrote:
> > > > >
> > > > > > Why not just use the Kernel API for this
> > purpose?
> > > > > >
> > > > > > ----- Original Message -----
> > > > > > From: "Kevin Toppenberg" <[EMAIL PROTECTED]>
> > > > > > To: "Hardhats Sourceforge"
> > > <[email protected]>
> > > > > > Sent: Tuesday, March 08, 2005 11:13 PM
> > > > > > Subject: [Hardhats-members] How do I do a
> > silent read?
> > > > > >
> > > > > >
> > > > > > > Hey all,
> > > > > > >
> > > > > > > I want to ask for a password, and echo *'s
> > > > > > >
> > > > > > > How do I do this?
> > > > > > >
> > > > > > > I.e.
> > > > > > > for i=1:1:8 read *S write "*"
> > > > > > >
> > > > > > > gives:
> > > > > > > a*b*c*d*e*f*g*h*
> > > > > > >
> > > > > > > How do I hide the letters?
> > > > > > >
> > > > > > > Thanks
> > > > > > > Kevin
> > > > > > >
> > > > > > > P.S., what I really want to do is to
> > compare the
> > > > > > > user's input to the electronic signiture
> > code stored
> > > > > > > in the ELECTRONIC SIGNITURE CODE in file
> > 200. Is
> > > > > > > there a Fileman way of doing this? I just
> > want to
> > > > > > > ensure that the user knows the password.
> > > > > > >
> > > > > > > Thanks
> > > > > > > Kevin
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > > __________________________________
> > > > > > > Celebrate Yahoo!'s 10th Birthday!
> > > > > > > Yahoo! Netrospective: 100 Moments of the
> > Web
> > > > > > > http://birthday.yahoo.com/netrospective/
> > > > > > >
> > > > > > >
> > > > > > >
> >
> -------------------------------------------------------
> > > > > > > SF email is sponsored by - The IT Product
> > Guide
> >
> === message truncated ===
>
>
>
>
> __________________________________
> Do you Yahoo!?
> Yahoo! Small Business - Try our new resources site!
> http://smallbusiness.yahoo.com/resources/
>
>
> -------------------------------------------------------
> SF email is sponsored by - The IT Product Guide
> Read honest & candid reviews on hundreds of IT Products from real
> users.
> Discover which products truly live up to the hype. Start reading now.
> http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click
> _______________________________________________
> Hardhats-members mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/hardhats-members
>
A practical man is a man who practices the errors of his forefathers.
--Benjamin Disraeli
====
Greg Woodhouse
[EMAIL PROTECTED]
[EMAIL PROTECTED]
-------------------------------------------------------
SF email is sponsored by - The IT Product Guide
Read honest & candid reviews on hundreds of IT Products from real users.
Discover which products truly live up to the hype. Start reading now.
http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click
_______________________________________________
Hardhats-members mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/hardhats-members
