Riclassificazione conti da contabile ad analitica
#SYSTEM.RAGSOC
#SYSTEM.DATE
STR(GRUPPO)+STR(CONTO)+STR(SOTTOCONTO)
GRUPPO
CONTO
SOTTOCONTO
PCON.DESCR
#THIS @
EMPTY= IF
"CONTO CONTABILE MANCANTE!"
#THIS !
THEN
CODCONTO
PCONANA.DESCR
#THIS @
EMPTY= IF
"CONTO ANALITICO MANCANTE!"
#THIS !
THEN
USE PANAPDC KEY 2
JOIN PCONANA INTO CODCONTO==CODCONTO
JOIN PCON INTO GRUPPO==GRUPPO CONTO==CONTO SOTTOCONTO==SOTTOCONTO
FROM GRUPPO=#DAGR CONTO=#DACO SOTTOCONTO=#DASOTT
TO GRUPPO=#AGR CONTO=#ACO SOTTOCONTO=#ASOTT