TContainer - Exemples

uses QuBESStock;

// Création d'un contenant :
// - dont le code Qubes est '75'
// - qui possède un identifiant physique (code-barres, RFID, etc) : '123450000000000075'
// - du type PAL (palettier dans l'exemple)
// - positionné dans le contenant nommé 'MAGASIN 1'
// - ce contenant est fixe et se trouve dans le site dont le code est 'ATELIER 1'
CreateContainer('75', '123450000000000075', 'PAL', 'MAGASIN 1', 'ATELIER 1');

var cont : TContainer;

// Connexion au contenant par son GPAOID
cont:=TContainer.Connect('75');
PrintLn(cont.GPAO_ID);
PrintLn(cont.UM_ID);
PrintLn(cont.SiteName);

// Connexion au contenant par son UMID
cont:=TContainer.ConnectByUMID('123450000000000075');
PrintLn(cont.GPAO_ID);
PrintLn(cont.UM_ID);
PrintLn(cont.SiteName);