-- create
CREATE OR REPLACE PROCEDURE divisionDigit(kp json, tr json)
  language 'plpgsql'
 AS $$
 declare
 cp_loan_limit_0_0_299_kp numeric;
 cp_loan_limit_0_0_299_tr numeric;
 cp_loan_limit_0_299_999_kp numeric;
 cp_loan_limit_0_299_999_tr numeric;
 cp_loan_limit_0_999_inf_kp numeric;
 cp_loan_limit_0_999_inf_tr numeric;
 sm numeric[];
 sm2 numeric[];
 i int;
 j int;
  BEGIN
 --sm := ((kp ->> 'DopProductKodForSM')::text)::text[];

  FOR i IN 0..19
  LOOP
    sm[i] := kp -> 'SubproductUnicCode' ->> i;
    sm2[i] := tr -> 'SubproductUnicCode' ->> i; 
  END LOOP;
  RAISE NOTICE '%', sm;
  RAISE NOTICE '%', sm2;
  
  for i in 0..19 loop
    for j in 0..19 loop
      if sm[i] = sm2[j] then 
        begin -- Работать можно только в этом сегменте
          if substring((kp -> 'CP_Loan_Limit_Value' ->> i)::text FOR 15) = '' then cp_loan_limit_0_0_299_kp = 0;
          else cp_loan_limit_0_0_299_kp := substring((kp -> 'CP_Loan_Limit_Value' ->> i)::text FOR 15)::numeric; end if;
          -- cp_loan_limit_0_0_299_tr := substring((tr -> 'CP_Loan_Limit_Value' ->> j)::text FOR 15)::numeric;
          -- cp_loan_limit_0_299_999_kp := substring((kp -> 'CP_Loan_Limit_Value' ->> i)::text FROM 16 FOR 15)::numeric;
          -- cp_loan_limit_0_299_999_tr := substring((tr -> 'CP_Loan_Limit_Value' ->> j)::text FROM 16 FOR 15)::numeric;
          if substring((kp -> 'CP_Loan_Limit_Value' ->> i)::text FROM 31 FOR 15) = '' then cp_loan_limit_0_999_inf_kp := 0;
          else cp_loan_limit_0_999_inf_kp := substring((kp -> 'CP_Loan_Limit_Value' ->> i)::text FROM 31 FOR 15)::numeric; end if;
          -- cp_loan_limit_0_999_inf_tr := substring((tr -> 'CP_Loan_Limit_Value' ->> j)::text FROM 31 FOR 15)::numeric;
          raise notice '%', cp_loan_limit_0_0_299_kp;
          raise notice '%', cp_loan_limit_0_0_299_tr;
          raise notice '%', cp_loan_limit_0_299_999_kp;
          raise notice '%', cp_loan_limit_0_299_999_tr;
          raise notice '%', cp_loan_limit_0_999_inf_kp;
          raise notice '%', cp_loan_limit_0_999_inf_tr;
          raise notice '%', i;
          raise notice '%', j;
        end;
      end if;
    end loop;
  end loop;

 COMMIT;
 END; 
 $$;
 
call DivisionDigit('{"DopProductKodForSM": [999,124,902,600,124,100,999,0,0,0,0,0,0,0,0,0,0,0,0,0],  "SubproductUnicCode": ["5263","6070","5270","5216","5269","7500"], "CP_Loan_Limit_Value": ["000000600000.00000000600000.00000000600000.00","000000504010.00000000404010.00000000304010.00","000000500000.00000000400000.00","000000600000.00","000000600000.00"]}', '{"DopProductKodForSM": [999,124,902,600,124,100,999,0,0,0,0,0,0,0,0,0,0,0,0,0],  "SubproductUnicCode": ["6070","5270","9999","52699","75090"], "CP_Loan_Limit_Value": ["000000600000.00", "000000600000.00", "000000600000.00", "000000600000.00", "000000600000.00"]}')

--[ <<метка>> ]
--FOREACH цель [ SLICE число ] IN ARRAY выражение LOOP
--    операторы
--END LOOP [ метка ];

PostgreSQL online editor

Write, Run & Share PostgreSQL queries online using OneCompiler's PostgreSQL online editor and compiler for free. It's one of the robust, feature-rich online editor and compiler for PostgreSQL. Getting started with the OneCompiler's PostgreSQL editor is really simple and pretty fast. The editor shows sample boilerplate code when you choose database as 'PostgreSQL' and start writing queries to learn and test online without worrying about tedious process of installation.

About PostgreSQL

PostgreSQL is a open source relational database system and is also knows as Postgres.

Key Features:

  • Postgres is not only free and open-source but also it is highly extensible.
  • Custom Data types and funtions from various programming languaues can be introduced and the good part is compiling entire database is not required.
  • ACID(Atomicity, Consistency, Isolation, Durability) compliant.
  • First DBMS which implemented Multi-version concurrency control (MVCC) feature.
  • It's the default database server for MacOS.
  • It supports all major operating systems like Linux, Windows, OpenBSD,FreeBSD etc.

Syntax help

1. CREATE

CREATE command is used to create a table, schema or an index.

Syntax:

         CREATE TABLE table_name (
                column1 datatype,
                column2 datatype,
                ....);

2. ALTER

ALTER command is used to add, modify or delete columns or constraints from the database table.

Syntax

ALTER TABLE Table_name ADD column_name datatype;

3. TRUNCATE:

TRUNCATE command is used to delete the data present in the table but this will not delete the table.

Syntax

TRUNCATE table table_name;

4. DROP

DROP command is used to delete the table along with its data.

Syntax

DROP TABLE table_name;

5. RENAME

RENAME command is used to rename the table name.

Syntax

ALTER TABLE table_name1 RENAME to new_table_name1;

6. INSERT

INSERT Statement is used to insert new records into the database table.

Syntax

INSERT INTO table_name (column1, column2, column3, ...) VALUES (value1, value2, value3, ...);

7. SELECT

Select statement is used to select data from database tables.

Syntax:

SELECT column1, column2, ...
FROM table_name;

8. UPDATE

UPDATE statement is used to modify the existing values of records present in the database table.

Syntax

UPDATE table_name
SET column1 = value1, column2 = value2, ...
WHERE condition;

9. DELETE

DELETE statement is used to delete the existing records present in the database table.

Syntax

DELETE FROM table_name where condition;