[Download-List] idesc not returning value in download butdoes at colon prompt

[David L. Rotman]

I'm not sure if this is how things are on your system or not,
but on our system...

It appears that the dictionary entry on CR.2004 for
CR.FC.PC indicates a single-valued field, but the
actual data has multiple values.  The numeric values
that appear on the LIST statement are actually the
second values in the field (the first values are null).
It looks like there are several other fields like
this.  (Is the dictionary wrong?  Is there a bug in
the Datatel software that populates the fields?)

Try this variant to get the output you want:
001: I CR.FC.PC field from CR.ACYR file 3-4-04 by moorea
002:
FIELD(TRANS('CR.2004',CI.STUDENT.ID:'*EDE.FC.1','CR.FC.PC','X'), at VM,2,1)




Dave Rotman
Director of Computer Services
Cedarville University
251 N. Main Street
Cedarville, OH 45314
rotmand at cedarville.edu
voice 937-766-7905
fax 937-766-8819

>>> Alice Moore <moorea at wabash.edu> 3/9/2004 1:07:04 PM >>>
Dave,

How does @ID get reset?  I'm not sure I am following your logic.
At the suggestion of someone else I changed W04.CI.CR.PC to the
following 
(which still works at colon but not in download)

Also, prior to having an idesc for W04.CI.CR.PC, I was just doing a 
secondary file lookup in my DOWNLOAD paragraph, and it still did not
return 
the value (that is when I went to the idesc).. However, the other
secondary 
lookups to the CR.acyr file that I am using do work.  Below is a
section of 
my paragraph.

016: DOWNLOAD CI.<<ENTER FILE SUITE YEAR:, 4N>> FORMAT QUOTE FILE
USER.HOLD 
ISIRPRINT.DAT OVERWRITING \
017: SECONDARY.FILE PERSON KEY CI.STUDENT.ID \
018: SECONDARY.FILE CR.<<ENTER FILE SUITE YEAR:, 4N>> KEY
W04.CI.CR.EDE.KEY 
ALIAS CRFILE \
019: CI.STUDENT.ID \
020: W04.CI.CR.PC \  --> this doesn't
021: EVAL "TRANS('CR.2004',CI.STUDENT.ID:'*EDE.FC.1','CR.FC.PC','X')" 
\  --> this doesn't
022: CRFILE->CR.FC.SCA \     ---> this returns value
023: CRFILE->CR.FC.PC \   --> this doesn't

  Top of "W04.CI.CR.PC" in "DICT CI.2004", 9 lines, 215 characters.
001: I CR.FC.PC field from CR.ACYR file 3-4-04 by moorea
002: TRANS('CR.2004',FIELD(@ID,"*",1):'*EDE.FC.1','CR.FC.PC','X')

:AE DICT CI.2004 W04.CI.AUTO.ZERO
Top of "W04.CI.AUTO.ZERO" in "DICT CI.2004", 9 lines, 295 characters.
001: I Set Auto Zero EFC flag based on CR.FC.TYPE 3-9-2004 by moorea
002: TRANS('CR.2004',CI.STUDENT.ID:'*EDE.FC.1','CR.FC.TYPE','X'); IF @1
EQ 
'A' THEN "YES" ELSE "NO"
003:
004: AZE
005: 3L
006: S
007:

...