Date:         Wed, 21 Mar 2001 16:42:54 +0000
Reply-To:     gkirton@FILCS.COM
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         Graeme Kirton <gkirton@FILCS.COM>
Subject:      SCL Lists
Content-type: text/plain; charset=us-ascii

I get this strange warning message, when I run some SCL code which results in
lots of errors.  The where clause is populted by a List, I can't understand why
it would miss off the last 2numbers and quotes!!!.

Can anyone shed some light, please???

Thanx.
Graeme

PART LOG-----------------------------------------------------------------

NOTE: Remote submit to SASAPPS commencing.
18   data tempdsname;
19   set PCMFACT.PCM_PM001_IPT1 PCMFACT.PCM_PD002_IPT1 PCMFACT.PCM_PD001_IPT1
PCMFACT.PCM_LM001_IPT1 PCMFACT.PCM_LD001_IPT1 PCMFACT.PCM_CL001_IPT1;
20   by DeviceType LotNo TestStage;
21   where LotNo in ( "QLD001A-01-0039" "QLD001A-01-0038" "QLD001A-01-0029"
"QLD001A-01-0028" "QLD001A-01-0021" "QLD001A-01-0017" "QLD001A-01-0012"
"QLD001A-01-0010"
21 ! "QLD001A-01-0004" "EPM001-00-0123 " "ELD001A-01-0032" "ELD001A-01-0020"
"ELD001-01-0044 "
22      "ECL001-00-0111 " "DPM001-00-0110 " "DPM001-00-0109 " "DPM001-00-0104 "
"DPM001-00-0103 " "DPM001-00-0095 " "DPD002-01-0041 " "DPD002-01-0040 "
"DPD002-01-0035 "
22 !  "DPD002-01-0034 " "DPD002-01-0013 " "DPD002-01-0005 " "DPD002-00-0128 "
"DPD001-00-0114 "
23      "DPD001-00-01 );
23      "DPD001-00-01 );
        ----------------
        32
WARNING 32-169: The quoted string currently being processed has become more than
 262 characters long.  You may have unbalanced quotation marks.


PART CODE--------------------------------------------------------------------

NEXT:
 if Devices NE ' ' and Test NE ' ' then do;
    /* if No Lot number is selected, all lots are included */
    if LNumSelect = 0 then do;
       Lots='';
       do i=1 to Listlen(LotList);
           Lots=trim(Lots)||' "'||trim(getitemc(LotList,i)||'"'); /*HERE*/
       end;
       LnumSelect=i-1;
    end;
    dsname=' ';
     if upcase(substr(Test,1,2))='DC' then pref='DEVFACT.DC_';
    else pref='PCMFACT.PCM_';
    do i = 1 to NumSelect;
       if exist(Pref||compress(getitemc(Sdevicelst,i)||'_'||Test)) then
          dsname=dsname||' '||Pref||compress(getitemc(Sdevicelst,i)||'_'||Test)
;
    end;
    if dsname NE ' ' then do;
       SUBMIT CONTINUE;