home *** CD-ROM | disk | FTP | other *** search
/ Shareware 1 2 the Maxx / sw_1.zip / sw_1 / BUSI / SHIPPERS.ZIP / PLUS.LZH / SHIP3.STC < prev    next >
Text File  |  1992-10-25  |  811b  |  36 lines
  1. char SHIP3_1_Pic[] = "8#.2#";
  2. char SHIP3_2_Pic[] = "15X";
  3.  
  4. char SHIP3_1_Nam[] = "PAYMENT";
  5. char SHIP3_2_Nam[] = "SHIP_NUMBER";
  6.  
  7. typedef struct {
  8.     long recstat;
  9.     char PAYMENT[12];
  10.     char SHIP_NUMBER[16];
  11.     word datasize;
  12.     word numflds;
  13.     fldarrptr flds;
  14.     fldtyp     _PAYMENT,
  15.     _SHIP_NUMBER;
  16. } SHIP3typ;
  17.  
  18. SHIP3typ SHIP3;
  19.  
  20. void initSHIP3(void)
  21. {
  22.     SHIP3._PAYMENT.faddr = SHIP3.PAYMENT;
  23.     SHIP3._PAYMENT.pic = SHIP3_1_Pic;
  24.     SHIP3._PAYMENT.fname = SHIP3_1_Nam;
  25.     SHIP3._PAYMENT.typ = _Num;
  26.     SHIP3._PAYMENT.dsec = 0;
  27.     SHIP3._SHIP_NUMBER.faddr = SHIP3.SHIP_NUMBER;
  28.     SHIP3._SHIP_NUMBER.pic = SHIP3_2_Pic;
  29.     SHIP3._SHIP_NUMBER.fname = SHIP3_2_Nam;
  30.     SHIP3._SHIP_NUMBER.typ = _Ch;
  31.     SHIP3._SHIP_NUMBER.dsec = 0;
  32.     SHIP3.datasize = 32;
  33.     SHIP3.numflds = 2;
  34.     SHIP3.flds = (fldarrptr)&SHIP3._PAYMENT;
  35. }
  36.