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

Package: Auto Replenishment Ward Stock

Routine: PSGWXREF


Information

PSGWXREF ;BHAM ISC/CML-Background job to re-index the "AMIS" xref for inventories, on-demands, and returns ; 08 Dec 93 / 9:03 AM

Source Information

Source file <PSGWXREF.m>

Entry Points

Name Comments DBIA/ICR reference
ASK1
ASK2
START ; Entry point from queue
; Delete existing "AMIS" xref
QUIT
INV ; Re-index Inventories
SETINV ;
OND ; Re-index On-Demands
SETOND
RET ; Re-index Returns
SETRET ;
HELP ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option will re-index the ""AMIS"" cross-reference for Inventories, On-Demand",!,"Requests, and Returns for a date range beginning with the START DATE you specify",!,"to the time the job runs."
  • Line Location: PSGWXREF+3
Function Call: WRITE
  • Prompt: !!?34,"** WARNING **",!?22,"Since this option is CPU intensive,",!?17,"it should be QUEUED to run in the ""off"" hours!",!!
  • Line Location: PSGWXREF+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK1+0
Function Call: WRITE
  • Prompt: !!,"The ""AMIS"" cross-reference will now be re-indexed starting from ",Y,"."
  • Line Location: ASK2+0
Function Call: WRITE
  • Prompt: !!,"Are you SURE that is what you want to do"
  • Line Location: ASK2+1
Function Call: WRITE
  • Prompt: !!,"""AMIS"" cross reference re-indexing queued!"
  • Line Location: ASK2+3
Function Call: WRITE
  • Prompt: !?5,"Enter 'YES' if you are satisfied with the selected date range.",!?5,"Enter 'NO' or '^' if you wish to abort the re-indexing."
  • Line Location: HELP+1
Info |  Source |  Entry Points |  Interaction Calls