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

Package: IFCAP

Routine: PRCGF424


Information

PRCGF424 ;;VMP/RGB IFCAP 424/424.1 FILE CLEANSING ;12/10/97 9:48 AM

Source Information

Source file <PRCGF424.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**115,190**;Oct 20, 2000;Build 3
TXT ;Cleanse files for:
; 1. File 424 entry with missing 0 node
; 2. File 424 entry with null file #442-Obligation pointer
; 3. File 424 entry with invalid file #442-Obligation pointer
; 4. File 424 entry with null Auth # (field .01)
; 5. File 424 entry with missing sequence number in field .01
; 6. File 424 entry older than 9 years from current FY
CHK ;START FILE 424 CLEANSING
0 ;SAVE FILES
BUILD
1 ;CHECK 424 OBLIGATION POINTER TO 442
2
3 ;KILL BAD 424 RECORD
CHK1 ;START FILE 424.1 CLEANSING
10
11 ;KILL BAD 424.1 RECORD
EXIT ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: CHK+1
Function Call: WRITE
  • Prompt: !,$P($T(TXT+PRCII),";",2)
  • Line Location: CHK+1
Function Call: WRITE
  • Prompt: !
  • Line Location: BUILD+0
Function Call: WRITE
  • Prompt: "."
  • Line Location: 2+1
Function Call: WRITE
  • Prompt: !,"424: ",?8,PRCIEN,?17,PRCTYP,?21,PRCR
  • Line Location: 3+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: 10+1
Function Call: WRITE
  • Prompt: !,"424.1: ",?8,PRCIEN,?18,PRCTYP,?22,PRCR
  • Line Location: 11+3
Function Call: WRITE
  • Prompt: !!,"<< ***NO*** FILE ISSUES FOUND TO BE CLEANED >>"
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: !!,"CLEANSING OF FILES 424/424.1 COMPLETED"
  • Line Location: EXIT+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRC(424 - [#424] Classic Fileman Calls
^PRC(424.1 - [#424.1] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call