Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PRCPEIPU

Package: IFCAP

Routine: PRCPEIPU


Information

PRCPEIPU ;WISC/RFJ/DXH - procurement source update utilities ;10.7.99

Source Information

Source file <PRCPEIPU.m>

Entry Points

Name Comments DBIA/ICR reference
SETMAN(INVPT,ITEMDA,SOURCE) ; set mandatory source for inventory point
EDITSOUR(PRCPINPT,ITEMDA) ; edit procurement sources for invpt and item
UPDATE(PRCPINPT,ITEMDA) ; update the unit per receipt = unit per issue
; for all inventory points stocked by invpt prcpinpt

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"MANDATORY SOURCE (for inventory point item): ",VENOLD
  • Line Location: SETMAN+5
Function Call: WRITE
  • Prompt: !!?5,"...inventory point item mandatory source being changed",!?8,"from: ",VENOLD,!?8," to: ",VENNEW
  • Line Location: SETMAN+6
Function Call: WRITE
  • Prompt: !!,"updating the u/r equal to u/i ***PLEASE CHECK CONVERSION FACTORS***"
  • Line Location: UPDATE+9
Function Call: WRITE
  • Prompt: !,"THERE IS NOT A VENDOR DEFINED AS SUPPLY WAREHOUSE IN THE VENDOR FILE."
  • Line Location: UPDATE+11
Function Call: WRITE
  • Prompt: !,$E($$INVNAME^PRCPUX1(INVPTDA),1,17),?19,"OLD U/R: ",$$UNITVAL^PRCPUX1($P(D,"^",3),$P(D,"^",2)," per "),?44,"NEW U/R: ",UI,?69,"CF: ",$P(D,"^",4)
  • Line Location: UPDATE+14
Info |  Source |  Entry Points |  Interaction Calls