BEGIN
SELECT JobOrdersSN_ID
FROM PLMOperations
WHERE ID = :OBJID
INTO mJOSN_ID;
IF (mJOSN_ID IS NOT NULL) THEN BEGIN /* Dispname bude i se SN */
SELECT JODQ.Code||'-'||JO.OrdNumber||'/'||JOP.Code||', '|| /* displayname vyr. prikazu */
MISC.Code||', '|| /* kod skl. karty */
JOR.Posindex||', '||SB.Name /* cislo operace */
FROM PLMOperations O
JOIN PLMJobOrdersRoutines JOR ON JOR.ID = O.JobOrdersRoutines_ID
JOIN PLMJOOutputItems MI ON MI.ID = JOR.Parent_ID
JOIN PLMJONodes JON ON JON.ID = MI.Owner_ID
JOIN StoreCards MISC ON MISC.ID = JON.StoreCard_ID
JOIN PLMJobOrders JO ON JO.ID = JON.Parent_ID
JOIN DocQueues JODQ ON JODQ.ID = JO.DocQueue_ID
JOIN Periods JOP ON JOP.ID = JO.Period_ID
JOIN PLMJobOrdersSN JOSN ON JOSN.ID = O.JobOrdersSN_ID
JOIN StoreBatches SB ON JOSN.StoreBatch_ID = SB.ID
WHERE O.ID=:OBJID
INTO DISPNAME;
END ELSE BEGIN /* Dispname bez SN */
SELECT JODQ.Code||'-'||JO.OrdNumber||'/'||JOP.Code||', '|| /* displayname vyr. prikazu */
MISC.Code||', '|| /* kod skl. karty */
JOR.Posindex /* cislo operace */
FROM PLMOperations O
JOIN PLMJobOrdersRoutines JOR ON JOR.ID = O.JobOrdersRoutines_ID
JOIN PLMJOOutputItems MI ON MI.ID = JOR.Parent_ID
JOIN PLMJONodes JON ON JON.ID = MI.Owner_ID
JOIN StoreCards MISC ON MISC.ID = JON.StoreCard_ID
JOIN PLMJobOrders JO ON JO.ID = JON.Parent_ID
JOIN DocQueues JODQ ON JODQ.ID = JO.DocQueue_ID
JOIN Periods JOP ON JOP.ID = JO.Period_ID
WHERE O.ID=:OBJID
INTO DISPNAME;
END
SUSPEND;
END;