INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) S X=$$CHKDD^DIFROMSD(D1,+$G(X),"N") K:X'>0 X S:$D(X) DINUM=+X,X=$P(X,"^",2)
LAST EDITED: AUG 29, 1994
HELP-PROMPT: Enter a valid DD number for this file.
DESCRIPTION: DD NUMBER pertains to the file's number or any multiple field contained within the file.
This list starts with the file's top level number followed by a list of multiple fields contained within the file, if any. These DO NOT represent Field Number(s).
The nesting levels are not represented. All the DD NUMBERs, file number and multiple fields, have been flatten to a single list.
After selecting a valid DD NUMBER you will then be prompted to select field number(s).
If a DD NUMBER is selected and no fields are selected, KIDS will send all the fields contained within, including multiple fields below the selected level.
EXECUTABLE HELP: D DDIOLDD^DIFROMSD(D1)
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 9.641^APDD^MUMPS
1)= S ^XPD(9.6,DA(2),4,"APDD",DA(1),DA)=""
2)= K ^XPD(9.6,DA(2),4,"APDD",DA(1),DA)
Used to create an array structure containing Partial DDs. This array is passed to FIA^DIFROMSU as a list of DD numbers and fields to transport.