Add useful import snippets here

Program examples

Creating Customer Groups

next_token();//Group Code
if (code[0]) 
{
        if (!lookup(&ifdb[DRTYP], code))
                srec->drtype = ifdb[DRTYP].offset->ptr.record;
        else
        {
                struct s_sdrtyp *sdrtyp = recbuf[SDRTYP];
                getbuc(&fdb[DRTYP], IMPORT_DEFREC, sdrtyp);
                strncpy(sdrtyp->drtcode, code, sizeof(sdrtyp->drtcode)-1);
                strncpy(sdrtyp->drtname,"ADDED BY IMPORT",sizeof(sdrtyp->drtname)-1);
                addrec(&fdb[DRTYP], sdrtyp, drt_extnflds);
                printf("%s added group\n", code);
                
                if (lookup(&ifdb[DRTYP], code))
                        printf("Error adding group '%s'\n",code);
                else
                        srec->drtype = ifdb[DRTYP].offset->ptr.record;
        }
}

Creating Salespeople on the fly

next_token();// Account Dealer
if(!lookup(&ifdb[SMAN],code))
        srec->salesman = ifdb[SMAN].offset->ptr.record;
else if(code[0])
        {
        struct s_ssman *ssman = recbuf[SSMAN];
        getbuc(&fdb[SMAN],IMPORT_DEFREC,ssman);
        strncpy(ssman->smcode,code,sizeof(ssman->smcode)-1);
        strncpy(ssman->smname,"ZZ ADDED BY IMPORT",sizeof(ssman->smname)-1);
        addrec(&fdb[SMAN],ssman,sm_extnflds);
        if(!lookup(&ifdb[SMAN],code))
                {
                srec->salesman = ifdb[SMAN].offset->ptr.record;
                printf("Added salesman: '%s'\n",code);
                }
        else
                printf("Error adding salesman: '%s'\n",code);
                
        }