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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSARDCBA

Package: Drug Accountability

Routine: PSARDCBA


Information

PSARDCBA ;BIRM/MFR - Return Drug Batch - ListMan ;07/01/08

Source Information

Source file <PSARDCBA.m>

Entry Points

Name Comments DBIA/ICR reference
SB ; - Single Batch View/Process
EN(PSAPHLOC,PSABATCH) ; - ListManager entry point
HDR ; - Header
SETHDR() ; - Displays the Header Line
INIT ; - Populates the Body section for ListMan
SORT ; - Sets the line to be displayed in ListMan
SETLINE ; - Sets the line to be displayed in ListMan
ADD ; - Add New Item action
CAN ; - Cancel Batch action
PKP ; - Pickup Batch action
CRE ; - Update Credit action
EDT ; - Edit Batch action
EDIT ; - Edit Batch action
LKBAT(PHLOC,BATCH) ; - Locks the batch
UNLKBAT(PHLOC,BATCH) ; - Unlocks the batch
COM ; - Complete Batch action
SEL ; - Select Item action
EXIT ;
HELP
LOAD() ; - Load Batch information
CHKCRE(PHLOC,BATCH) ; - Check if Actual Credit have been entered
LOGACT(FIELD,OLDVALUE,NEWVALUE,ITEM) ; - Log an activity for the return item
AMT(VAL) ; Returns the amount formatted

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SB+12
Function Call: WRITE
  • Prompt: !,"Please wait..."
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: ADD+6
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD+9
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD+13
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD+13
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: CAN+7
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: CAN+11
Function Call: WRITE
  • Prompt: !
  • Line Location: CAN+15
Function Call: WRITE
  • Prompt: !
  • Line Location: CAN+20
Function Call: WRITE
  • Prompt: !!,"Cancelling Batch..."
  • Line Location: CAN+23
Function Call: WRITE
  • Prompt: "OK"
  • Line Location: CAN+28
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: PKP+4
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: PKP+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PKP+18
Function Call: WRITE
  • Prompt: !
  • Line Location: PKP+26
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: CRE+4
Function Call: WRITE
  • Prompt: !!,"Item ",ITEM,": ",^TMP("PSARDCBA",$J,ITEM,"DISP")
  • Line Location: CRE+34
Function Call: WRITE
  • Prompt: !
  • Line Location: CRE+36
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: EDT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: EDT+17
Function Call: WRITE
  • Prompt: !!,"Saving Batch..."
  • Line Location: EDT+20
Function Call: WRITE
  • Prompt: "OK"
  • Line Location: EDT+25
Function Call: WRITE
  • Prompt: !
  • Line Location: EDIT+3
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: COM+7
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: COM+11
Function Call: WRITE
  • Prompt: !
  • Line Location: COM+17
Function Call: WRITE
  • Prompt: !!,"Completing Batch..."
  • Line Location: COM+20
Function Call: WRITE
  • Prompt: "OK"
  • Line Location: COM+36
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: SEL+5
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: SEL+8
Function Call: WRITE
  • Prompt: !!,"WARNING: The following items will have their CREDIT STATUS"
  • Line Location: CHKCRE+11
Function Call: WRITE
  • Prompt: !?9,"set to DENIED because no credit amount has been"
  • Line Location: CHKCRE+12
Function Call: WRITE
  • Prompt: !?9,"entered for them:",!
  • Line Location: CHKCRE+13
Function Call: WRITE
  • Prompt: !?9,XX,!?9,"RETURN DRUG (NDC)",?49,"DISP QTY",?58,"UNIT",!?9,XX,!
  • Line Location: CHKCRE+14
Function Call: WRITE
  • Prompt: $C(13)
  • Line Location: CHKCRE+17
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKCRE+18

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] GET1^DIQ
^DIC(51.5 - [#51.5] GET1^DIQ
58.351 GET1^DIQ,  GETS^DIQ
58.3511 GET1^DID,  GET1^DIQ,  GETS^DIQ
^PSD(58.36 - [#58.36] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call