crear pedido venta desde archivo venta

Buenos días Laura/Cristina,

Estoy intentando hacer un proceso para crear un pedido de venta que se ha borrado pero que mantiene su archivo.

Tomando como modelo el proceso de archivar de Navision he puesto el siguiente código:

SalesHeader.INIT;
SalesHeader.TRANSFERFIELDS(Rec);
SalesHeader.COPYLINKS(Rec);
SalesHeader.INSERT;

SalesLineArchive.SETRANGE(“Document Type”, Rec.”Document Type”);
SalesLineArchive.SETRANGE(“Document No.”, Rec.”No.”);
SalesLineArchive.SETRANGE(“Doc. No. Occurrence”, Rec.”Doc. No. Occurrence”);
SalesLineArchive.SETRANGE(“Version No.”, Rec.”Version No.”);
IF SalesLineArchive.FINDFIRST THEN
REPEAT
SalesLine.INIT;
SalesLine.TRANSFERFIELDS(SalesLineArchive);
SalesLine.COPYLINKS(SalesLineArchive);
SalesLine.INSERT;
UNTIL SalesLine.NEXT = 0;

Si hago sólo la cabecera me genera correctamente el pedido con el número se serie original pero si inserto las líneas con el REPEAT UNTIL me hace una cosa rara porque me busca la primera línea del archivo y en vez de salirse si sólo tiene una línea continua con el proceso buscando la primera línea de otro pedido y ya me dice que existe.

He probado a quitar el REPEAT UNTIL y funciona insertándome una única línea.

No encuentro dónde esta el error. Si pudierais echarme una mano, os lo agradecería muchísimo.

Saludos y espero que hayáis tenido un buen fin de semana.

Javier