Insert_object

Internφ programovacφ jazykC/C++Pascal

function Insert_object(var name : string; category : short; var objnum : short) : Boolean;
BOOL [cd_]Insert_object([cdp_t cdp], const char * name, tcateg category, tobjnum * objnum);
function [cd_]Insert_object([cdp : cdp_t]; name : PChar; category : tcateg; var objnum : tobjnum) : Boolean;

Parametry

name jmΘno objektu;
category kategorie objektu;
objnum vrßcenß hodnota: Φφslo objektu.
[cdp kontextovß prom∞nnß klienta]

Popis

Z°φdka pou₧φvanß funkce, kterß p°i b∞hu programu vytvo°φ nov² objekt zadanΘ kategorie category a zadanΘho jmΘna name. V parametru objnum vrßtφ Φφslo vytvo°enΘho objektu.

Parametr category musφ b²t jedna z konstant CATEG_VIEW, CATEG_CURSOR, CATEG_MENU, CATEG_PGMSRC, CATEG_APPL, CATEG_PICT, CATEG_ROLE, CATEG_CONNECTION, CATEG_RELATION, CATEG_DRAWING, CATEG_REPLREL.

Funkce vlo₧φ zßznam s Φφslem objnum do p°φsluÜnΘ systΘmovΘ tabulky (OBJTAB). Po zavolßnφ funkce je t°eba do sloupce prom∞nnΘ dΘlky DEFIN zapsat textovou definici objektu.

Pro vytvo°enφ tabulky se pou₧ije SQL p°φkaz CREATE TABLE. Pro vytvo°enφ pevnΘho dotazu m∙₧ete pou₧φt SQL p°φkaz CREATE VIEW. Pro vytvo°enφ ulo₧enΘ procedury nebo triggeru m∙₧ete pou₧φt SQL p°φkazy CREATE PROCEDURE nebo CREATE TRIGGER. Pro vytvß°enφ u₧ivatele se pou₧ije funkce Create_user. Pro vytvo°enφ skupiny u₧ivatel∙ se pou₧φvß funkce Create_group.

Hodnota funkce

Funkce vracφ p°i ·sp∞chu FALSE, p°i ne·sp∞chu TRUE.

P°φklad Vytvo°enφ pohledu z definice ulo₧enΘ v souboru:

Reset(f,"D:\aaa.vwd");
if not Insert_object("POHLED1",CATEG_VIEW,objnum) then begin
  while not Eof(f) do begin
    Read(f,str);
    str := str+Chr(13)+Chr(10);
    delka := Strlength(str);
    Objtab[objnum].DEFIN[pozice,delka]:= str;
    pozice := pozice+delka;
  end;
end else Signalize;

Viz