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

Package: IFCAP

Routine: PRCPRPHW


Information

PRCPRPHW ;WISC/RFJ-physical count form ; 3/22/99 11:17am

Source Information

Source file <PRCPRPHW.m>

Entry Points

Name Comments DBIA/ICR reference
DQ ;queue comes here
Q
ALLACCT ; select all account codes
H

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCPRPHW+8
Function Call: WRITE
  • Prompt: !!,"Selected account codes will be used to generate the physical count form."
  • Line Location: PRCPRPHW+11
Function Call: WRITE
  • Prompt: !!," Currently selected account codes:",!," "
  • Line Location: PRCPRPHW+15
Function Call: WRITE
  • Prompt: "<< ALL ACCOUNT CODES >>"
  • Line Location: PRCPRPHW+16
Function Call: WRITE
  • Prompt: !," "
  • Condition for execution: $X>70
  • Line Location: PRCPRPHW+17
Function Call: WRITE
  • Prompt: A," "
  • Line Location: PRCPRPHW+17
Function Call: WRITE
  • Prompt: !," You can DE-select one of the above account codes by reselecting it."
  • Line Location: PRCPRPHW+18
Function Call: WRITE
  • Prompt: !!," Currently DE-selected account codes:",!," "
  • Line Location: PRCPRPHW+20
Function Call: WRITE
  • Prompt: !," "
  • Condition for execution: $X>70
  • Line Location: PRCPRPHW+21
Function Call: WRITE
  • Prompt: A," "
  • Line Location: PRCPRPHW+21
Function Call: WRITE
  • Prompt: !," You can RE-select one of the above account codes by reselecting it."
  • Line Location: PRCPRPHW+22
Function Call: WRITE
  • Prompt: !!,"Select the number of the account code created, '^' to exit."
  • Line Location: PRCPRPHW+23
Function Call: WRITE
  • Prompt: !?10,"DE-selected !"
  • Line Location: PRCPRPHW+28
Function Call: WRITE
  • Prompt: !?10,"DE-selected !"
  • Line Location: PRCPRPHW+29
Function Call: WRITE
  • Prompt: !?10,"RE-selected !"
  • Line Location: PRCPRPHW+30
Function Call: WRITE
  • Prompt: !?10,"selected !"
  • Line Location: PRCPRPHW+31
Function Call: WRITE
  • Prompt: !!,"NO ACCOUNT CODES SELECTED."
  • Line Location: PRCPRPHW+34
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCPRPHW+36
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: PRCPRPHW+39
Function Call: WRITE
  • Prompt: !!?5,"MAIN STORAGE LOCATION: ",MAIN
  • Line Location: DQ+8
Function Call: WRITE
  • Prompt: !?10,"ACCOUNT CODE: ",ACCT
  • Line Location: DQ+10
Function Call: WRITE
  • Prompt: !,$TR(NSN,"-"),?17,$E($P(D,"^"),1,23),?42,ITEMDA,?47,$J($P(D,"^",2),10)
  • Line Location: DQ+12
Function Call: WRITE
  • Prompt: $J($P(D,"^",3),12)
  • Line Location: DQ+13
Function Call: WRITE
  • Prompt: ?71,"_________"
  • Line Location: DQ+14
Function Call: WRITE
  • Prompt: !?20,"ADD STORAGE: "
  • Line Location: DQ+16
Function Call: WRITE
  • Prompt: !?20
  • Line Location: DQ+17
Function Call: WRITE
  • Prompt: $E($$STORELOC^PRCPESTO($P(D,"^")),1,15)," "
  • Line Location: DQ+18
Function Call: WRITE
  • Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>"
  • Line Location: DQ+24
Function Call: WRITE
  • Prompt: !
  • Line Location: ALLACCT+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"PHYSICAL COUNT FORM: ",$E(PRCP("IN"),1,12),?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"NSN",?15,"DESCRIPTION",?42,"MI",?50,"UNIT/ISS"
  • Line Location: H+2
Function Call: WRITE
  • Prompt: ?62,"ON HAND"
  • Line Location: H+3
Function Call: WRITE
  • Prompt: ?71,"NEW COUNT",!,%
  • Line Location: H+4
Info |  Source |  Entry Points |  Interaction Calls