- DINIT27J ;SFISC/DPC-ORACLE (FIXED FORMAT) FOREIGN FORMAT ;2/26/93 10:59 AM
- ;;22.2;VA FileMan;;Jan 05, 2016;Build 42
- ;;Per VA Directive 6402, this routine should not be modified.
- ;;Submitted to OSEHRA 5 January 2015 by the VISTA Expertise Network.
- ;;Based on Medsphere Systems Corporation's MSC FileMan 1051.
- ;;Licensed under the terms of the Apache License, Version 2.0.
- ;
- F I=1:2 S X=$T(ENTRY+I) G:X="" ^DINIT27K S Y=$E($T(ENTRY+I+1),5,999),X=$E(X,4,999),@X=Y
- Q
- ENTRY ;
- ;;^DIST(.44,.008,0)
- ;;=ORACLE (FIXED FORMAT)^^^^^1^1^255^1^^^1
- ;;^DIST(.44,.008,1)
- ;;=D ORACTL^DDXPLIB
- ;;^DIST(.44,.008,3,0)
- ;;=^^5^5^2930125^
- ;;^DIST(.44,.008,3,1,0)
- ;;=Use this format to export data to an Oracle table. Data will be exported
- ;;^DIST(.44,.008,3,2,0)
- ;;=in fixed format. The user will be prompted for the length of each field
- ;;^DIST(.44,.008,3,3,0)
- ;;=and the field name. By default, the data will be imported into an Oracle
- ;;^DIST(.44,.008,3,4,0)
- ;;=table with the same name as the export template used to export the data.
- ;;^DIST(.44,.008,3,5,0)
- ;;=The field names should be the column_names in the Oracle table.
- ;;^DIST(.44,.008,4,0)
- ;;=^^14^14^2930125^
- ;;^DIST(.44,.008,4,1,0)
- ;;=This format produces a control file to be used with Oracle's SQL*LOADER
- ;;^DIST(.44,.008,4,2,0)
- ;;=utility to load data into a preexisting Oracle table. The control file is
- ;;^DIST(.44,.008,4,3,0)
- ;;=complete as created, but you may edit the file to modify the import. By
- ;;^DIST(.44,.008,4,4,0)
- ;;=default, the data will be imported into a table with the same name as that
- ;;^DIST(.44,.008,4,5,0)
- ;;=of the export template. Spaces in the export template name will be
- ;;^DIST(.44,.008,4,6,0)
- ;;=converted to underscores (_). So, either that table must exist in your
- ;;^DIST(.44,.008,4,7,0)
- ;;=Oracle table_space with the columns specified when the export template was
- ;;^DIST(.44,.008,4,8,0)
- ;;=built or the exported file will need to be modified to show the correct
- ;;^DIST(.44,.008,4,9,0)
- ;;=table_name. A minimum syntax for loading an export file named
- ;;^DIST(.44,.008,4,10,0)
- ;;=INTO_ORACLE.CTL would be:
- ;;^DIST(.44,.008,4,11,0)
- ;;=|TAB|
- ;;^DIST(.44,.008,4,12,0)
- ;;= SQLLOAD USERID=username/password, CONTROL=INTO_ORACLE.CTL|TAB|
- ;;^DIST(.44,.008,4,13,0)
- ;;=
- ;;^DIST(.44,.008,4,14,0)
- ;;=Of course, other options are available. Consult your Oracle documentation.
- ;;^DIST(.44,.008,5,0)
- ;;=^.441^^
- --- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HDINIT27J 2504 printed Feb 19, 2025@00:17:23 Page 2
- DINIT27J ;SFISC/DPC-ORACLE (FIXED FORMAT) FOREIGN FORMAT ;2/26/93 10:59 AM
- +1 ;;22.2;VA FileMan;;Jan 05, 2016;Build 42
- +2 ;;Per VA Directive 6402, this routine should not be modified.
- +3 ;;Submitted to OSEHRA 5 January 2015 by the VISTA Expertise Network.
- +4 ;;Based on Medsphere Systems Corporation's MSC FileMan 1051.
- +5 ;;Licensed under the terms of the Apache License, Version 2.0.
- +6 ;
- +7 FOR I=1:2
- SET X=$TEXT(ENTRY+I)
- if X=""
- GOTO ^DINIT27K
- SET Y=$EXTRACT($TEXT(ENTRY+I+1),5,999)
- SET X=$EXTRACT(X,4,999)
- SET @X=Y
- +8 QUIT
- ENTRY ;
- +1 ;;^DIST(.44,.008,0)
- +2 ;;=ORACLE (FIXED FORMAT)^^^^^1^1^255^1^^^1
- +3 ;;^DIST(.44,.008,1)
- +4 ;;=D ORACTL^DDXPLIB
- +5 ;;^DIST(.44,.008,3,0)
- +6 ;;=^^5^5^2930125^
- +7 ;;^DIST(.44,.008,3,1,0)
- +8 ;;=Use this format to export data to an Oracle table. Data will be exported
- +9 ;;^DIST(.44,.008,3,2,0)
- +10 ;;=in fixed format. The user will be prompted for the length of each field
- +11 ;;^DIST(.44,.008,3,3,0)
- +12 ;;=and the field name. By default, the data will be imported into an Oracle
- +13 ;;^DIST(.44,.008,3,4,0)
- +14 ;;=table with the same name as the export template used to export the data.
- +15 ;;^DIST(.44,.008,3,5,0)
- +16 ;;=The field names should be the column_names in the Oracle table.
- +17 ;;^DIST(.44,.008,4,0)
- +18 ;;=^^14^14^2930125^
- +19 ;;^DIST(.44,.008,4,1,0)
- +20 ;;=This format produces a control file to be used with Oracle's SQL*LOADER
- +21 ;;^DIST(.44,.008,4,2,0)
- +22 ;;=utility to load data into a preexisting Oracle table. The control file is
- +23 ;;^DIST(.44,.008,4,3,0)
- +24 ;;=complete as created, but you may edit the file to modify the import. By
- +25 ;;^DIST(.44,.008,4,4,0)
- +26 ;;=default, the data will be imported into a table with the same name as that
- +27 ;;^DIST(.44,.008,4,5,0)
- +28 ;;=of the export template. Spaces in the export template name will be
- +29 ;;^DIST(.44,.008,4,6,0)
- +30 ;;=converted to underscores (_). So, either that table must exist in your
- +31 ;;^DIST(.44,.008,4,7,0)
- +32 ;;=Oracle table_space with the columns specified when the export template was
- +33 ;;^DIST(.44,.008,4,8,0)
- +34 ;;=built or the exported file will need to be modified to show the correct
- +35 ;;^DIST(.44,.008,4,9,0)
- +36 ;;=table_name. A minimum syntax for loading an export file named
- +37 ;;^DIST(.44,.008,4,10,0)
- +38 ;;=INTO_ORACLE.CTL would be:
- +39 ;;^DIST(.44,.008,4,11,0)
- +40 ;;=|TAB|
- +41 ;;^DIST(.44,.008,4,12,0)
- +42 ;;= SQLLOAD USERID=username/password, CONTROL=INTO_ORACLE.CTL|TAB|
- +43 ;;^DIST(.44,.008,4,13,0)
- +44 ;;=
- +45 ;;^DIST(.44,.008,4,14,0)
- +46 ;;=Of course, other options are available. Consult your Oracle documentation.
- +47 ;;^DIST(.44,.008,5,0)
- +48 ;;=^.441^^