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

Package: IFCAP

Routine: PRCESOE


Information

PRCESOE ;WISC/CLH/CTB/SJG/ASU - 1358 OBLIGATION ; 08/22/94 5:11 PM

Source Information

Source file <PRCESOE.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**148,153,161,176**;Oct 20, 2000;Build 11
SC ; Entry point for rebuild/retransmit
REV
OKAY
VAR
VAR11
VAR2
GO ; Prompt user for final go-ahead for the document creation
ESIG ; Enter the Electronic Signature and away it goes!
EDIT ; Check fund/year dictionary for required FMS fields
STACK ; Create entry in GECS Stack File
SEGS ; Create entry in TMP($J, for remaining segments
TRANS ; Mark the FMS transaction document as queued for transmission
POBAL ; Enter Obligation Data into Purchase Order Record
OUT
EXIT
KILL
LOOKUP ; Lookup 1358 transaction which is pending fiscal action.
POST ; Post data in file 424
MSG
MSG1
MSG2(MSG)
MSG3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SC+3
Function Call: WRITE
  • Prompt: !!,"You are the CP Clerk (Requestor) on this 1358 transaction."
  • Line Location: SC+8
Function Call: WRITE
  • Prompt: !,"Per Segregation of Duties, the CP Clerk (Requestor)"
  • Line Location: SC+9
Function Call: WRITE
  • Prompt: " is not permitted to "
  • Line Location: SC+10
Function Call: WRITE
  • Prompt: $S($G(PRCFSC):"Obligate",1:"Rebuild/Retransmit")," the 1358."
  • Line Location: SC+11
Function Call: WRITE
  • Prompt: !
  • Line Location: SC+13
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SC+14
Function Call: WRITE
  • Prompt: !!,"You are the Approver on this 1358 transaction."
  • Line Location: SC+17
Function Call: WRITE
  • Prompt: !,"Per Segregation of Duties, the Approver is not permitted to "
  • Line Location: SC+18
Function Call: WRITE
  • Prompt: $S($G(PRCFSC):"Obligate",1:"Rebuild/Retransmit")," the 1358."
  • Line Location: SC+19
Function Call: WRITE
  • Prompt: !
  • Line Location: SC+21
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SC+22
Function Call: WRITE
  • Prompt: !!,"Would you like to review this request?"
  • Line Location: REV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: OKAY+21
Function Call: WRITE
  • Prompt: !
  • Line Location: VAR2+4
Function Call: WRITE
  • Prompt: !,"The Electronic Signature must now be entered to generate the "_PRCFA("TYPE")_" Document.",!
  • Line Location: ESIG+1
Function Call: WRITE
  • Prompt: !!,"...updating 1358 Obligation balances...",!
  • Line Location: POBAL+21
Function Call: WRITE
  • Prompt: !!
  • Line Location: POBAL+24
Info |  Source |  Entry Points |  Interaction Calls