PRCPUITM ;WISC/RFJ-select items utility ;10 Dec 91
Source file <PRCPUITM.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
V | ;;5.1;IFCAP;**1**;Oct 20, 2000
|
|
ITEM(INVPT,ADDNEW,SCREEN,DEFAULT) | ; select item in inventory point
; addnew=1 to add new items ; screen=additional screen ; default=default item master number ; return itemda; 0 no item selected; ^ for ^ entered or timeout |
|
MASTITEM(SCREEN) | ; select item from master item file
; screen=optional screen ; return itemda; 0 no item selected; ^ for ^ entered or timeout |
|
GETITEM(INVPT,ITEMDA) | ||
DELETE(PRCPINPT,ITEMDA) | ; check for deleting item from inventory point
|
|
DELITEM(PRCPINPT,DA) | ; delete item da from inventory point
|
|
ORDCHK(ITEMDA,PRCPINPT,ORDTYP,ORDSTA) | ; is the item on any outstanding orders
; ITEMDA = DA of item to be deleted, 0 if search is for any order ; for that inventory point. ; PRCPINT = DA of inventory point in the search ; ORDTYP = search for regular, emergency and/or call-in ; ORDSTA = Status of the outstanding order, if search is limited ; returns 0 if no outstanding order is found, 1 it it is |
|
LISTOO(ITEM,PRCPINPT,ORDSTA) | ; list outstanding orders for this item
; ITEM = DA of item to be deleted ; PRCPINT = DA of inventory point housing the item ; ORDSTA = Status of the outstanding order, if search is limited |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^PRC(441 - [#441] | Classic Fileman Calls |
^PRCP(445 - [#445] | Classic Fileman Calls |