src-db/database/model/functions/AD_TABLE_IMPORT.xml
changeset 1027 2e9052d7de0e
parent 799 fef2c5e2feb7
child 1605 8a0fe0193bef
equal deleted inserted replaced
1026:2a6d77a89ccb 1027:2e9052d7de0e
   236       v_count:=v_count + 1;
   236       v_count:=v_count + 1;
   237       -- Added by Ismael Ciordia
   237       -- Added by Ismael Ciordia
   238       v_SeqNo:=v_SeqNo + 10;
   238       v_SeqNo:=v_SeqNo + 10;
   239       v_LastColumnName:=Cur_Column.Column_Name;
   239       v_LastColumnName:=Cur_Column.Column_Name;
   240       -- Falta: insert de AD_Element
   240       -- Falta: insert de AD_Element
   241       IF(p_PInstance_ID IS NOT NULL) THEN
   241        DBMS_OUTPUT.PUT_LINE('adding Table ' || InitCap(Cur_Column.Table_Name) || ' Column ' || InitCap(Cur_Column.Column_Name)) ;
   242         AD_SEQUENCE_NEXT('AD_PInstance_Log', v_Client_ID, v_PInstance_Log_ID);
   242       
   243         INSERT
       
   244         INTO AD_PInstance_Log
       
   245           (
       
   246             AD_PInstance_ID, Log_ID, P_Msg
       
   247           )
       
   248           VALUES
       
   249           (p_PInstance_ID, v_PInstance_Log_ID, '@Created@ @AD_Column_ID@ ' || InitCap(Cur_Column.Table_Name) || '.' || InitCap(Cur_Column.Column_Name)) ;
       
   250       ELSE
       
   251         DBMS_OUTPUT.PUT_LINE('adding Table ' || InitCap(Cur_Column.Table_Name) || ' Column ' || InitCap(Cur_Column.Column_Name)) ;
       
   252       END IF;
       
   253     END LOOP; --  All new columns
   243     END LOOP; --  All new columns
   254     -- Summary info
   244     -- Summary info
   255     v_Message:='@Created@ = ' || v_count;
   245     v_Message:='@Created@ = ' || v_count;
   256     --<<FINISH_PROCESS>>
   246     --<<FINISH_PROCESS>>
   257     IF(p_PInstance_ID IS NOT NULL) THEN
   247     IF(p_PInstance_ID IS NOT NULL) THEN