How do I crop with "delete cropped pixels" unchecked in a script

Question

I need to use crop feature with "delete cropped pixels" unchecked in a script.  Is that possible?
Thanks,
Tom

Answer 1

This uses the Array from a Selection, but you can also just set the numbers in the Script.
/* 2013, use it at your own risk */
#target photoshop
if (app.documents.length > 0) {
activeDocument.suspendHistory('cropping', 'main()')
////// the operation //////
function main () {
var myDocument = app.activeDocument;
// set to pixels;
var originalRulerUnits = app.preferences.rulerUnits;
app.preferences.rulerUnits = Units.PIXELS;
var originalResolution = myDocument.resolution;
myDocument.resizeImage(undefined, undefined, 72, ResampleMethod.NONE);
// get selection bounds;
var theArray = myDocument.selection.bounds;
cropImage (theArray);
// reset;
app.preferences.rulerUnits = originalRulerUnits;
myDocument.resizeImage(undefined, undefined, originalResolution, ResampleMethod.NONE);
////// crop image //////
function cropImage (theArray) {
// set to pixels;
var originalRulerUnits = app.preferences.rulerUnits;
app.preferences.rulerUnits = Units.PIXELS;
// =======================================================
var idCrop = charIDToTypeID( "Crop" );
    var desc7 = new ActionDescriptor();
    var idT = charIDToTypeID( "T   " );
        var desc8 = new ActionDescriptor();
        var idTop = charIDToTypeID( "Top " );
        var idRlt = charIDToTypeID( "#Rlt" );
        desc8.putUnitDouble( idTop, idRlt, theArray[1] );
        var idLeft = charIDToTypeID( "Left" );
        var idRlt = charIDToTypeID( "#Rlt" );
        desc8.putUnitDouble( idLeft, idRlt, theArray[0] );
        var idBtom = charIDToTypeID( "Btom" );
        var idRlt = charIDToTypeID( "#Rlt" );
        desc8.putUnitDouble( idBtom, idRlt, theArray[3] );
        var idRght = charIDToTypeID( "Rght" );
        var idRlt = charIDToTypeID( "#Rlt" );
        desc8.putUnitDouble( idRght, idRlt, theArray[2] );
    var idRctn = charIDToTypeID( "Rctn" );
    desc7.putObject( idT, idRctn, desc8 );
    var idAngl = charIDToTypeID( "Angl" );
    var idAng = charIDToTypeID( "#Ang" );
    desc7.putUnitDouble( idAngl, idAng, 0.000000 );
    var idDlt = charIDToTypeID( "Dlt " );
    desc7.putBoolean( idDlt, false );
    var idcropAspectRatioModeKey = stringIDToTypeID( "cropAspectRatioModeKey" );
    var idcropAspectRatioModeClass = stringIDToTypeID( "cropAspectRatioModeClass" );
    var idunconstrained = stringIDToTypeID( "unconstrained" );
    desc7.putEnumerated( idcropAspectRatioModeKey, idcropAspectRatioModeClass, idunconstrained );
executeAction( idCrop, desc7, DialogModes.NO );
// reset;
app.preferences.rulerUnits = originalRulerUnits;