#########################################################################
# Variabili utilizzabili dall'entry point PURTRS #
# #
# PACTION : Azione GOBJET all'origine della chiamata #
#PVERSION : Valore numerico del numero di versione di X3 #
#FJL: Tipo di transazione in corso #
# MFROM : Codice della videata di inserimento #
# #
#########################################################################
$ACTION
Case ACTION
When "PURTRS"
Case FJL
When "PTA" : # Transazione richieste d'offerta
When "PTD" : # Transazione richieste d'acquisto
When "PTC" : Gosub PURTRS_PTC : # Transazione ordini
When "PTT" : # Transazione contratti
When "PTF" : # Transazione fatture
Endcase
When Default
Endcase
Return
#---------------------------------------------------------#
# Gestione della parametrizzazione dei campi specifici ordini #
# ------------------------------------------------------- #
# campo AAAA non inseribile nel folder Gestione #
# definito visualizzato sulla videata di base POH1 #
# campo BBBB inseribile nel folder Totale #
# definito inseritosulla videata di base POH3 #
# campo CCCC non inseribile nel folder Righe #
# definito visualizzato sulla videata di base POH2 #
# Campo DDDD inseribile nel folder Righe #
# definito inserito sulla videata di base POH2 #
#---------------------------------------------------------#
$PURTRS_PTC
Case PACTION
When "RAZCRE"
[M:PTC1]AAAAFLG=1
[M:PTC2]BBBBCOD=1
[M:PTC1]CCCCFLG=1 : [M:PTC1]CCCCSCR=1 : Grizo [M:PTC1]CCCCSCR
[M:PTC3]DDDDCOD=1 : [M:PTC3]DDDDSCR=1 : Actzo [M:PTC3]DDDDDCR
When "LIENS"
If [M:PTC1]AAAAFLG=0 [M:PTC1]AAAAFLG=1 : Endif
If [M:PTC2]BBBBCOD=0 [M:PTC2]BBBBCOD=1 : Endif
If [M:PTC1]CCCCFLG=0 [M:PTC1]CCCCFLG=1 : [M:PTC1]CCCCSCR=1 : Endif
If [M:PTC3]DDDDCOD=0 [M:PTC3]DDDDCOD=1 : [M:PTC1]DDDDSCR=1 : Endif
If [M:PTC1]CCCCFLG=1 Grizo [M:PTC1]CCCCSCR Else Actzo [M:PTC1]CCCCSCR : Endif
If [M:PTC3]DDDDCOD=3 Grizo [M:PTC3]DDDDSCR Else Actzo [M:PTC3]DDDDSCR : Endif
When "INICRE"
When "INIMOD"
When "CREATION", "MODIF"
Case MFROM
When "POH1"
If [M:PTC1]AAAAFLG=1
TZONE(IZON)="AAAA" : TMOD(IZON)=3 : IZON+=1
Endif
When "POH3"
If [M:PTC2]BBBBCOD>1
TZONE(IZON)="BBBB" : TMOD(IZON)=[M:PTC2]BBBBCOD : IZON+=1
Endif
When "POH2"
If [M:PTC1]CCCCFLG=1
TZONE(IZON)="CCCC" : TMOD(IZON)=3 : IZON+=1
Endif
If [M:PTC1]CCCCSCR>1
TZONE(IZON)="CCCC" : TMOD(IZON)=9 : TINT(IZON)=num$([M:PTC1]CCCCSCR) : IZON+=1
Endif
If [M:PTC3]DDDDCOD>1
TZONE(IZON)="DDDD" : TMOD(IZON)=[M:PTC2]DDDDCOD : IZON+=1
Endif
If [M:PTC3]DDDDSCR>1
TZONE(IZON)="DDDD" : TMOD(IZON)=9 : TINT(IZON)=num$([M:PTC3]DDDDSCR) : IZON+=1
Endif
Endcase
When "APRES_MODIF"
If PVERSION<130
Case zoncou
When "CCCCFLG"
If val(zc)=1
[M:PTC1]CCCCSCR=1
If !GIMPORT Affzo [M:PTC1]CCCCSCR : Grizo [M:PTC1]CCCCSCR: Endif
Elsif !GIMPORT
Actzo [M:PTC1]CCCCSCR
Endif
When "DDDDCOD"
If val(zc)=3
[M:PTC3]DDDDSCR=1
If !GIMPORT Affzo [M:PTC3]DDDDSCR : Grizo [M:PTC3]DDDDSCR : Endif
Elsif !GIMPORT
Actzo [M:PTC3]DDDDSCR
Endif
Endcase
Else
Case COUZON
When "CCCCFLG"
If val(CZ)=1
[M:PTC1]CCCCSCR=1
If !GIMPORT Affzo [M:PTC1]CCCCSCR : Grizo [M:PTC1]CCCCSCR: Endif
Elsif !GIMPORT
Actzo [M:PTC1]CCCCSCR
Endif
When "DDDDCOD"
If val(CZ)=3
[M:PTC3]DDDDSCR=1
If !GIMPORT Affzo [M:PTC3]DDDDSCR : Grizo [M:PTC3]DDDDSCR : Endif
Elsif !GIMPORT
Actzo [M:PTC3]DDDDSCR
Endif
Endcase
Endif
Endcase
Return
Questo entry point riguarda la gestione delle transazioni di inserimento degli acquisti. E' comune alle transazioni di richiesta d'offerta, richieste di acquisto, ordini aperti, ricevimenti, resi e fatture.
Permette di modificare la finestra generata dalla transazione in particolare per cancellare un folder specifico.
Questo entry point è situato nel programma SUBPTX.
C'è una transazione in corso. La variabile GOK è utilizzata e testata. E' uguale a 1. Può essere posizionata a 0 se si desidera abbandonare la transazione.
Non c'è file traccia aperto.
E' chiamato nelle azioni CREATION, MODIF, ANNULE nei programmi:
- SUBPTA: Transazioni richieste d’offerta
- SUBPTD: Transazioni richieste d’acquisto
- SUBPTE : Transazioni ordini di conto lavoro
- SUBPTC : Transazioni ordini
- SUBPTT : Transazioni ordini aperti
- SUBPTR : Transazioni ricevimenti
- SUBPTN : Transazioni resi fornitori
- SUBPTF : Transazioni fatture di acquisto
Transazione | Videate di inserimento
| Videata di parametrizzazione |
|
|
|
Richieste d'offerta | PQH1: Videata Richiesta d'offerta | PTA0: Videata Testata |
|
| PTA1: Folder Parametri 1 |
|
| PTA2: Folder Parametri 2 |
|
|
|
Richieste di acquisto | PSH0: Videata Testata | PTD0: Videata Testata |
| PSH1: Folder Righe | PTD1: Folder Parametri 1 |
|
| PTD2: Folder Parametri 2 |
|
|
|
Ordini di conto lavoro | SCO0 : Videata Testata | PTE0 : Videata Testata |
| SCO1 : Folder Articolo Gestione | PTE1 : Folder Parametri |
| SCO2 : Folder Materiali | PTE2 : Folder Documenti |
| SCO3 : Folder Servizio | PTE3 : Folder Inserimento |
|
|
|
Ordini | POH0: Videata Testata | PTD0: Videata Testata |
| POH1: Folder Gestione | PTC1: Folder Parametri |
| POH2: Folder Righe | PTC2: Folder Testata |
| POH3: Folder Totale | PTC3: Folder Riga 1 |
| POI1 : Videata Piano dell'acquirente | PTC4: Folder Riga 2 |
|
| PTX4: Folder Riga 3 |
|
|
|
Ordini aperti | POC0: Videata Testata | PTT0: Videata Testata |
| POC1: Folder Gestione | PTT1: Folder Parametri |
| POC2: Folder Articolo | PTT2: Folder Testata |
| POC3: Folder Totale | PTT3: Folder Riga 1 |
|
| PTX4: Folder Riga 2 |
|
|
|
Ricevimenti | PTH1: Videata Ricevimenti | PTR0: Videata Testata |
|
| PTR1: Folder Parametri |
|
| PTR2: Folder Riga 1 |
|
| PTR3: Folder Riga 2 |
|
| STOETR2: Folder Stock |
|
|
|
Resi | PNH1: Videata Resi | PTN0: Videata Testata |
|
| PTN1: Folder Parametri |
|
| PTN2: Folder Riga 1 |
|
| PTN3: Folder Riga 2 |
|
| PTN4: Folder Riga 3 |
|
|
|
Fatture | PIH0: Videata Testata | PTF0: Videata Testata |
| PIH1: Folder Gestione | PTF1: Folder Parametri |
| PIH3: Folder Riga | PTF2: Folder Testata |
| PIH4: Folder Controllo | PTF3: Folder Riga |
Si dispone delle seguenti variabili per definire l'elaborazione da effettuare:
[F :AWI] La classe [F :AWI] è caricata e può essere modificata se si desidera intervenire sulla finestra generata.
[F :PTR]PTRTYP Tipo di transazione
[F :PTR]PTRNUM Codice transazione
WINREF Nome della finestra di riferimento
="O"+Nome dell'Oggetto ( "PQH", "PSH", "POH", "POC", "PTH", "PNH", "PIH", "SCO" )
NOMWIN Nome della finestra generata per questa transazione
="WO"+Nome dell'oggetto+Codice transazione
Tipo di transazione | Descrizione | Oggetto | WINREF | NOMWIN |
1 | Richiesta d'offerta | PQH | OPQH | "WOPQH" + [F:PTR]PTRNUM |
2 | Richieste di acquisto | PSH | OPSH | "WOPSH" + [F:PTR]PTRNUM |
3 | Ordini | POH | OPOH | "WOPOH" + [F:PTR]PTRNUM |
5 | Ordini aperti | POC | OPOC | "WOPOC" + [F:PTR]PTRNUM |
6 | Ricevimenti | PTH | OPTH | "WOPTH" + [F:PTR]PTRNUM |
7 | Resi | PNH | OPNH | "WOPNH" + [F:PTR]PTRNUM |
8 | Fatture | PIH | OPIH | "WOPIH" + [F:PTR]PTRNUM |
9 | Ordini di conto lavoro | SCO | OSCO | "WOSCO" + [F:PTR]PTRNUM |
Tabella | Programma | Contenuto significativo | Descrizione Tabella |
PURTRS | SUBPTA SUBPTD SUBPTE SUBPTC SUBPTT SUBPTR SUBPTN SUBPTF | Sì | Transazioni di inserimento acquisti |
AWINDOW |
| Sì | Dizionario delle finestre |
Sono aperte le tabelle AWINDOW, AWINPAR, AWINBRO, AWINBOUT, AMSK, AMSKPAR, AMSKZON, ed anche tutte le tabelle necessarie alla gestione generazione delle videate e programmi.
Questo entry point riguarda la gestione delle transazioni di inserimento degli acquisti. E' comune alle transazioni di richieste d'offerta, richieste di acquisto, ordini di conto lavoro, ordini, ordini aperti, ricevimenti, resi e fatture.
Permette di modificare i browser della finestra generata dalla transazione.
Questo entry point è situato nel programma SUBPTX.
C'è una transazione in corso. La variabile GOK è utilizzata e testata. E' uguale a 1. Può essere posizionata a 0 se si desidera abbandonare la transazione.
Non c'è file traccia aperto.
E' chiamato nelle azioni CREATION, MODIF, ANNULE nei programmi:
- SUBPTA: Transazioni richieste d’offerta
- SUBPTD: Transazioni richieste d’acquisto
- SUBPTE : Transazioni ordini di conto lavoro
- SUBPTC : Transazioni ordini
- SUBPTT : Transazioni ordini aperti
- SUBPTR : Transazioni ricevimenti
- SUBPTN : Transazioni resi fornitori
- SUBPTF : Transazioni fatture di acquisto
Transazione | Videate di inserimento
| Videata di parametrizzazione |
|
|
|
Richieste d'offerta | PQH1: Videata Richiesta d'offerta | PTA0: Videata Testata |
|
| PTA1: Folder Parametri 1 |
|
| PTA2: Folder Parametri 2 |
|
|
|
Richieste di acquisto | PSH0: Videata Testata | PTD0: Videata Testata |
| PSH1: Folder Righe | PTD1: Folder Parametri 1 |
|
| PTD2: Folder Parametri 2 |
|
|
|
Ordini di conto lavoro | SCO0 : Videata Testata | PTE0 : Videata Testata |
| SCO1 : Folder Articolo Gestione | PTE1 : Folder Parametri |
| SCO2 : Folder Materiali | PTE2 : Folder Documenti |
| SCO3 : Folder Servizio | PTE3 : Folder Inserimento |
|
|
|
Ordini | POH0: Videata Testata | PTD0: Videata Testata |
| POH1: Folder Gestione | PTC1: Folder Parametri |
| POH2: Folder Righe | PTC2: Folder Testata |
| POH3: Folder Totale | PTC3: Folder Riga 1 |
| POI1 : Videata Piano dell'acquirente | PTC4: Folder Riga 2 |
|
| PTX4: Folder Riga 3 |
|
|
|
Ordini aperti | POC0: Videata Testata | PTT0: Videata Testata |
| POC1: Folder Gestione | PTT1: Folder Parametri |
| POC2: Folder Articolo | PTT2: Folder Testata |
| POC3: Folder Totale | PTT3: Folder Riga 1 |
|
| PTX4: Folder Riga 2 |
|
|
|
Ricevimenti | PTH1: Videata Ricevimenti | PTR0: Videata Testata |
|
| PTR1: Folder Parametri |
|
| PTR2: Folder Riga 1 |
|
| PTR3: Folder Riga 2 |
|
| STOETR2: Folder Stock |
|
|
|
Resi | PNH1: Videata Resi | PTN0: Videata Testata |
|
| PTN1: Folder Parametri |
|
| PTN2: Folder Riga 1 |
|
| PTN3: Folder Riga 2 |
|
| PTN4: Folder Riga 3 |
|
|
|
Fatture | PIH0: Videata Testata | PTF0: Videata Testata |
| PIH1: Folder Gestione | PTF1: Folder Parametri |
| PIH3: Folder Riga | PTF2: Folder Testata |
| PIH4: Folder Controllo | PTF3: Folder Riga |
Si dispone delle seguenti variabili per definire l'elaborazione da effettuare:
[F :AWB] La classe [F:AWB] è caricata e può essere modificata se si desidera intervenire sul browser della finestra generata.
[F :PTR]PTRTYP Tipo di transazione
[F :PTR]PTRNUM Codice transazione
WINREF Nome della finestra di riferimento
="O"+Nome dell'Oggetto ( "PQH", "PSH", "POH", "POC", "PTH", "PNH", "PIH", "SCO" )
NOMWIN Nome della finestra generata per questa transazione
="WO"+Nome dell'oggetto+Codice transazione
Tipo di transazione | Descrizione | Oggetto | WINREF | NOMWIN |
1 | Richiesta d'offerta | PQH | OPQH | "WOPQH" + [F:PTR]PTRNUM |
2 | Richieste di acquisto | PSH | OPSH | "WOPSH" + [F:PTR]PTRNUM |
3 | Ordini | POH | OPOH | "WOPOH" + [F:PTR]PTRNUM |
5 | Ordini aperti | POC | OPOC | "WOPOC" + [F:PTR]PTRNUM |
6 | Ricevimenti | PTH | OPTH | "WOPTH" + [F:PTR]PTRNUM |
7 | Resi | PNH | OPNH | "WOPNH" + [F:PTR]PTRNUM |
8 | Fatture | PIH | OPIH | "WOPIH" + [F:PTR]PTRNUM |
9 | Ordini di conto lavoro | SCO | OSCO | "WOSCO" + [F:PTR]PTRNUM |
Tabella | Programma | Contenuto significativo | Descrizione Tabella |
PURTRS | SUBPTA SUBPTD SUBPTE SUBPTC SUBPTT SUBPTR SUBPTN SUBPTF | Sì | Transazioni di inserimento acquisti |
AWINDOW |
| Sì | Dizionario delle finestre |
Sono aperte le tabelle AWINDOW, AWINPAR, AWINBRO, AWINBOUT, AMSK, AMSKPAR, AMSKZON, ed anche tutte le tabelle necessarie alla gestione generazione delle videate e programmi.