Return to DINIT27K.m CVS log

Up to [Coherent Logic Development] / freem_fileman

Annotation of freem_fileman/DINIT27K.m, revision 1.1

1.1     ! snw         1: DINIT27K       ;SFISC/DPC - ORACLE (DELIMITED) FOREIGN FORMAT;6/10/93  13:35
        !             2:        ;;21.0;VA FileMan;;Dec 28, 1994
        !             3:        ;Per VHA Directive 10-93-142, this routine should not be modified.
        !             4:        F I=1:2 S X=$T(ENTRY+I) G:X="" ^DINIT28 S Y=$E($T(ENTRY+I+1),5,999),X=$E(X,4,999),@X=Y
        !             5:        Q
        !             6: ENTRY  ;
        !             7:        ;;^DIST(.44,.009,0)
        !             8:        ;;=ORACLE (DELIMITED)^,^^^^0^1^0^1^1^^1
        !             9:        ;;^DIST(.44,.009,1)
        !            10:        ;;=D ORACTL^DDXPLIB
        !            11:        ;;^DIST(.44,.009,3,0)
        !            12:        ;;=^^7^7^2930125^
        !            13:        ;;^DIST(.44,.009,3,1,0)
        !            14:        ;;=Use this format to export data to an Oracle table.  Data will be exported
        !            15:        ;;^DIST(.44,.009,3,2,0)
        !            16:        ;;=in comma-delimited format and non-numeric fields will be surrounded by
        !            17:        ;;^DIST(.44,.009,3,3,0)
        !            18:        ;;=quotes.  The user will be prompted for field names.  The field names
        !            19:        ;;^DIST(.44,.009,3,4,0)
        !            20:        ;;=should be the column_names in the Oracle table.  Also, the user will need
        !            21:        ;;^DIST(.44,.009,3,5,0)
        !            22:        ;;=to supply the maximum length of a record to be exported.  By default, data
        !            23:        ;;^DIST(.44,.009,3,6,0)
        !            24:        ;;=will be imported into a table with the same name as that of the export
        !            25:        ;;^DIST(.44,.009,3,7,0)
        !            26:        ;;=template.
        !            27:        ;;^DIST(.44,.009,4,0)
        !            28:        ;;=^^13^13^2930125^
        !            29:        ;;^DIST(.44,.009,4,1,0)
        !            30:        ;;=This format produces a control file to be used with Oracle's SQL*LOADER
        !            31:        ;;^DIST(.44,.009,4,2,0)
        !            32:        ;;=utility to load data into a preexisting Oracle table.  The control file is
        !            33:        ;;^DIST(.44,.009,4,3,0)
        !            34:        ;;=complete as created, but you may edit the file to modify the import.  By
        !            35:        ;;^DIST(.44,.009,4,4,0)
        !            36:        ;;=default, the data will be imported into a table with the same name as that
        !            37:        ;;^DIST(.44,.009,4,5,0)
        !            38:        ;;=of the export template.  So, either that table must exist in your Oracle
        !            39:        ;;^DIST(.44,.009,4,6,0)
        !            40:        ;;=table_space with the columns specified when the export template was built
        !            41:        ;;^DIST(.44,.009,4,7,0)
        !            42:        ;;=or the exported file will need to be modified to show the correct
        !            43:        ;;^DIST(.44,.009,4,8,0)
        !            44:        ;;=table_name.  A minimum syntax for loading an export file named
        !            45:        ;;^DIST(.44,.009,4,9,0)
        !            46:        ;;=INTO_ORACLE.CTL would be:
        !            47:        ;;^DIST(.44,.009,4,10,0)
        !            48:        ;;= |TAB|
        !            49:        ;;^DIST(.44,.009,4,11,0)
        !            50:        ;;=       SQLLOAD USERID=username/password, CONTROL=INTO_ORACLE.CTL|TAB|
        !            51:        ;;^DIST(.44,.009,4,12,0)
        !            52:        ;;= 
        !            53:        ;;^DIST(.44,.009,4,13,0)
        !            54:        ;;=Of course, other options are available.  Consult your Oracle documentation.
        !            55:        ;;^DIST(.44,.009,5,0)
        !            56:        ;;=^.441^^