// u_mkSDE have been started, debug is false
// u_mkSDE have been finished after   0  secs of work. 
//	rc/position= 0 /Ok/create
// Table/View to SDE - convertor is here: func/struct = true;tbl=Indicator;prf=GSAU
struct GSAU_RIndicator : ASAI_TSde{
	TStr    note;
	TULong    messageNo;
	TULong    index_;
	TULong    id_;
	TChar    get_set;
 private:
    x_bool    isGood;
 public: 
    friend GSAU_API GSAU_RIndicator * WINAPI GSAU_iniIndicator( GSAU_RIndicator * r)
    ;
   ....

create                                    
table GSAU.Indicator (                         
  id        UNSIGNED INTEGER not null
                default Autoincrement,   
  messageNo   UNSIGNED INTEGER,
  index_       UNSIGNED INTEGER,
  id_          UNSIGNED INTEGER,
  get_set     CHAR( 1 ) NOT NULL DEFAULT 'n' REFERENCES db.TNoYes(id),
  note        VARCHAR( 512 ) DEFAULT '', 
  primary key (id)
);

char *    //  asai_ins: ASAI_TSde ->  "insert into table (...) values (...)" 
asai_linkI(
    const ASAI_TSde    * rec,
    const ASAI_TId     * id,
    const x_bool        useAux,
    const ulong          aux,
    void               * sqlda

)
{
long rc= 0 ;
char * _me =  "asai_linkI" ;


SQLDA * da = (SQLDA *)sqlda  ; /// <<<<!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!


uint     nFlds  =  0 ;     // actual number of fields in sde to be exchanged
char       comma = ' ';
TField    * f =  0 ;
char * t =  0 , * v =  0 ;
TChar     *  c =  0 ;
TTiny     * tn =  0 ;  TLong   * ln  =  0 ; TULong * ul =  0 ; TUShort * us = 0 ;
TShort    * sh =  0 ;  TDouble * tdb =  0 ; TStr   * st =  0 ;

ASAI_TDT      * dt =  0 ;

DECL_DATETIME * ddt =  0 ; // sybase struct
ASAI_TDateTime     * mdt =  0 ;     //my struct



ASAI_TSde *sde = ( ASAI_TSde *) rec;   // <<<< список хост переменных



ASAI_TDB        * asai = sde->database;

x_bool     useId = (id && *rec->id)?true:false ;
uint  msecs= 0 , secs= 0 ;
char * values =  ") values (" ;
x_sprintf (asai->bufP(),  "insert into %s (" , sde->fullName());

t =  x_addStr (t, asai->bufP());
v =  x_addStr (v, values);
if (useId ) {
    t  = x_addStr (t, sde->id);
    v  = x_addStr (v,  ":?" );
    comma = ',';


                                 // заполнение SQLDA  "хост"  переменными


    if (id->t == ASAI_I_ulong){
         da->sqlvar[nFlds].sqltype = DT_UNSINT;
         da->sqlvar[nFlds].sqllen  = sizeof(ulong);
         da->sqlvar[nFlds].sqldata = (void *)  &(id->v.u);
    }
    else if (id->t == ASAI_I_uhuge){
        ; // NRD
    }
    else{
         da->sqlvar[nFlds].sqltype = DT_STRING | DT_FIXCHAR;;
         da->sqlvar[nFlds].sqllen  = ASAI_KEY_SZ;
         da->sqlvar[nFlds].sqldata = (void *)&(id->v.c);
    }
    nFlds++;
}
for (f = sde->get(false);
        f !=  0 ;
             f = sde->get(true)){
//    asai->print(_me,  "adr of field/rc/name/type: %lu/%ld/%s/%hu" , 
//                          (ulong)f, rc, f->name, f->type);
    switch (f->type) {


                                 // заполнение SQLDA  "хост"  переменными


    case SDE_fKey:  
        if (asai->debug)
            x_printf( "\n...%s: name of fKey: %s" ,_me, f->name);
        x_sprintf (asai->bufP(),  "%c %s" , comma, f->name);
        t = x_addStr(t, asai->bufP());
        x_sprintf(asai->bufP(),  "%c :?" , comma);
        v = x_addStr(v, asai->bufP());
        comma     = ',';
        da->sqlvar[nFlds].sqltype = DT_UNSINT;
        da->sqlvar[nFlds].sqllen  = sizeof(ulong);
        da->sqlvar[nFlds].sqldata = (ulong *)f->field;
        nFlds++;
        break;
    .....

        SQLDA * da =  0 ;
        da = alloc_sqlda(sde->fields->len+(useId? 1 : 0 )+(useAux? 1 : 0 ));// столько полей живет в записи
        if(da) {
            _bf = asai_linkI(sde, useId?id: 0 , useAux, asai->aux,  da);
            if (_bf) {
                long rc1 = _OK;
                asai->print(_me,  "new insert= ->%s<-" ,  _bf);
                EXEC SQL PREPARE S3 FROM  :_bf;
                EXEC SQL EXECUTE S3 USING  DESCRIPTOR da; 
                rc = asai_sqlEr(_me, _bf,  ca);
                rc1 = asai_unLink(da,  0 , asai, true); // отвязал строчки от sqlda
                x_free(_bf);
            }
            free_sqlda(da);
        }
        else
            rc = _NOTMEM;

 
            GSAU_RCmd4Pmp  Cmd4Pmp  (database);
                 // тут можно присвоение перегрузить, что сделано в поздних версиях
                 // Cmd4Pmp.uid = c;
            Cmd4Pmp.uid.strTo(c, db->buf);  // uid  into the record, db->buf buffer
            rc = Cmd4Pmp.Insert(&p);          // timestamp'll setup by sql server