BINILOAD example

The record type ARTICLE is stored in the database SHIPPING. The file SHIPPING.REC00009.00005 generated by BOUTLOAD is used as the input file.

/ADD-FILE-LINK LINK-NAME=DATABASE,FILE-NAME=SHIPPING.DBDIR
/SELECT-PRODUCT-VERSION PRODUCT-NAME=UDS-SQL,    VERSION=02.9B00  
/START-UDS-BINILOAD
***** START        BINILOAD     (UDS/SQL  V2.9  1801 )     2019-01-29   09:27:54
 EXECUTION WITH CHECK.     
 SCHEMA NAME IS MAIL-ORDERS    
 SUBSCHEMA NAME IS ADMIN    
 USER FILE RECORD LENGTH IS  112  
 USER FILE BUFFER LENGTH IS 8192  
 INPUT FILE 'SHIPPING.REC00009.00005 
 INPUT RECORDNUMBER IS       55   
 STORE RECORD NAME IS ARTICLE  
 RECORD-DBKEY IS DISPL IS 0 , LENGTH IS 8  
 RECORD-DISPL IS 0 , DISPL IS   25 , LENGTH IS   87 
 RECORD-AREA NAME IS CLOTHING   
 INSERT INTO SET NAME IS P-ORD-SPEC  
 OWNER DBKEY IS DISPL IS    8 , LENGTH IS 8 
 INSERT INTO SET NAME IS MIN-STOCK-LEVEL  
 OWNER KEY IS DISPL IS   16 , LENGTH IS 1  
 INSERT INTO SET NAME IS ARTICLES-AVAILABLE  
 OWNER DBKEY IS DISPL IS   17 , LENGTH IS 8 
 END   
 BEGIN CHECK-RUN  
 *** DATE AND TIME 2019-01-29  09:27:54    
 BEGIN ALLOCATION  
 *** DATE AND TIME 2019-01-29  09:27:54
 
 SET_NAME: P-ORD-SPEC 
 SET_REF:     7  
 SORTKEY TABLE, DBTT_COLUMN_NR:     1  
 *** ICRELES: MOVE_ROUTINE SORTKF CREATED 
 CALCKEY TABLE - INDIRECT   
 *** DATE AND TIME 2019-01-29  09:27:54  
 BEGIN TABLE-PROCESSOR   
 *** DATE AND TIME 2019-01-29  09:27:54
 
 SET_NAME: MIN-STOCK-LEVEL 
 SET_REF:     8    
 SORTKEY TABLE, DBTT_COLUMN_NR:     1  
 BEGIN TABLE-PROCESSOR
 *** DATE AND TIME 2019-01-29  09:27:54

 SET_NAME: ARTICLES-AVAILABLE 
 SET_REF:    12 
 SORTKEY TABLE, DBTT_COLUMN_NR:     1  
 BEGIN TABLE-PROCESSOR 
 *** DATE AND TIME 2019-01-29  09:27:55 
 SEARCHKEY TABLE, DBTT_COLUMN_NR:     2  
 INDIRECT CALC-SEARCH-KEY BUCKETS 
 INDIRECT CALC-SEARCH-KEY BUCKETS 
 *** NO ERRORS DETECTED DURING CHECK-RUN 
 END CHECK-RUN  
 *** DATE AND TIME 2019-01-29  09:27:55 
 BEGIN ALLOCATION  
 *** DATE AND TIME 2019-01-29  09:27:55 
 *** DATABASE IS IN USE
  
 SET_NAME: P-ORD-SPEC   
 SET_REF:     7  
 SORTKEY TABLE, DBTT_COLUMN_NR:     1  
 *** ICRELES: MOVE_ROUTINE SORTKF CREATED
 CALCKEY TABLE - INDIRECT 
*** DATE AND TIME 2019-01-29  09:27:55 
 BEGIN TABLE-PROCESSOR 
*** DATE AND TIME 2019-01-29  09:27:55 
 
 SET_NAME: MIN-STOCK-LEVEL 
 SET_REF:     8  
 SORTKEY TABLE, DBTT_COLUMN_NR:     1
 BEGIN TABLE-PROCESSOR 
 *** DATE AND TIME 2019-01-29  09:27:55 
 
 SET_NAME: ARTICLES-AVAILABLE 
 SET_REF:    12 
 SORTKEY TABLE, DBTT_COLUMN_NR:     1 
 BEGIN TABLE-PROCESSOR  
 *** DATE AND TIME 2019-01-29  09:27:55 
 SEARCHKEY TABLE, DBTT_COLUMN_NR:     2  
 INDIRECT CALC-SEARCH-KEY BUCKETS  
 INDIRECT CALC-SEARCH-KEY BUCKETS 
 BEGIN STORE DB-RECORD 
 *** DATE AND TIME 2019-01-29  09:27:55 
 STORING DATABASE RECORDS 
 END STORE DB-RECORD
                                                                   
 *** DATE AND TIME 2019-01-29  09:27:55
 END CLOSE
 *** DATE AND TIME 2019-01-29  09:27:55
 
 ***** DIAGNOSTIC SUMMARY OF BINILOAD
  
              NO WARNINGS   
              NO ERRORS   
              NO SYSTEM-ERRORS
 
              55 RECORDS  STORED
 
 ***** END OF DIAGNOSTIC SUMMARY 
 ***** NR OF DATABASE ACCESSES  :          196 
 ***** NORMAL END   BINILOAD     (UDS/SQL  V2.9  1801 )    2019-01-29   09:27:55

BINILOAD input file:

For an example of how BINILOAD and BOUTLOAD work together, refer to "Examples".