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

Package: IFCAP

Routine: PRCPRSS1


Information

PRCPRSS1 ;WOIFO/DAP-stock status report for primaries and secondaries; 10/16/06 2:17pm

Source Information

Source file <PRCPRSS1.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**98**;Oct 20, 2000;Build 37
PRINT ; print report
REP ;*98 Added header to display type of reporting, moved header logic
Q ;Tag ends printing and exits routine
SHOWVALU(V1) ;show value
LC ;*98 Moved line control logic into subroutines
HEAD ;heading

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"INVENTORY ("_PRCPTP_" ITEMS)"
  • Line Location: REP+7
Function Call: WRITE
  • Prompt: !,"OPEN BALANCE",?14
  • Line Location: REP+10
Function Call: WRITE
  • Prompt: $$SHOWVALU(%)
  • Line Location: REP+10
Function Call: WRITE
  • Prompt: $$SHOWVALU(TOTOPEN)
  • Line Location: REP+11
Function Call: WRITE
  • Prompt: !!,"RECEIPTS",?14
  • Line Location: REP+13
Function Call: WRITE
  • Prompt: $$SHOWVALU(%)
  • Line Location: REP+13
Function Call: WRITE
  • Prompt: $$SHOWVALU(TOTAL)
  • Line Location: REP+14
Function Call: WRITE
  • Prompt: !,"USAGE",?14
  • Line Location: REP+17
Function Call: WRITE
  • Prompt: $$SHOWVALU(%)
  • Line Location: REP+17
Function Call: WRITE
  • Prompt: $$SHOWVALU(TOTISS)
  • Line Location: REP+18
Function Call: WRITE
  • Prompt: !,"ADJUSTMENTS",?14
  • Line Location: REP+20
Function Call: WRITE
  • Prompt: $$SHOWVALU(%)
  • Line Location: REP+20
Function Call: WRITE
  • Prompt: $$SHOWVALU(TOTAL)
  • Line Location: REP+21
Function Call: WRITE
  • Prompt: !,%,!,"CLOSE BALANCE",?14
  • Line Location: REP+24
Function Call: WRITE
  • Prompt: $$SHOWVALU(%)
  • Line Location: REP+24
Function Call: WRITE
  • Prompt: $$SHOWVALU(TOTCLOS)
  • Line Location: REP+25
Function Call: WRITE
  • Prompt: !!!,"# RECEIPTS",?13
  • Line Location: REP+27
Function Call: WRITE
  • Prompt: $J(%,11,0)
  • Line Location: REP+27
Function Call: WRITE
  • Prompt: $J(TOTAL,11,0)
  • Line Location: REP+28
Function Call: WRITE
  • Prompt: !,"# USAGE",?13
  • Line Location: REP+31
Function Call: WRITE
  • Prompt: $J(%,11,0)
  • Line Location: REP+31
Function Call: WRITE
  • Prompt: $J(TOTAL,11,0)
  • Line Location: REP+32
Function Call: WRITE
  • Prompt: !,"# ADJUSTMENTS",?13
  • Line Location: REP+34
Function Call: WRITE
  • Prompt: $J(%,11,0)
  • Line Location: REP+34
Function Call: WRITE
  • Prompt: $J(TOTAL,11,0)
  • Line Location: REP+35
Function Call: WRITE
  • Prompt: !,%,!,"# TOTAL",?13
  • Line Location: REP+38
Function Call: WRITE
  • Prompt: $J(%,11,0)
  • Line Location: REP+38
Function Call: WRITE
  • Prompt: $J(TOTAL,11,0)
  • Line Location: REP+39
Function Call: WRITE
  • Prompt: $J(%,11,2)
  • Line Location: REP+41
Function Call: WRITE
  • Prompt: $J(%,11,2)
  • Line Location: REP+42
Function Call: WRITE
  • Prompt: !,"("_PRCPTP_" ITEMS)"
  • Line Location: REP+44
Function Call: WRITE
  • Prompt: !!?28,"*** CURRENT DATA ("_PRCPTP_" ITEMS) ***"
  • Line Location: REP+48
