6 |
<!-- observations (text) --> |
<!-- observations (text) --> |
7 |
|
|
8 |
<form tabbed="top" width="107" height="24" title="Carga de Facturas de Proveedores"> |
<form tabbed="top" width="107" height="24" title="Carga de Facturas de Proveedores"> |
9 |
|
<neb:Block> |
10 |
|
use PAPO; |
11 |
|
my $uniqed=0; |
12 |
|
</neb:Block> |
13 |
<parameter name="invoiceDate" default=""/> |
<parameter name="invoiceDate" default=""/> |
14 |
|
|
15 |
<datasource name="nil" cache="1"/> |
<datasource name="nil" cache="1"/> |
950 |
setFocus(alienDocumentBlock.dateEntry) |
setFocus(alienDocumentBlock.dateEntry) |
951 |
alienItemToUpdBlock.initQuery() |
alienItemToUpdBlock.initQuery() |
952 |
alienItemToUpdBlock.alienDocumentToUpdEntry = lAlienDocId |
alienItemToUpdBlock.alienDocumentToUpdEntry = lAlienDocId |
953 |
|
#storehouse |
954 |
|
alienItemToUpdBlock.storehouseEntry = str(ownStorehouseBlock.ownStorehouseIdEntry) |
955 |
|
#/storehouse |
956 |
alienItemToUpdBlock.processQuery() |
alienItemToUpdBlock.processQuery() |
957 |
lRecordCount = alienItemToUpdBlock.getRecordCount() |
lRecordCount = alienItemToUpdBlock.getRecordCount() |
958 |
for recNum in range(lRecordCount): |
for recNum in range(lRecordCount): |
1686 |
</block> |
</block> |
1687 |
<!--busco own pos entityIdEntry--> |
<!--busco own pos entityIdEntry--> |
1688 |
<neb:Sub neb:src="posDocument.nebc" ownPosBlock="ownPosBlock" |
<neb:Sub neb:src="posDocument.nebc" ownPosBlock="ownPosBlock" |
1689 |
ownPosEntityIdEntry="ownPosEntityIdEntry" searchOwnPosData="searchOwnPosData" /> |
ownPosEntityIdEntry="ownPosEntityIdEntry" |
1690 |
|
searchOwnPosData="searchOwnPosData" |
1691 |
|
ownStorehouseBlock ="ownStorehouseBlock" ownStorehouseIdEntry="ownStorehouseIdEntry" /> |
1692 |
<block datasource="alienDocumentDataSource" name="alienDocumentBlock" restrictInsert="t"> |
<block datasource="alienDocumentDataSource" name="alienDocumentBlock" restrictInsert="t"> |
1693 |
<!-- <trigger name="t" type="Pre-Insert"> --> |
<!-- <trigger name="t" type="Pre-Insert"> --> |
1694 |
<!-- alienDocumentBlock.idEntry.autofillBySequence('alien_document_id_seq') --> |
<!-- alienDocumentBlock.idEntry.autofillBySequence('alien_document_id_seq') --> |