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

Package: IFCAP

Routine: PRCSUT3


Information

PRCSUT3 ;WISC/SAW/PLT/BGJ-TRANSACTION UTILITY PROGRAM ; 21 Apr 93 10:18 AM

Source Information

Source file <PRCSUT3.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**115,123,149,150,180,191**;Oct 20, 2000;Build 4
EN ;CREATE NEW TRANSACTION NUMBER
EN1
  • ICR #1523
    • Status: Active
    • Usage: Private
    T
    T1
    TEX
    OUT
    OUT1
    EN2 ;add record in file 410
  • ICR #1523
    • Status: Active
    • Usage: Private
    EN2A
    EN2B
    EN3 ;INPUT TRANSFORM FOR REORDERING 410 FILE ENTRIES
    CANCK ;Look for cancelled activity when all seq used
    CK0
    CK1
    CK2
    CKQ
    CER
    CER424 ;424 AVAILABLE SLOT CHECK ;PRC*5.1*191 CHECK FOR AVAILABLE 424 ENTRIES FOR 1358
    W1
    W4
    W5
    EXIT

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: $C(7),"ANOTHER USER IS EDITING FILE 410 CONTROL NODE! Please retry in a minute."
    • Line Location: EN3+5
    Function Call: WRITE
    • Prompt: !
    • Line Location: CER424+4
    Function Call: WRITE
    • Prompt: !!,"** You have ",9998-PRCTT," remaining and are dangerously close to"
    • Line Location: CER424+7
    Function Call: WRITE
    • Prompt: !,"** running out of Authorization entries in file 424."
    • Line Location: CER424+8
    Function Call: WRITE
    • Prompt: !,"** Authorizations and Liquidation REQUIRE available entries so you"
    • Line Location: CER424+9
    Function Call: WRITE
    • Prompt: !,"** should be considering closing this obligation very soon as ONLY"
    • Line Location: CER424+10
    Function Call: WRITE
    • Prompt: !,"** 9999 entries are allowed.",!
    • Line Location: CER424+11
    Function Call: WRITE
    • Prompt: !!,"** You have ZERO remaining and this is the last Authorization"
    • Line Location: CER424+13
    Function Call: WRITE
    • Prompt: !,"** you will be able to enter for this 1358 (max 9999 entries). You"
    • Line Location: CER424+14
    Function Call: WRITE
    • Prompt: !,"** will NO LONGER be able to liquidate any outstanding Authorizations."
    • Line Location: CER424+15
    Function Call: WRITE
    • Prompt: !,"** You MUST close this 1358 and open a new 1358 to cover further activity.",!
    • Line Location: CER424+16
    Function Call: WRITE
    • Prompt: !!,"Would you like to edit this request"
    • Line Location: W1+0
    Function Call: WRITE
    • Prompt: !!,"Another user is accessing this file... Try later.",$C(7)
    • Line Location: W4+0
    Function Call: WRITE
    • Prompt: !!,"You are not an authorized control point user.",!,"Contact your control point official."
    • Line Location: W5+0

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^PRCS(410 - [#410] Classic Fileman Calls
    ^PRCS(410.1 - [#410.1] Classic Fileman Calls
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call