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: PRCPAWI0

Package: IFCAP

Routine: PRCPAWI0


Information

PRCPAWI0 ;WISC/RFJ-adjust inventory level - issue adjustment ;11 Mar 94

Source Information

Source file <PRCPAWI0.m>

Entry Points

Name Comments DBIA/ICR reference
ISUEBOOK ; issue book adjustment
Q
UNLOCK ; unlock issue book lock
LINEITEM()
LINEADJ ; enter line adjustment

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"THERE IS NOT A VENDOR IN THE VENDOR FILE (#440) DESIGNATED AS A SUPPLY WHSE."
  • Line Location: ISUEBOOK+2
Function Call: WRITE
  • Prompt: !,"CANNOT FIND THE TRANSACTION NUMBER FOR THIS ISSUE BOOK."
  • Line Location: ISUEBOOK+8
Function Call: WRITE
  • Prompt: !,"THIS ISSUE BOOK HAS NOT BEEN POSTED (NO FMS LINE NUMBER) AND CANNOT BE ADJUSTED."
  • Line Location: ISUEBOOK+10
Function Call: WRITE
  • Prompt: !,"THIS ISSUE BOOK DOES NOT HAVE A REFERENCE VOUCHER NUMBER AND CANNOT BE ADJUSTED."
  • Line Location: ISUEBOOK+12
Function Call: WRITE
  • Prompt: !!,">> Reference Voucher Number: ",VOUCHER
  • Line Location: ISUEBOOK+13
Function Call: WRITE
  • Prompt: !!,">> Distribution to: ",$$INVNAME^PRCPUX1(DISTRPT)," inventory point."
  • Line Location: ISUEBOOK+16
Function Call: WRITE
  • Prompt: !,"NOTE: Primary is NOT keeping a PERPETUAL INVENTORY."
  • Line Location: ISUEBOOK+18
Function Call: WRITE
  • Prompt: !,"NOTE: Primary is NOT keeping a DETAILED TRANSACTION REGISTER."
  • Line Location: ISUEBOOK+19
Function Call: WRITE
  • Prompt: !,"NOTE: Primary set up so it will NOT be updated by the warehouse."
  • Line Location: ISUEBOOK+20
Function Call: WRITE
  • Prompt: !,">> PRIMARY inventory point will NOT be updated."
  • Line Location: ISUEBOOK+21
Function Call: WRITE
  • Prompt: !!?10,">> NO LINE ITEMS HAVE BEEN SELECTED <<"
  • Line Location: ISUEBOOK+24
Function Call: WRITE
  • Prompt: !,"MISSING ITEM MASTER NUMBER."
  • Line Location: LINEADJ+4
Function Call: WRITE
  • Prompt: !!,"======================= I S S U E B O O K D A T A ======================="
  • Line Location: LINEADJ+6
Function Call: WRITE
  • Prompt: !?5,"QUANTITY ORDERED: ",+$P(LINEDATA,"^",2)
  • Line Location: LINEADJ+8
Function Call: WRITE
  • Prompt: !?5,"QUANTITY POSTED : ",+$P(POSTDATA,"^",3)
  • Line Location: LINEADJ+9
Function Call: WRITE
  • Prompt: !?5,"INVENTORY VALUE : ",$J(+$P(POSTDATA,"^",4),0,2)
  • Line Location: LINEADJ+10
Function Call: WRITE
  • Prompt: !?5,"SELLING VALUE : ",$J(+$P(POSTDATA,"^",5),0,2),!
  • Line Location: LINEADJ+11
Function Call: WRITE
  • Prompt: !,"THIS LINE ITEM HAS NOT BEEN POSTED AND CANNOT BE ADJUSTED."
  • Line Location: LINEADJ+12
Function Call: WRITE
  • Prompt: !,"THIS ITEM IS NOT STORED IN THE INVENTORY POINT."
  • Line Location: LINEADJ+14
Function Call: WRITE
  • Prompt: !!,"**************** E N T E R A D J U S T M E N T D A T A ****************",!
  • Line Location: LINEADJ+18
Function Call: WRITE
  • Prompt: !!?10,">> EITHER QUANTITY OR VALUE NEEDS TO BE ENTERED FOR AN ADJUSTMENT <<"
  • Line Location: LINEADJ+22
Function Call: WRITE
  • Prompt: !
  • Line Location: LINEADJ+23
Info |  Source |  Entry Points |  Interaction Calls