I just tried this function out, and it is not like the
text outlined below. This looks like a copy from a
manual below, but here is the code. It accepts no
parameters.
SIG ;Call with DUZ; Return X1="" if fail else
hashed ESC.
N X2,K
S X2=$G(^VA(200,+$G(DUZ),20)),X1=$P(X2,U,4) I
X1="" W !,"No Electronic Signature code to check." Q
S K=0 D S2 Q:X1=""
Q ;Following code was to force code change
N LIFE S LIFE=$$KSP^XUPARAM("LIFETIME")
S X2=+X2 I X2>0,(X2+LIFE)'>(+$H) D I X1="" W
!,*7,"Verification with held untill new code
entered.",!
. W !!,"Your Electronic Signature Code has
expired, you need to create a new one."
. N DA S DA=DUZ S:$$NEW()'=1 X1=""
. Q
Q
;
Thus this would need to be called like this:
new success set success=0
do
. new DUZ
. set DUZ=UserNum
. do SIG^XUSESIG
. if X1'="" set success=1
not this:
if $$SIG^XUSESIG(UserNum,x1)=x1 set success=1
Also the text in the code in XUSESIG.m:
"Verification with held untill new code entered."
should be changed to this:
"Verification withheld until new code entered."
Kevin
--- 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
> > > > > 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
> > > >
> > > >
> > > >
>
-------------------------------------------------------
> > > > 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
>
=== 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
