rendered paste bodyCREATE OR REPLACE PROCEDURE maanedloenn ( p_melding OUT VARCHAR2 )IS CURSOR c1 IS SELECT * FROM ansatt ORDER BY navn; v_mndLoenn NUMBER(10,2);BEGIN p_melding := ""; FOR v_c1 IN c1 LOOP IF ( v_c1.timeloenn IS NULL ) THEN p_melding := CONCAT( p_melding, 'Ansnr: ' || v_c1.ansnr || ' Navn: ' || v_c1.navn || ' Mndlønn: ' || ' Timelønn ikkje satt ' || CHR(10) ); ELSE v_mndLoenn := v_c1.timeloenn*0.6*7*30; p_melding := CONCAT( p_melding, 'Ansnr: ' || v_c1.ansnr || ' Navn: ' || v_ct1.navn || ' Mndlønn: ' || v_mndLoenn ); END IF; END LOOP;END;/DECLAREp_melding VARCHAR2(200);BEGINmaanedloenn( p_melding );DBMS_OUTPUT.PUT_LINE( p_melding );END;/