Trzeba użyć dodatkowej aplikację, która to wykona.
Podejrzewam że gotowej się nie znajdzie (ale ręki sobie uciąć nie dam), więc ktoś musiałby ją napisać.
W każdym razie sam Subiekta automatycznie tego nie zrobi.
Potrzebna będzie jeszcze Sfera do Subiekta.

Albo zrobić ręcznie "dodaj na podstawie" i żadnej dodatkowej aplikacji nie będzie trzeba 

Sfera to tylko interfejs. Co napiszesz to dostaniesz.

Ze sklepu (presta shop) generuje listę paczek (towary adresy) - przy pakowaniu dochodzi do ostatecznej weryfikacji (czy np czegoś niema na magazynie) i równolegle są drukowane paragony.
 
I przy pakowaniu dochodzi do skanowania towarów. Jeśli wszystkie towary z paczki są zeskanowane pracownik zmienia status paczki na spakowaną. 

Mam takie pytanie... Skoro towary są skanowane to w czym problem, aby je od razu skanować do dokumentu paragonu ?

Cytat: dkozlowski w Styczeń 28, 2016, 19:16:26

Mam takie pytanie... Skoro towary są skanowane to w czym problem, aby je od razu skanować do dokumentu paragonu ?

Na stanowisku do pakowania są skanowane. Jest tam tylko tablet ze skanerem.

Będę drążył... Dlaczego nie postawisz komputera lub nie zainstalujesz Subiekta na tablecie ?

Poszedłbym w kierunku tworzenia plików ZK. Mogę je wygenerować na podstawie zeskanowanych produktów. Pozostaje problem automatycznego pobrania ZK przez subiekt. Dodając ręcznie ZK trzeba przeklikać kilka okienek. Czy jest możliwość uproszczenia tego procesu?

Jak już pisał @candy jak najbardziej jest taka możliwość.

Tak mi się zdaje, że ciągle nie możesz zrozumieć istoty działania Subiekta. Zatrzasnąłeś się na jakich paczkach, o których np ja nie mam pojęcia, bo takie w Subiekcie nie występuje i próbujesz do tego dopasowąc resztę. A mozesz iść wypracowanym w Subiekcie torem o dużo prościej i łatwiej.
Zasadą jest że ze sklepu internetowego złożone tam zamówienia są pobierane automatycznie do Subiekta jako Zamówienia od klienta. Z takiego Zamówienia magazynier robi WZ (dwoma kliknięciami) na którym tylko weryfikuje ilości towarów, zostawiając te, które są. Natępnym krokiem jest wystawienie do danej WZ (znowu dwa kliknięcia) paragonu. Zaletą jest to, ż przy usuwaniu pozycji z WZ (bo ich nie ma) tworzy się zutomatycznie Zamówinie różnicowe, które można zrealizować później jak się pojawi towar, a klient zechce poczekać.
Prosta, sprawdzona w bardzo wielu przypadkach ścieżka, prawie automatyczna, a na pewno eliminująca większość pomyłek.

Prawie osiągnąłem swój cel.

Pozostał mi problem z wydrukiem paragonu.

Otóż mam taki kod do dodania Paragonów z plików EPP:

Private Sub ImPAjakoFS()
    On Error GoTo ErrHandler
   
    Dim oSubGT As InsERT.Subiekt
    Dim oIm As InsERT.Importer
    Dim oImNagl As InsERT.ImNaglowek
    Dim oImDane As ADODB.Recordset
    Dim oField As ADODB.Field
    Dim oImBlWyk As InsERT.ImBladWykonania
    Dim iDokId As Integer
 
    Set oSubGT = UruchomSubiekta()          'Uruchomienie SubGT
    oSubGT.MagazynId = 2                'Zmiana magazynu
   
    'Wczytanie zamówień klientów z pliku EPP
    Set oIm = oSubGT.Importer
    oIm.WczytajPlik "C:\PA.epp", gtaWczytajDokumenty
   
    'Wyświetlenie informacji nagłówkowych o pliku EPP
    Set oImNagl = oIm.Naglowek
    Debug.Print "======== I N F O R M A C J E ========"
    Debug.Print oImNagl.Wartosc("Cel")
    Debug.Print oImNagl.Wartosc("StronaKodowa")
    Debug.Print oImNagl.Wartosc("Program")
    Debug.Print oImNagl.Wartosc("NadawcaSymbol")
    Debug.Print oImNagl.Wartosc("NadawcaNazwaPelna")
    Debug.Print oImNagl.Wartosc("NadawcaNIP")
    Debug.Print CDate(oImNagl.Wartosc("Data"))
   
    'Wyświetlenie informacji o paragonach zapisanych w pliku EPP
    Set oImDane = oIm.Dane
    If Not (oImDane.EOF And oImDane.BOF) Then
        oImDane.MoveFirst
    Else
        Exit Sub
    End If
   
    While Not oImDane.EOF
        Debug.Print "------------------------"
        For Each oField In oImDane.Fields
            Debug.Print oField.Name & ": " & oField.Value
        Next
        oImDane.MoveNext
    Wend
   
    'Próba zapisania pierwszego paragonu z pliku jako FS
    If Not (oImDane.EOF And oImDane.BOF) Then
        oImDane.MoveFirst
        iDokId = oImDane("dok_Id")
        Debug.Print iDokId
        oIm.ZapiszObiekt iDokId, gtaSubiektDokumentPA
    End If
   
    'Wyświetlenie błędów
    Debug.Print "========== B Ł Ę D Y =========="
    For Each oImBlWyk In oIm.BledyWykonania
        Debug.Print "------------------------"
        Debug.Print "IdObiektu: " & oImBlWyk.IdObiektu
        Debug.Print "KodBledu: " & oImBlWyk.KodBledu
        Debug.Print "Opis: " & oImBlWyk.Opis
        Debug.Print "TypDocelowy: " & oImBlWyk.TypDocelowy
    Next
   
    Exit Sub
   
ErrHandler:
    Debug.Print Err.Number & ": " & Err.Description
       
End Sub
Oraz Kod do wydruku Paragonu:

Sub RejestrujNaUF()
On Error GoTo ErrHandler
 
    Dim oSubGT As InsERT.Subiekt
    Dim oDok As InsERT.SuDokument
   
    Set oSubGT = UruchomSubiekta()
    Set oDok = oSubGT.SuDokumentyManager.Wczytaj("PA 1066/KR1/04/2016")
    oDok.RejestrujNaUF = True
    oDok.DrukarkaFiskalnaId = 4
    oDok.Drukuj (False)
    oDok.Zamknij
       
    Exit Sub
ErrHandler:
    MsgBox "Wystąpił błąd: " & Err.Number & " - " & Err.Description
End Sub
Potrzebuje wyciągnąć Numer Paragonu po dodaniu z pliku EPP. Tak abym mógł przekazać go do funkcji drukującej.