HcmPositionHirarchy To whom position needs to report in upper ranking in AX 2012 / D365

Hi,

static void AlfPositionHirarchyUP(Args _args)
{
    HcmWorker                   HcmWorker;
    HcmPositionWorkerAssignment HcmPositionWorkerAssignment;
    HcmPositionHierarchy        HcmPositionHierarchy;
    HcmPositionRecId            positionRecId;
 
    positionRecId = HcmPosition::findByPosition(HcmWorker::findByPersonnelNumber('701027').primaryPositionId()).RecId;

while(positionRecId>0)
{
    select * from HcmPositionHierarchy
        where HcmPositionHierarchy.Position ==positionRecId;

    positionRecId=HcmPositionHierarchy.ParentPosition ;
    if(HcmPositionHierarchy.ParentPosition)
    {
        print HcmWorker::find(HcmPosition::getReportsToWorker(HcmPositionHierarchy.Position)).name();
    }
}
pause;
}

Regards,

HcmPositionHirarchy under a position in AX 2012 /D365

Hi,

static void AlfPositionHirarchyDown(Args _args)
{
    HcmWorker                   HcmWorker;
    HcmPositionWorkerAssignment HcmPositionWorkerAssignment;
    HcmPositionHierarchy        HcmPositionHierarchyMan,HcmPositionHierarchy;
    HcmPositionRecId            positionRecId;
 
    positionRecId = HcmPosition::findByPosition(HcmWorker::findByPersonnelNumber('701027').primaryPositionId()).RecId;

    while select HcmPositionHierarchy where HcmPositionHierarchy.ParentPosition == positionRecId
    {
        print HcmWorker::find(HcmPosition::getWorker(HcmPositionHierarchy.Position)).name();
    }
    pause;
}

Regards,