Axapta Create WH Location x++

static void CreateWHLocation(Args _args){    WMSLocation                 WMSLocationSource, WMSLocationCopy;    inventlocation              inventlocationSource,InventlocationCopy;      inventdim                   inventdim;    InventLocationId            InventLocationIdsource,newInventLocationId;    wMSLocationId               wMSLocationIdsource,newwMSLocationId;    ;

          InventLocationIdsource      = "IM-0001";        newInventLocationId         = "IM-0002";        wMSLocationIdsource         ="WMS001";        newwMSLocationId            = "WMS002";        if(!inventlocation::exist(newInventLocationId))        {            inventlocationSource = inventlocation::find(InventLocationIdsource);            if(inventlocationSource)            {                inventlocationcopy.clear();                inventlocationcopy = inventlocationSource.data();                inventlocationcopy.InventLocationId = newInventLocationId;                inventlocationcopy.insert();                info(strfmt('Create  wh :%1', inventlocationcopy.InventLocationId));            }        }
        if(!WMSLocation::exist(newInventLocationId,newwMSLocationId))        {            WMSLocationSource = WMSLocation::find(wMSLocationIdsource,InventLocationIdsource);            if(WMSLocationSource)            {                WMSLocationCopy.clear();                WMSLocationCopy = WMSLocationSource.data();                WMSLocationCopy.inventLocationId    = newInventLocationId;                WMSLocationCopy.wMSLocationId       = newwMSLocationId;                WMSLocationCopy.insert();                info(strfmt('Create  wh :%1 location : %2', newInventLocationId,newwMSLocationId));            }        }
        info('Success');}
============================  OR  ===================================
static void _CreateWMSLocation(Args _args){    inventdim                   inventdim;    WMSLocation                 WMSLocationSource, WMSLocationCopy;    ;    ttsbegin;    inventdim.InventLocationId  = 'FG4';    inventdim.wMSLocationId     = '2A03';    inventdim.inventBatchId     = '2018-25';
    if(!WMSLocation::exist(inventDim.wMSLocationId,inventDim.InventLocationId))    {        WMSLocationSource = WMSLocation::find(inventDim.wMSLocationId,'FG2');        WMSLocationCopy.clear();        WMSLocationCopy = WMSLocationSource.data();        WMSLocationCopy.inventLocationId = inventDim.InventLocationId;        WMSLocationCopy.insert();    }
    inventdim = inventdim::findOrCreate(inventdim);    ttscommit;    info(inventdim.inventdimid);}

ความคิดเห็น

โพสต์ยอดนิยมจากบล็อกนี้

เริ่ม ต้นเขียนโปรแกรมกับ กับ X++

date Functions Axapta X++