CREATE PROCEDURE Get_FG (IN DocEntNo INTEGER ARRAY[]) BEGIN DECLARE z,x integer; SET z=0; SET x=LENGTH(DocEntNo); -- set z= LENGTH(ARRAY); WHILE (z<x) do BEGIN SELECT ' ' "Selection", "DocEntry", "U_ItemNo", "U_Description", "U_Quantity", "U_Date", "U_whse" FROM "MELWIRE_TEST"."@APLANLINE" WHERE "@APLANLINE"."DocEntry" = :DocEntNo[z] AND "@APLANLINE"."LogInst" IN (SELECT MAX("LogInst")FROM "MELWIRE_TEST"."@APLANLINE" WHERE "DocEntry" = :DocEntNo[z] GROUP BY "U_ItemNo") SET z=z+1; END; END WHILE; END;
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)