PortaleOrdiniGruppo/pi_fapprova.BtcDef.bak
2025-03-24 15:28:26 +01:00

199 lines
1.9 KiB
Plaintext
Raw Permalink Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

* --- CodePainter Revolution Batch Vers. 5.2
Icpbatch.CPBatch
Items=[
Icpitembatch.CPVarDecl
name='pSERIALE
next=Icpitembatch.CPVarDecl
name='pAZIENDA
obj='Var
pag=1
param=True
prev=O3
I
obj='Var
pag=1
param=True
x=620
y=54
I
Icpitembatch.CPVarDecl
frm_seek='pi_qord_mast.vqr
name='pDATI
next=Icpitembatch.CPVarDecl
name='res
next=Icpitembatch.CPForEach
for_variable='x
for_variable_type='pi_qord_mast.vqr
h=[
19
19
]
iterator_expr='pDATI
next=Ispitembatch.CPReturn
apiResponseContentType='application/json
frm_calc='res
obj='Return
pag=1
prev=O7
I
obj='ForEach
pag=1
prev=O6
sons=[
Icpitembatch.CPItemSon
instr=Icpitembatch.CPCase
father=O7
fatherSonIndex=0
frm_calc=[
'x.AZIENDA="POLOI"
'x.AZIENDA="METRI"
'x.AZIENDA="FCONN"
]
h=[
19
19
19
19
]
obj='Case
pag=1
sons=[
Icpitembatch.CPItemSon
instr=Icpitembatch.CPWrite
arch='POLOIDOC_MAST
father=O12
fatherSonIndex=0
next=Icpitembatch.CPVarDecl
frm_calc='"Ordine approvato" + x.AZIENDA + x.MVSERIAL
name='res
obj='Var
pag=1
prev=O17
var_op='asgn
I
obj='Write
pag=1
rd_kfield=[
'MVSERIAL
]
rd_kop=[
'=
]
rd_kvar=[
'x.MVSERIAL
]
wr_field=[
'MVFLPROV
]
wr_op=[
'=
]
wr_var=[
''N'
]
I
I
Icpitembatch.CPItemSon
instr=Icpitembatch.CPWrite
arch='METRIDOC_MAST
father=O12
fatherSonIndex=1
obj='Write
pag=1
rd_kfield=[
'MVSERIAL
]
rd_kop=[
'=
]
rd_kvar=[
'x.MVSERIAL
]
wr_field=[
'MVFLPROV
]
wr_op=[
'=
]
wr_var=[
''N'
]
I
I
Icpitembatch.CPItemSon
instr=Icpitembatch.CPWrite
arch='FCONNDOC_MAST
father=O12
fatherSonIndex=2
obj='Write
pag=1
rd_kfield=[
'MVSERIAL
]
rd_kop=[
'=
]
rd_kvar=[
'x.MVSERIAL
]
wr_field=[
'MVFLPROV
]
wr_op=[
'=
]
wr_var=[
''N'
]
I
I
]
w=[
150
150
150
150
]
I
I
]
w=[
150
150
]
I
obj='Var
pag=1
prev=O5
I
obj='Var
obj_type='MC
pag=1
param=True
x=15
y=20
I
]
comment='Approva ordini
date_creat=#2025-03-18
date_rev=#2025-03-18
dic_name='plan
ev_class='SPBatchEvents
modcnt=4
result_type='C
runtime_filters=2
tpl_name='Function
work_file=[
'POLOIDOC_MAST
'METRIDOC_MAST
'FCONNDOC_MAST
]
work_filter=[
'
'
'
]
I
*--*
*----*