| 43 フォームの処理 – PL/SQL ノー・コード タイプとして”フォーム – 行の自動処理(DML)”を 選んで、フォーム・リー ジョンを指定。 ロー・コード begin if :REQUEST = 'CREATE' then insert into DEMO_CUSTOMERS( CUSTOMER_ID,CUST_FIRST_NAME,CUST_LAST_NAME,CUST_STREET_ADDRESS1,CUST_STREET_ADDRESS2, CUST_CITY,CUST_STATE,CUST_POSTAL_CODE,CUST_EMAIL,PHONE_NUMBER1,PHONE_NUMBER2, URL,CREDIT_LIMIT,TAGS ) values ( :P22_CUSTOMER_ID,:P22_CUST_FIRST_NAME,:P22_CUST_LAST_NAME,:P22_CUST_STREET_ADDRESS1,:P22_CUST_STREET_ADDRESS2, :P22_CUST_CITY,:P22_CUST_STATE,:P22_CUST_POSTAL_CODE,:P22_CUST_EMAIL,:P22_PHONE_NUMBER1,:P22_PHONE_NUMBER2, :P22_URL,:P22_CREDIT_LIMIT,:P22_TAGS ); elsif :REQUEST = 'SAVE' then update "DEMO_CUSTOMERS" set "CUSTOMER_ID" = :P22_CUSTOMER_ID, "CUST_FIRST_NAME" = :P22_CUST_FIRST_NAME, "CUST_LAST_NAME" = :P22_CUST_LAST_NAME, "CUST_STREET_ADDRESS1" = :P22_CUST_STREET_ADDRESS1, "CUST_STREET_ADDRESS2" = :P22_CUST_STREET_ADDRESS2, "CUST_CITY" = :P22_CUST_CITY, "CUST_STATE" = :P22_CUST_STATE, "CUST_POSTAL_CODE" = :P22_CUST_POSTAL_CODE, "CUST_EMAIL" = :P22_CUST_EMAIL, "PHONE_NUMBER1" = :P22_PHONE_NUMBER1, "PHONE_NUMBER2" = :P22_PHONE_NUMBER2, "URL" = :P22_URL, "CREDIT_LIMIT" = :P22_CREDIT_LIMIT, "TAGS" = :P22_TAGS where "CUSTOMER_ID" = :P22_CUSTOMER_ID; elsif :REQUEST = 'DELETE' then delete from "DEMO_CUSTOMERS" where "CUSTOMER_ID" = :P22_CUSTOMER_ID; end if; end; 行の作成、更新、削除