DDMP SPECS 1 (.4611)    BLOCK (.404)

Name Value
NAME DDMP SPECS 1
DATA DICTIONARY NUMBER .44
DESCRIPTION
Block contains specifications of data import including source file, VA
FileMan target file, and format of the incoming data.
FIELD
  • FIELD ORDER:   1
    CAPTION:   DATA IMPORT
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   1,35
  • FIELD ORDER:   7.2
    CAPTION:   Primary file
    POST ACTION ON CHANGE:   D FILESEL^DDMPSM
    FIELD TYPE:   FORM ONLY
    READ TYPE:   POINTER
    QUALIFIERS:   1:ANEF
    HELP:   
    Enter the name or number of the VA FileMan file into which the data will
    be imported.  If the FileMan file is specified in the source file, enter
    nothing here.
    
    SAVE CODE:   S DDMPSELF=X
    SCREEN:   S DIR("S")="N DIFILE,DIAC S DIFILE=Y,DIAC=""WR"" D ^DIAC I DIAC"
    UNIQUE NAME:   F_SEL
    DATA COORDINATE:   12,61
    DATA LENGTH:   18
    CAPTION COORDINATE:   12,47
  • FIELD ORDER:   5
    CAPTION:   DATA FORMAT
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   4,16
  • FIELD ORDER:   5.1
    CAPTION:   -----------
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   5,16
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   5.2
    CAPTION:   Internal or external
    FIELD TYPE:   FORM ONLY
    READ TYPE:   SET OF CODES
    PARAMETERS:   OM
    QUALIFIERS:   E:EXTERNAL;I:INTERNAL
    HELP:   
    Specify whether the imported data is in internal or external format.
    Internal format means the way the data is stored inside of VA FileMan
    files.  External means the format that a user enter.
    
    SAVE CODE:   S DDMPIORE=X
    UNIQUE NAME:   INT_EXT
    DATA COORDINATE:   6,23
    DATA LENGTH:   8
    CAPTION COORDINATE:   6,1
    DEFAULT:   External
  • FIELD ORDER:   5.3
    CAPTION:   Foreign format
    POST ACTION ON CHANGE:   D FF^DDMPSM
    FIELD TYPE:   FORM ONLY
    READ TYPE:   POINTER
    QUALIFIERS:   .44:EAM
    HELP:   
    Enter the foreign format that corresponds to the structure of the data
    being imported.  These formats are stored in the Foreign Format file.  If
    you do not choose a format here, you must specify whether the incoming
    data is fixed length, what the field delimiter is (if any), and whether
    some field values are quoted.  If you enter a format here, any attributes
    of the format that you specified below will be deleted.
    
    UNIQUE NAME:   FOR_FMT
    DATA COORDINATE:   8,23
    DATA LENGTH:   17
    CAPTION COORDINATE:   8,7
  • FIELD ORDER:   5.5
    CAPTION:   Data fixed length?
    POST ACTION ON CHANGE:   S DDMPSMFF("FIXED")=DDSEXT
    FIELD TYPE:   FORM ONLY
    READ TYPE:   YES OR NO
    HELP:   
    Enter YES or NO.
    If the incoming data is in fixed length fields, enter YES.
    If the fields are delimited by a special character, enter NO and enter the
    field delimiter at the prompt below.
    
    UNIQUE NAME:   FIX
    DATA COORDINATE:   10,23
    DATA LENGTH:   3
    CAPTION COORDINATE:   10,4
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   5.6
    CAPTION:   Field delimiter
    POST ACTION ON CHANGE:   S DDMPSMFF("FDELIM")=DDSEXT
    FIELD TYPE:   FORM ONLY
    READ TYPE:   FREE TEXT
    QUALIFIERS:   1:15
    HELP:   
    If the incoming data is not in fixed length fields, enter the character or
    characters that separate fields.  
     
    Identify the delimiter either by 1-15 characters or by the delimiter's 3
    digit ascii value.  Up to 4 ascii-character values can be specified,
    separated by commas.  Use the ascii value when the delimiter is a
    non-printing character (e.g., <TAB>, ascii=009) or a character that has a
    special meaning at a ScreenMan prompt (e.g., ^, ascii=094).
    
    INPUT TRANSFORM:   K:$L(X)>15!($L(X)<1)!'((X?1AP.E)!(X?3N)!(X?3N1","3N)!(X?3N1","3N1","3N)!(X?3N1","3N1","3N1","3N)) X
    UNIQUE NAME:   FLD_DLM
    DATA COORDINATE:   11,23
    DATA LENGTH:   3
    CAPTION COORDINATE:   11,6
  • FIELD ORDER:   5.7
    CAPTION:   Fields quoted?
    POST ACTION ON CHANGE:   S DDMPSMFF("QUOTED")=DDSEXT
    FIELD TYPE:   FORM ONLY
    READ TYPE:   YES OR NO
    HELP:   
    If the values of some fields are surrounded by quotation marks ("), enter
    YES.  Field delimiters that occur within the quotation marks are ignored.
    This special treatment of quotation marks is not done for fixed length
    data.
    
    UNIQUE NAME:   QUOTE
    DATA COORDINATE:   12,23
    DATA LENGTH:   3
    CAPTION COORDINATE:   12,8
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   2
    CAPTION:   Page 1
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   1,72
  • FIELD ORDER:   7.4
    CAPTION:   !M
    EXECUTABLE CAPTION:   S Y=$S($$GET^DDSVALF("F_SEL",1,1)]"":"Field selection page...",1:"")
    BRANCHING LOGIC:   S DDSBR="FLD^1^2"
    PRE ACTION:   I $$GET^DDSVALF("TMP_NM",1,1)]"" N DDMPMSG S DDMPMSG(1)="You cannot select fields because you have specified an Import Template for this import.",DDMPMSG(2)="$$EOP" D HLP^DDSUTL(.DDMPMSG) S DDSBR="TMP_NM"
    FIELD TYPE:   FORM ONLY
    READ TYPE:   FREE TEXT
    HELP:   
    Press <RET> to advance to the Field Selection Page.
    
    UNIQUE NAME:   FLD_JUMP
    DATA COORDINATE:   14,69
    DATA LENGTH:   1
    CAPTION COORDINATE:   14,44
    SUPPRESS COLON AFTER CAPTION?:   YES
    DISABLE EDITING:   YES
  • FIELD ORDER:   5.4
    CAPTION:   OR
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   9,14
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   7.6
    CAPTION:   !M
    EXECUTABLE CAPTION:   S Y=$S($$GET^DDSVALF("F_SEL",1,1)]"":"OR",1:"")
    FIELD TYPE:   CAPTION ONLY
    UNIQUE NAME:   OR
    CAPTION COORDINATE:   15,54
  • FIELD ORDER:   7.8
    CAPTION:   !M
    EXECUTABLE CAPTION:   S Y=$S($$GET^DDSVALF("F_SEL",1,1)]"":"Import Template",1:"")
    PRE ACTION:   I $D(DDMPFDSL) N DDMPMSG S DDMPMSG(1)="You have already chosen fields for this import. You may not select an Import Template unless you delete all the chosen fields.",DDMPMSG(2)="$$EOP" D HLP^DDSUTL(.DDMPMSG) S DDSBR="FLD_JUMP"
    FIELD TYPE:   FORM ONLY
    READ TYPE:   POINTER
    QUALIFIERS:   .46:AE
    HELP:   
    Enter the name of an Import Template to use for data import.  If you do
    not specify a template, you must specify the fields on the Field Selection
    page.
    
    INPUT TRANSFORM:   S X=$TR(X,"[]")
    SAVE CODE:   S DDMPTMPL=X
    SCREEN:   S DIR("S")="I $$TMPLSCR^DDMPSM(DDMPF,DDSEXT,.DUZ)"
    UNIQUE NAME:   TMP_NM
    DATA COORDINATE:   16,61
    DATA LENGTH:   18
    CAPTION COORDINATE:   16,44
    DISABLE EDITING:   YES
  • FIELD ORDER:   1.1
    CAPTION:   ===========
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   2,35
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   6
    CAPTION:   SOURCE FILE
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   4,53
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   6.1
    CAPTION:   -----------
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   5,53
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   6.2
    CAPTION:   Full path
    FIELD TYPE:   FORM ONLY
    READ TYPE:   FREE TEXT
    QUALIFIERS:   1:245
    HELP:   
    Enter the full path to the host file that contains the data you want to
    import.  Do not include the name of the file itself.
    
    SAVE CODE:   S DDMPHOST("PATH")=X
    UNIQUE NAME:   PTH
    DATA COORDINATE:   6,61
    DATA LENGTH:   19
    CAPTION COORDINATE:   6,50
    DEFAULT:   !M
    EXECUTABLE DEFAULT:   S Y=$$PWD^%ZISH
  • FIELD ORDER:   6.3
    CAPTION:   Host file name
    FIELD TYPE:   FORM ONLY
    READ TYPE:   FREE TEXT
    QUALIFIERS:   1:100
    HELP:   
    ^D HOSTHELP^DDMPSM1
    
    SAVE CODE:   S DDMPHOST("FILE")=X
    UNIQUE NAME:   HST_FL
    DATA COORDINATE:   7,61
    DATA LENGTH:   19
    CAPTION COORDINATE:   7,45
  • FIELD ORDER:   7
    CAPTION:   VA FILEMAN FILE
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   10,51
    SUPPRESS COLON AFTER CAPTION?:   YES
  • FIELD ORDER:   7.1
    CAPTION:   ---------------
    FIELD TYPE:   CAPTION ONLY
    CAPTION COORDINATE:   11,51
    SUPPRESS COLON AFTER CAPTION?:   YES