\begin{sql}
CREATE OR REPLACE PROCEDURE make\_member \\
\> (the\_org IN VARCHAR2, the\_country IN VARCHAR2,  \\
\>\>   the\_type IN VARCHAR2) IS \\
\>  n NUMBER; \\
\>  c Organization\_Type; \\
BEGIN \\
\>  \blue SELECT COUNT(*) INTO n \\
\>\>\blue    FROM Organization\_ObjTab \\
\>\>\blue    WHERE Abbrev = the\_org; \\
\>  IF n = 0  \\
\>\magenta  THEN  INSERT INTO Organization\_ObjTab \\
\>\>\magenta  VALUES(Organization\_Type(NULL, \\
\>\>\>\magenta the\_org, Member\_List\_Type(), NULL, NULL)); \\
\>\magenta  END IF; \\
\>  \blue SELECT VALUE(org) INTO c \\
\>\>\blue    FROM Organization\_ObjTab org \\
\>\>\blue    WHERE Abbrev = the\_org; \\
\>  IF {\red c.is\_member(the\_country)}='no' THEN \\
\>\>   {\red c.add\_member(the\_country, the\_type)}; \\
\>  END IF;   \\
END; \\
/
\end{sql}
