[prev in list] [next in list] [prev in thread] [next in thread]
List: mumps-l
Subject: Re: Validate foreign key with object-SQL table projection
From: "Casado, Edison" <ECasado () nsvs ! org>
Date: 2000-10-31 13:01:38
[Download RAW message or body]
Thanks, I finally got sample from a 1993 MSM manual ...
-----Original Message-----
From: Pere Rodríguez Rodríguez [mailto:prr@nil.fut.es]
Sent: Tuesday, October 31, 2000 6:45 AM
To: MUMPS-L@LISTSERV.UGA.EDU
Subject: Re: Validate foreign key with object-SQL table projection
A label called with a job or do commands can'not return any value.
For example:
TEST(VAL) ; TEST ROUTINE
S ^TEST($H)=VAL
Q
LBL1(VAL) ; This label can be called with a Do or Job commands
S ^TEST($H)=VAL
Q
LBL2(VAL) ; This label can be called with a command that accept the
return value (not Do or Job commands)
S ^TEST($H)=VAL
Q VAL
LBL3(VAL) ; This label can be called with any command. If is necessay
return a value then $Q=1.
S ^TEST($H)=VAL
Q:$Q VAL Q
>D ^TEST("V") -> OK J
^TEST("V"){|UCI{,VOL{,SYS}}|} -> OK
>D TEST^TEST("V") -> OK J
TEST^TEST("V"){|UCI{,VOL{,SYS}}|} -> OK
>D LBL1^TEST("V") -> OK J
LBL1^TEST("V"){|UCI{,VOL{,SYS}}|} -> OK
>W $$LBL1^TEST("V") -> <DPARM>
>D LBL2^TEST("V") -> <DPARM> J LBL2^TEST("V"){|UCI{,VOL{,SYS}}|} ->
<DPARM>
>W $$LBL2^TEST("V") -> OK
>D LBL3^TEST("V") -> OK J
LBL3^TEST("V"){|UCI{,VOL{,SYS}}|} -> OK
>W $$LBL3^TEST("V") -> OK
Pere Rodríguez
Hospital de Palamós
-----Mensaje original-----
De: Casado, Edison < ECasado@nsvs.org <mailto:ECasado@nsvs.org> >
Para: MUMPS-L@LISTSERV.UGA.EDU <mailto:MUMPS-L@LISTSERV.UGA.EDU> <
MUMPS-L@LISTSERV.UGA.EDU <mailto:MUMPS-L@LISTSERV.UGA.EDU> >
Fecha: lunes 30 de octubre de 2000 23:11
Asunto: Re: Validate foreign key with object-SQL table projection
Can someone help with a formal list on a called rtn ... I can do the
passing, but i am getting a DPARM error ... using MSM, this is the first
time we are using the Job command sample
J rtn1^label(VAR)|"GHH,GHH"|
What do I need to do on first line of rnt1?
[Attachment #3 (text/html)]
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<META content="MSHTML 5.00.2919.6307" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT color=#0000ff face=Arial size=2><SPAN
class=000110513-31102000>Thanks, I finally got sample from a 1993 MSM
manual ...</SPAN></FONT></DIV>
<BLOCKQUOTE style="MARGIN-RIGHT: 0px">
<DIV align=left class=OutlookMessageHeader dir=ltr><FONT face=Tahoma
size=2>-----Original Message-----<BR><B>From:</B> Pere Rodríguez Rodríguez
[mailto:prr@nil.fut.es]<BR><B>Sent:</B> Tuesday, October 31, 2000 6:45
AM<BR><B>To:</B> MUMPS-L@LISTSERV.UGA.EDU<BR><B>Subject:</B> Re: Validate
foreign key with object-SQL table projection<BR><BR></DIV></FONT>
<DIV><FONT size=2>A label called with a job or do commands can'not return any
value.</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT color=#000000 size=2>For example:</FONT></DIV>
<DIV><FONT color=#000000 size=2></FONT> </DIV>
<DIV><FONT size=2>TEST(VAL) ; TEST ROUTINE</FONT></DIV>
<DIV><FONT size=2></FONT><FONT color=#000000 size=2> <FONT
color=#000000>S ^TEST($H)=VAL</FONT></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT color=#000000></FONT>
Q</FONT></DIV>
<DIV><FONT color=#000000 size=2></FONT><FONT
size=2>LBL1(VAL) ; This label can be called with a Do or Job
commands</FONT></DIV>
<DIV><FONT size=2></FONT><FONT color=#000000 size=2> S
^TEST($H)=VAL</FONT></DIV>
<DIV><FONT color=#000000 size=2> Q</FONT></DIV>
<DIV><FONT color=#000000 size=2></FONT><FONT
size=2>LBL2(VAL) ; This label can be called with a command
that accept the return value (not Do or Job commands)</FONT></DIV>
<DIV><FONT size=2></FONT><FONT color=#000000 size=2> S
^TEST($H)=VAL</FONT></DIV>
<DIV><FONT color=#000000 size=2> Q VAL</FONT></DIV>
<DIV><FONT color=#000000 size=2>LBL3(VAL) ; This label can
be called with any command. If is necessay return a value then
$Q=1.</FONT></DIV>
<DIV><FONT color=#000000 size=2> S
^TEST($H)=VAL</FONT></DIV>
<DIV><FONT color=#000000 size=2> Q:$Q VAL Q</FONT></DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV><FONT color=#000000 size=2>>D
^TEST("V")
->
OK
J
^TEST("V"){|UCI{,VOL{,SYS}}|}
-> OK</FONT></DIV>
<DIV><FONT color=#000000 size=2></FONT><FONT size=2>>D
TEST^TEST("V") ->
OK
J TEST^TEST("V"){|UCI{,VOL{,SYS}}|} -> OK</FONT></DIV>
<DIV><FONT size=2>>D LBL1^TEST("V") ->
OK
J LBL1^TEST("V"){|UCI{,VOL{,SYS}}|} -> OK</FONT></DIV>
<DIV><FONT size=2>>W $$LBL1^TEST("V") ->
<DPARM></FONT></DIV>
<DIV><FONT size=2>>D LBL2^TEST("V") ->
<DPARM> J
LBL2^TEST("V"){|UCI{,VOL{,SYS}}|} ->
<DPARM></FONT></DIV>
<DIV><FONT size=2>>W $$LBL2^TEST("V") ->
OK</FONT></DIV>
<DIV><FONT size=2>>D LBL3^TEST("V") ->
OK
J LBL3^TEST("V"){|UCI{,VOL{,SYS}}|} -> OK</FONT></DIV>
<DIV><FONT size=2>>W $$LBL3^TEST("V") ->
OK</FONT></DIV>
<DIV> </DIV>
<DIV><FONT color=#000000 size=2>Pere Rodríguez</FONT></DIV>
<DIV><FONT color=#000000 size=2></FONT><FONT size=2>Hospital de
Palamós</FONT></DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; PADDING-LEFT: 5px">
<DIV><FONT face=Arial size=2><B>-----Mensaje original-----</B><BR><B>De:
</B>Casado, Edison <<A
href="mailto:ECasado@nsvs.org">ECasado@nsvs.org</A>><BR><B>Para: </B><A
href="mailto:MUMPS-L@LISTSERV.UGA.EDU">MUMPS-L@LISTSERV.UGA.EDU</A> <<A
href="mailto:MUMPS-L@LISTSERV.UGA.EDU">MUMPS-L@LISTSERV.UGA.EDU</A>><BR><B>Fecha:
</B>lunes 30 de octubre de 2000 23:11<BR><B>Asunto: </B>Re: Validate foreign
key with object-SQL table projection<BR><BR></DIV></FONT>
<DIV><FONT color=#0000ff face=Arial size=2><SPAN
class=290570822-30102000>Can someone help with a formal list on a called rtn
... I can do the passing, but i am getting a DPARM error ... using MSM, this
is the first time we are using the Job command
sample</SPAN></FONT></DIV>
<DIV><FONT color=#0000ff face=Arial size=2><SPAN
class=290570822-30102000></SPAN></FONT> </DIV>
<DIV><FONT color=#0000ff face=Arial size=2><SPAN class=290570822-30102000>J
rtn1^label(VAR)|"GHH,GHH"|</SPAN></FONT></DIV>
<DIV><FONT color=#0000ff face=Arial size=2><SPAN
class=290570822-30102000></SPAN></FONT> </DIV>
<DIV><FONT color=#0000ff face=Arial size=2><SPAN
class=290570822-30102000>What do I need to do on first line of
rnt1?</SPAN></FONT></DIV></BLOCKQUOTE></BLOCKQUOTE></BODY></HTML>
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic