Difference between revisions of "Troubleshooting picking ricevimenti da creazione fattura acquisto"
Jump to navigation
Jump to search
| Line 5: | Line 5: | ||
[[File:FILGAUSUP.jpg|FILGAUSUP.jpg]] | [[File:FILGAUSUP.jpg|FILGAUSUP.jpg]] | ||
| + | |||
| + | in SUBPIHA troviamo una cosa simile, dove viene impostato FILGAUSUP | ||
| + | <nowiki> | ||
| + | Elsif currbox=GBOXPT1 : # Picking des réceptions | ||
| + | If [M:PIH0]PIHTYP<>1 | ||
| + | FILGAUSUP(0) ="[F:PTD]LININVFLG=9" : FILGAUSUP(1)="" | ||
| + | Else | ||
| + | FILGAUSUP(0) ="[F:PTD]LININVFLG=1 & [F:PTD]BPSINV=[M:PIH0]BPR" | ||
| + | If [M:PCIW]WITMREF<>"" FILGAUSUP(0)+=" & pat([F:PTD]ITMREF,[M:PCIW]WITMREF)<>0" : Endif | ||
| + | If [M:PCIW]WNUMRCP<>"" FILGAUSUP(0)+=" & pat([F:PTD]PTHNUM,[M:PCIW]WNUMRCP)<>0" : Endif | ||
| + | If [M:PCIW]WNUMCDE<>"" FILGAUSUP(0)+=" & pat([F:PTD]POHNUM,[M:PCIW]WNUMCDE)<>0" : Endif | ||
| + | #FILGAUSUP(0)-="& ([F:PTD]QTYPUU>[F:PTD]INVQTYPUU | [F:PTD]QTYSTU>[F:PTD]INVQTYSTU)" | ||
| + | FILGAUSUP(0)-="& [F:PTD]LINTYP<3" | ||
| + | If [M:PCIW]WBPSNDE<>"" | ||
| + | FILGAUSUP(0)+=" & pat([F:PTH]BPSNDE,[M:PCIW]WBPSNDE)<>0" | ||
| + | Endif | ||
| + | FILGAUSUP(1)="& [F:FCY]LEGCPY=GSOCIETE" | ||
| + | #VPO 21/04/11 73382 ajout ctl DATORI aussi avec date BL | ||
| + | #If GCTLDATORI=2 FILGAUSUP(1)-="& [F:PTH]RCPDAT<=[M:PIH0]ACCDAT" : Endif | ||
| + | If GCTLDATORI=2 FILGAUSUP(1)-="& (([F:PTH]NDEDAT=[0/0/0] & [F:PTH]RCPDAT<=[M:PIH0]ACCDAT)|([F:PTH]NDEDAT<>[0/0/0] & min([F:PTH]NDEDAT,[F:PTH]RCPDAT)<=[M:PIH0]ACCDAT))" : Endif | ||
| + | # Issue 95534 - 2013-12-31 by SR : Réceptions Inter société sont toujours facurables | ||
| + | #FILGAUSUP(1)-="& ([F:PTH]BETFCY<>2 | ([F:PTH]BETCPY=2 & ([F:PTD]VERFLG=2 | [F:PTD]SDHNUM='')))" | ||
| + | FILGAUSUP(1)-="& ([F:PTH]BETFCY<>2 | [F:PTH]BETCPY=2)" | ||
| + | GBIDC3="" : Call FILROLE("PTH",GBIDC3) From SUBARL | ||
| + | # Issue 70507 - 2012-01-18 by MUARN : qté facturable non nulle | ||
| + | If GPIHQTYRET = 1 | ||
| + | FILGAUSUP(3) ="& [F:PTD]RTNQTYPUU<[F:PTD]QTYPUU" | ||
| + | FILGAUSUP(3) -="& "+GBIDC3 | ||
| + | Else | ||
| + | FILGAUSUP(3) ="& "+GBIDC3 | ||
| + | Endif | ||
| + | Endif | ||
| + | </nowiki> | ||
Andando in Situazione riga: | Andando in Situazione riga: | ||
Revision as of 09:21, 16 March 2021
Quando si crea una fattura di acquisto si può andare in picking dal browser "Selezione ricevimenti" (oggetto PT1)
Il browser "Selezione ricevimenti" è gestito dai sorgente SUBPIH (standard) e da SPVPIH (verticale italiano).
La prima condizione di filtro è che la riga di ricevimento NON sia fatturata (non completamente fatturata) PRECEIPTD.LININVFLG = 1.
in SUBPIHA troviamo una cosa simile, dove viene impostato FILGAUSUP
Elsif currbox=GBOXPT1 : # Picking des réceptions
If [M:PIH0]PIHTYP<>1
FILGAUSUP(0) ="[F:PTD]LININVFLG=9" : FILGAUSUP(1)=""
Else
FILGAUSUP(0) ="[F:PTD]LININVFLG=1 & [F:PTD]BPSINV=[M:PIH0]BPR"
If [M:PCIW]WITMREF<>"" FILGAUSUP(0)+=" & pat([F:PTD]ITMREF,[M:PCIW]WITMREF)<>0" : Endif
If [M:PCIW]WNUMRCP<>"" FILGAUSUP(0)+=" & pat([F:PTD]PTHNUM,[M:PCIW]WNUMRCP)<>0" : Endif
If [M:PCIW]WNUMCDE<>"" FILGAUSUP(0)+=" & pat([F:PTD]POHNUM,[M:PCIW]WNUMCDE)<>0" : Endif
#FILGAUSUP(0)-="& ([F:PTD]QTYPUU>[F:PTD]INVQTYPUU | [F:PTD]QTYSTU>[F:PTD]INVQTYSTU)"
FILGAUSUP(0)-="& [F:PTD]LINTYP<3"
If [M:PCIW]WBPSNDE<>""
FILGAUSUP(0)+=" & pat([F:PTH]BPSNDE,[M:PCIW]WBPSNDE)<>0"
Endif
FILGAUSUP(1)="& [F:FCY]LEGCPY=GSOCIETE"
#VPO 21/04/11 73382 ajout ctl DATORI aussi avec date BL
#If GCTLDATORI=2 FILGAUSUP(1)-="& [F:PTH]RCPDAT<=[M:PIH0]ACCDAT" : Endif
If GCTLDATORI=2 FILGAUSUP(1)-="& (([F:PTH]NDEDAT=[0/0/0] & [F:PTH]RCPDAT<=[M:PIH0]ACCDAT)|([F:PTH]NDEDAT<>[0/0/0] & min([F:PTH]NDEDAT,[F:PTH]RCPDAT)<=[M:PIH0]ACCDAT))" : Endif
# Issue 95534 - 2013-12-31 by SR : Réceptions Inter société sont toujours facurables
#FILGAUSUP(1)-="& ([F:PTH]BETFCY<>2 | ([F:PTH]BETCPY=2 & ([F:PTD]VERFLG=2 | [F:PTD]SDHNUM='')))"
FILGAUSUP(1)-="& ([F:PTH]BETFCY<>2 | [F:PTH]BETCPY=2)"
GBIDC3="" : Call FILROLE("PTH",GBIDC3) From SUBARL
# Issue 70507 - 2012-01-18 by MUARN : qté facturable non nulle
If GPIHQTYRET = 1
FILGAUSUP(3) ="& [F:PTD]RTNQTYPUU<[F:PTD]QTYPUU"
FILGAUSUP(3) -="& "+GBIDC3
Else
FILGAUSUP(3) ="& "+GBIDC3
Endif
Endif
Andando in Situazione riga:
si pussono vedere le qta fatturate; se il totale supera la qta ricevuta ovviamente la riga non comparirà perchè è già stato fatturato tutto.