Thread: [Arsperl-users] missing EXTERNAL when dumping ARControlStructPtr
Brought to you by:
jeffmurphy
|
From: Mark V. <Mar...@ev...> - 2005-07-15 21:16:29
|
All,
I am using ars_perl_qualifier to get the structure of the struct, but it
seems to be missing EXTERNAL entities.
=20
Here is the qualifier portion of a dump:
{menuQuery}{qualifier}{left} (HASH) (3 keys)
{menuQuery}{qualifier}{left}{left} (HASH) (2 keys)
{menuQuery}{qualifier}{left}{left}{oper}: |rel_op|
{menuQuery}{qualifier}{left}{left}{rel_op} (HASH) (3 keys)
{menuQuery}{qualifier}{left}{left}{rel_op}{left} (HASH) (1 key)
{menuQuery}{qualifier}{left}{left}{rel_op}{left}{fieldId}:
|300317500|
{menuQuery}{qualifier}{left}{left}{rel_op}{oper}: |=3D=3D|
{menuQuery}{qualifier}{left}{left}{rel_op}{right} (HASH) (1 key)
{menuQuery}{qualifier}{left}{left}{rel_op}{right}{value}: |0|
{menuQuery}{qualifier}{left}{oper}: |and|
{menuQuery}{qualifier}{left}{right} (HASH) (2 keys)
{menuQuery}{qualifier}{left}{right}{oper}: |rel_op|
{menuQuery}{qualifier}{left}{right}{rel_op} (HASH) (3 keys)
{menuQuery}{qualifier}{left}{right}{rel_op}{left} (HASH) (1 key)
{menuQuery}{qualifier}{left}{right}{rel_op}{left}{fieldId}:
|301058600|
{menuQuery}{qualifier}{left}{right}{rel_op}{oper}: |=3D=3D|
{menuQuery}{qualifier}{left}{right}{rel_op}{right} (HASH) (1 key)
{menuQuery}{qualifier}{left}{right}{rel_op}{right}{queryCurrent}:
|600000083|
{menuQuery}{qualifier}{oper}: |and|
{menuQuery}{qualifier}{right} (HASH) (1 key)
{menuQuery}{qualifier}{right}{oper}: ||
=20
And here is the actual qual string:
( 'System Status' =3D "Active") AND ( 'Account Instance ID' =3D $60000008=
3$)
AND (EXTERNAL('600000053'))
=20
Does anyone have any thoughts about how to get this info?
=20
Thanks,
Mark
=20
Mark Vaughan
Programmer III
=20
Direct: +1 303 802 2426
Cell: +1 303 601 4434
Fax: +1 303 802 1420
mar...@ev... <mailto:mar...@ev...>=20
Evolving Systems, Inc.=20
9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
www.evolving.com
=20
This e-mail and any attachments may be confidential and/or legally privil=
eged. If you have received this e-mail and you are not a named addressee,=
please inform Evolving Systems TIS at ti...@ev... and then delete t=
he e-mail from your system. If you are not a named addressee you must not=
use, disclose, distribute, copy, print or rely on this e-mail. To ensure=
regulatory compliance and for the protection of our clients and business=
, Evolving Systems may monitor and read e-mails sent to and from its serv=
ers. Although Evolving Systems routinely screens for viruses, addressees =
should scan this e-mail and any attachments for viruses. Evolving Systems=
makes no representation or warranty as to the absence of viruses in this=
e-mail or any attachments.=20
Registered Office: 9777 Mt. Pyramid Ct Suite 100, Englewood, CO 80112
|
|
From: Misi M. <mi...@rr...> - 2005-07-16 14:35:30
|
Mark,
It is not altogether clear, not to me anyway.
I had a look in the ar.h file and also in the driver print.c to understand
it.
The external keyword is indicated in the ARQualifierStruct when the
operation == AR_COND_OP_FROM_FIELD.
Exerpt fron print.c in the driver program.
ARQualifierStruct *value; /* IN; value to print */
...
switch (value->operation)
...
case AR_COND_OP_FROM_FIELD:
DriverPrintResult("%s Operation: EXTERNAL OPERATION\n", header);
I guess that the current perl version does not support the EXTERNAL
operation.
An interesting thing about your example is that it says:
EXTERNAL('600000053')
and not as I would have typed it:
EXTERNAL($600000053$)
I created a menu with my syntax and saved it, and when it is reopened it
gives me the EXTERNAL('600000053') syntax.
This is not very good I think, as the EXTERNAL() reference the value on
the current form, not the form you are searching in...
Best Regads - Misi, RRR AB, http://www.rrr.se
> All,
>
> I am using ars_perl_qualifier to get the structure of the struct, but it
> seems to be missing EXTERNAL entities.
>
>
>
> Here is the qualifier portion of a dump:
>
> {menuQuery}{qualifier}{left} (HASH) (3 keys)
>
> {menuQuery}{qualifier}{left}{left} (HASH) (2 keys)
>
> {menuQuery}{qualifier}{left}{left}{oper}: |rel_op|
>
> {menuQuery}{qualifier}{left}{left}{rel_op} (HASH) (3 keys)
>
> {menuQuery}{qualifier}{left}{left}{rel_op}{left} (HASH) (1 key)
>
> {menuQuery}{qualifier}{left}{left}{rel_op}{left}{fieldId}:
> |300317500|
>
> {menuQuery}{qualifier}{left}{left}{rel_op}{oper}: |==|
>
> {menuQuery}{qualifier}{left}{left}{rel_op}{right} (HASH) (1 key)
>
> {menuQuery}{qualifier}{left}{left}{rel_op}{right}{value}: |0|
>
> {menuQuery}{qualifier}{left}{oper}: |and|
>
> {menuQuery}{qualifier}{left}{right} (HASH) (2 keys)
>
> {menuQuery}{qualifier}{left}{right}{oper}: |rel_op|
>
> {menuQuery}{qualifier}{left}{right}{rel_op} (HASH) (3 keys)
>
> {menuQuery}{qualifier}{left}{right}{rel_op}{left} (HASH) (1 key)
>
> {menuQuery}{qualifier}{left}{right}{rel_op}{left}{fieldId}:
> |301058600|
>
> {menuQuery}{qualifier}{left}{right}{rel_op}{oper}: |==|
>
> {menuQuery}{qualifier}{left}{right}{rel_op}{right} (HASH) (1 key)
>
> {menuQuery}{qualifier}{left}{right}{rel_op}{right}{queryCurrent}:
> |600000083|
>
> {menuQuery}{qualifier}{oper}: |and|
>
> {menuQuery}{qualifier}{right} (HASH) (1 key)
>
> {menuQuery}{qualifier}{right}{oper}: ||
>
>
>
> And here is the actual qual string:
>
> ( 'System Status' = "Active") AND ( 'Account Instance ID' = $600000083$)
> AND (EXTERNAL('600000053'))
>
>
>
> Does anyone have any thoughts about how to get this info?
>
>
>
> Thanks,
>
> Mark
>
>
>
> Mark Vaughan
>
> Programmer III
>
>
>
> Direct: +1 303 802 2426
>
> Cell: +1 303 601 4434
>
> Fax: +1 303 802 1420
>
> mar...@ev... <mailto:mar...@ev...>
>
> Evolving Systems, Inc.
>
> 9777 Pyramid Court, Suite 100, Englewood, CO USA 80112
>
> www.evolving.com
>
>
>
> This e-mail and any attachments may be confidential and/or legally
> privileged. If you have received this e-mail and you are not a named
> addressee, please inform Evolving Systems TIS at ti...@ev... and then
> delete the e-mail from your system. If you are not a named addressee you
> must not use, disclose, distribute, copy, print or rely on this e-mail. To
> ensure regulatory compliance and for the protection of our clients and
> business, Evolving Systems may monitor and read e-mails sent to and from
> its servers. Although Evolving Systems routinely screens for viruses,
> addressees should scan this e-mail and any attachments for viruses.
> Evolving Systems makes no representation or warranty as to the absence of
> viruses in this e-mail or any attachments.
>
> Registered Office: 9777 Mt. Pyramid Ct Suite 100, Englewood, CO 80112
>
|