Function Call: WRITE
  • Prompt: !!?2,"INACTIVE ITEMS ("_PRCPTP_" ITEMS) FROM ",Y," TO ",$P(NOW,"@"),!,"# INACTIVE",?13
  • Line Location: REP+55
Function Call: WRITE
  • Prompt: $J(%,11,0)
  • Line Location: REP+56
Function Call: WRITE
  • Prompt: $J(TOTAL,11,0)
  • Line Location: REP+57
Function Call: WRITE
  • Prompt: !,"$ INACTIVE",?14
  • Line Location: REP+59
Function Call: WRITE
  • Prompt: $$SHOWVALU(%)
  • Line Location: REP+59
Function Call: WRITE
  • Prompt: $$SHOWVALU(TOTAL)
  • Line Location: REP+60
Function Call: WRITE
  • Prompt: $J(%,11,2)
  • Line Location: REP+62
Function Call: WRITE
  • Prompt: $J(%,11,2)
  • Line Location: REP+67
Function Call: WRITE
  • Prompt: !!?2,"LONG SUPPLY ("_PRCPTP_" ITEMS) AVG. FROM ",Y," TO ",$P(NOW,"@"),!?2,"(>90 DAYS)",!,"# LONG SUPPLY",?13
  • Line Location: REP+70
Function Call: WRITE
  • Prompt: $J(%,11,0)
  • Line Location: REP+71
Function Call: WRITE
  • Prompt: $J(TOTAL,11,0)
  • Line Location: REP+72
Function Call: WRITE
  • Prompt: !,"$ LONG SUPPLY",?14
  • Line Location: REP+74
Function Call: WRITE
  • Prompt: $$SHOWVALU(%)
  • Line Location: REP+74
Function Call: WRITE
  • Prompt: $$SHOWVALU(TOTAL)
  • Line Location: REP+75
Function Call: WRITE
  • Prompt: $J(%,11,2)
  • Line Location: REP+77
Function Call: WRITE
  • Prompt: $J(%,11,2)
  • Line Location: REP+78
Function Call: WRITE
  • Prompt: !!,"# "_PRCPTP2_" ITEMS",?13
  • Line Location: REP+84
Function Call: WRITE
  • Prompt: $J(%,11,0)
  • Line Location: REP+84
Function Call: WRITE
  • Prompt: $J(ITEMCTA,11,0)
  • Line Location: REP+85
Function Call: WRITE
  • Prompt: !!,"INVENTORY VALUE"
  • Line Location: REP+88
Function Call: WRITE
  • Prompt: !,"$ "_PRCPTP,?14
  • Line Location: REP+89
Function Call: WRITE
  • Prompt: $$SHOWVALU(%)
  • Line Location: REP+89
Function Call: WRITE
  • Prompt: $$SHOWVALU(TOTVAL)
  • Line Location: REP+90
Function Call: WRITE
  • Prompt: !,"$ DUEINS",?14
  • Line Location: REP+92
Function Call: WRITE
  • Prompt: $$SHOWVALU(%)
  • Line Location: REP+92
Function Call: WRITE
  • Prompt: $$SHOWVALU(X)
  • Line Location: REP+93
Function Call: WRITE
  • Prompt: !,"$ DUEOUTS",?14
  • Line Location: REP+95
Function Call: WRITE
  • Prompt: $$SHOWVALU(%)
  • Line Location: REP+95
Function Call: WRITE
  • Prompt: $$SHOWVALU(X)
  • Line Location: REP+96
Function Call: WRITE
  • Prompt: !
  • Line Location: LC+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,"STOCK STATUS REPORT FOR: ",$E(PRCP("IN"),1,20),?(80-$L(%)),%
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !?5,"TRANSACTIONS FOR THE MONTH-YEAR: ",MONTH,?(80-$L(PRCPT)),PRCPT
  • Line Location: HEAD+6
Function Call: WRITE
  • Prompt: !,"SUMMARY",?14,$J("ACCT 1",11),$J("ACCT 2",11),$J("ACCT 3",11),$J("ACCT 6",11),$J("ACCT 8",11),$J("TOTAL",11)
  • Line Location: HEAD+8
Function Call: WRITE
  • Prompt: !,%
  • Line Location: HEAD+9
Info |  Source |  Entry Points |  Interaction Calls