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

Package: Pharmacy Benefits Management

Routine: PSUDBQUE


Information

PSUDBQUE ; IHS/ADC/GTH - DOUBLE QUEUING SHELL HANDLER; 04 NOV 1997

Source Information

Source file <PSUDBQUE.m>

Entry Points

Name Comments DBIA/ICR reference
START ;
EN ;PEP for double queuing
  • ICR #2922
    • Status: Withdrawn
    • Usage: Private
    ZIS ;
    ZISQ ;
    QUE1 ;
    DEQUE1 ;> 1st deque
    COMPUTE ;>do computing | routine
    QUE2 ;
    DEQUE2 ;>EP 2nd Deque | printing
    END ;>End | cleanup
    END0 ;EP - from compute cycle when PSU("RP") EXISTS
    END1 ;EP clean out PSU as passed in
    ENDC ;EP - end computing cycle
    SUB ;>Subroutines
    NORC ;used if no PSURC identified
    SETIOPN ;EP Set IOP parameters with (N)o open
    PGMNOTE ;

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"REPORTING-ABORTED",*7
    • Line Location: ZIS+5
    Function Call: WRITE
    • Prompt: !,"Queing to slave printer not allowed ... Report Aborting"
    • Line Location: QUE1+2
    Info |  Source |  Entry Points |  Interaction Calls