postgresql:array & foreach

--数组：
SELECT (ARRAY['{101, 111, 121}', '{201, 211, 221}'])[1]::text[];
SELECT (ARRAY['{101, 111, 121}', '{201, 211, 221}'])::text[];

SELECT (ARRAY['{101, 111, 121}', '{201, 211, 221}'])[1]::text[];
SELECT (ARRAY['{101, 111, 121}'::int[], '{201, 211, 221}'])::int[];
SELECT (ARRAY['{101, 111, 121}'::int[], '{201, 211, 221}'])[1][1];
SELECT (ARRAY['{{101, 111, 121},{201, 211, 221}}'])[1];
SELECT (ARRAY['{{101, 111, 121},{201, 211, 221}}'])[1]::int[];

　　

--select rows to array
SELECT ARRAY(select "Id" FROM ent."Enterprise" )

SELECT ARRAY(select "Id" FROM ent."Enterprise" )::int[]

--array foreach
DO
$do$
DECLARE
   m   varchar[];
   arr varchar[] := array[['key1','val1'],['key2','val2']];
BEGIN
   FOREACH m SLICE 1 IN ARRAY arr
   LOOP
      RAISE NOTICE 'another_func(%,%)',m[1], m[2];
   END LOOP;
END
$do$

DO
$do$
DECLARE
   m   varchar[];
   arr varchar[] := array['key1','val1'];
BEGIN
   FOREACH m SLICE 1 IN ARRAY arr
   LOOP
      RAISE NOTICE 'another_func(%)',m;
   END LOOP;
END
$do$

　　

--一维数组
DO
$do$
DECLARE
   m   int;
   arr int[] := ARRAY(select "Id" FROM ent."Enterprise" )::int[];
BEGIN
  FOREACH m IN ARRAY arr
   LOOP
      RAISE NOTICE 'another_func(%)',m;
   END LOOP;
END
$do$

　　　

--each insert from select
DO
$do$
DECLARE
   m   int;
   arr int[] := ARRAY(select "Id" FROM "Enterprise" )::int[];
BEGIN
  FOREACH m IN ARRAY arr
   LOOP
      INSERT INTO "Wallet"("Id")
	VALUES (m);
　    RAISE NOTICE 'another_func(%)',m;
   END LOOP;
END
$do$

　　

多维数组

WITH data AS (
    SELECT '{
	{9,"12345"}
	, {9,aedrftgy}
	, {11,qwedrftgyh}
	,{10,qertg}
	,{12,qwedfg}
	,{9,wedrftgh}
	,{13,qwerftgh}
	,{8,wertyu}
	}'::text[] AS arr
)
SELECT
    arr[i][1] AS aspect,
    arr[i][2] AS preference
FROM
    data,
    generate_subscripts((SELECT arr FROM data), 1) i
;

DO
$do$
DECLARE
	r record;
	r2 record;
	n int;
	channelId integer;
	v_MaxId integer;
	platfromSettlementParty text;
	v_roles text[] := '{
		{9,"zfhcnc''gdthfh"}
		, {9,123有限公司}
		, {11,3456有限公司}
		,{10,467有限公司}
		,{12,5678有限公司}
		,{9,34567司}
		,{13,3456公司}
		,{8,23456公司}
		}';
BEGIN
    for r in (
		WITH data AS (
			SELECT v_roles::text[] AS arr
		)
		SELECT * from (SELECT arr[i][1] AS aspect, arr[i][2] AS preference
			FROM data, generate_subscripts((SELECT arr FROM data), 1) i) t2
	)
	LOOP
		channelId=CAST(coalesce(r."aspect", '0') AS integer);
		platfromSettlementParty=r."preference";
		Select max("Id")+1 into v_MaxId from ent."rrte";
		IF NOT EXISTS(Select * from ent."rrte" where ent."rrte"."PlatfromSettlementParty"=platfromSettlementParty and ent."rrte"."ChannelId"=channelId limit 1) then
			INSERT INTO ent."rrte"("Id",""ChannelId", "PlatfromSettlementParty")
			VALUES (v_MaxId,channelId, platfromSettlementParty);
        end if;
	END LOOP;

END;
$do$;

　　

　　

　　

DO
$do$
DECLARE

	r record;
	r2 record;
	er record;
	eachr record;
	n int;
	ci integer;
	v_MaxId integer;
	v_pi integer;
	v_bi integer;
	v_ci integer;
	v_at integer;
	psp text;
	v_roles text[] := '{
		{达有,9,百司,1,''}
		{顾问,8,上海,2,''}
	}';
BEGIN

   for r in (
		WITH data AS (
			SELECT v_roles::text[] AS arr
		)
		SELECT arr[i][1] AS en, arr[i][2] AS ci, arr[i][3] AS psp,arr[i][4] AS at,arr[i][5] AS am
			FROM data, generate_subscripts((SELECT arr FROM data), 1) i
	)
	LOOP
		psp= r."psp";
		v_at=CAST(coalesce(r."at", '0') AS integer);
		Select max("Id")+1 into v_MaxId from ent."BA";

		IF EXISTS(select "Id" from ent."A" as platform WHERE platform."PSP"=r."psp" limit 1)then
			select "Id" into v_pi from ent."A" as platform WHERE platform."PSP"=r."psp" limit 1;

			IF EXISTS(SELECT business."Id" FROM ent."B" as business
			INNER join ent."E" as enterprise on business."EI" = enterprise."Id"
			where business."BU"=2 and ( enterprise."N"=r."en" or  enterprise."EN"=r."en") limit 1)then

				SELECT business."Id" into v_bi FROM ent."B" as business
				INNER join ent."E" as enterprise on business."BI" = enterprise."Id"
				where business."BU"=2 and ( enterprise."N"=r."en" or  enterprise."EN"=r."en") limit 1;

				IF NOT EXISTS(
					SELECT account."Id", account."BI", account."PI", account."CI", account."AT", account."AM"
					FROM  ent."BA" as account where account."BI"=v_bi and account."AI"=v_pi
					limit 1) then		

						INSERT INTO ent."BA"("Id","BI", "AI",  "AT", "AM")
						VALUES (v_MaxId, v_bI, v_pt, v_at,r."am");
				ELSE
						UPDATE ent."BA" as account
						SET "AT"=v_at, "AM"=r."am"
						where account."BId"=v_bi and account."AId"=v_pi;
				end if;
			end if;
		end if;
	END LOOP;

END;
$do$;

UPDATE ent."BA"
SET "AM"=''
where "AM"='''' ;