CA Panvalet DATA Type incorrectly formatted

book

Article ID: 131624

calendar_today

Updated On:

Products

CA Database Analyzer (IMS Tools) CA Mainframe Configuration Manager for IMS for z/OS IMS TOOLS - MISC CA Compress Data Compression (IMS Tools) CA Database Analyzer for IMS for z/OS CA Database Copier for IMS for z/OS CA Database Organizer for IMS for z/OS CA Mainframe Extended Terminal Manager (IMS Tools) CA High Performance Recovery for IMS for z/OS CA Database Organizer (IMS Tools) CA Mainframe Program Restart Manager for IMS for z/OS CA Secondary Index Builder for IMS for z/OS CA Secondary Index for IMS for z/OS CA JARS CA JARS Resource Accounting CA JARS SMF Director CA JMR CA MIM Resource Sharing (MIM) CA MIM Data Sharing (MII) CA MIM Tape Sharing (MIA) CA MIM Message Sharing (MIC) Nastel AutoPilot for WebSphere MQ CA Panvalet CA QuickFetch CA Raps VSE CA Scheduler VSE CA SMR CA SOLVE:Operations Automation SOLVE:Access Session Management CA SOLVE:FTS CA SYSVIEW Performance Management NXBRIDGE - SYSYVIEW/ENDEVOR CA SOLVE

Issue/Introduction

A Panvalet member was created with LANG TYPE  ‘DATA’  and the ISPF profile has "NUMBER OFF".   

When the DATA member is browsed in PVEDIT it displays correctly:
PVEDIT ---- LIBSYS.TEST.PANLIB(A001)-------------------------- COLUMNS 001 072 
COMMAND ===> SCROLL ===> CSR 
****** ***************************** Top of Data ****************************** 
=PROF> ....DATA (FIXED - 80)....RECOVERY OFF....NUMBER OFF..................... 
=PROF> ....CAPS ON....HEX OFF....NULLS ON STD....TABS OFF....SETUNDO STG....... 
=PROF> ....AUTOSAVE ON....AUTONUM OFF....AUTOLIST OFF....STATS OFF............. 
=PROF> ....PROFILE UNLOCK....IMACRO NONE....PACK OFF....NOTE ON................ 
=PROF> ....HILITE OFF CURSOR FIND.............................................. 
000001 010201850085353HA 13G000A4204700845000086400008850000908000093100010000 
000002 020201850085353HA 13G000A4204700845000086400008850000908000093100010000 
000003 030201850085353HA 13G000A4204700845000086400008850000908000093100010000 
000004 040201850085353HA 13G000A4204700845000086400008850000908000093100010000 
000005 050201850085353HA 13G000A4204700845000086400008850000908000093100010000 
****** **************************** Bottom of Data ****************************


When the Data member is edited in PVEDIT, the ISPF profile is changed to  "NUMBER ON COB"
PVEDIT ---- LIBSYS.TEST.PANLIB(A001)------------------------- COLUMNS 007 078 
COMMAND ===> SCROLL ===> CSR 
****** ***************************** Top of Data ****************************** 
=PROF> ....DATA (FIXED - 80)....RECOVERY OFF....NUMBER ON COB.................. 
=PROF> ....CAPS ON....HEX OFF....NULLS ON STD....TABS OFF....SETUNDO STG....... 
=PROF> ....AUTOSAVE ON....AUTONUM OFF....AUTOLIST OFF....STATS OFF............. 
=PROF> ....PROFILE UNLOCK....IMACRO NONE....PACK OFF....NOTE ON................ 
=PROF> ....HILITE OFF CURSOR FIND.............................................. 
=NOTE= CAUTION: PROFILE CHANGED TO "NUMBER ON COB" FROM "NUMBER OFF" 
=NOTE= BECAUSE OF SEQUENCE NUMBERS OR LACK OF THEM FOUND IN DATA. 

010201 850085353HA 13G000A4204700845000086400008850000908000093100010000 
020201 850085353HA 13G000A4204700845000086400008850000908000093100010000 
030201 850085353HA 13G000A4204700845000086400008850000908000093100010000 
040201 850085353HA 13G000A4204700845000086400008850000908000093100010000 
050201 850085353HA 13G000A4204700845000086400008850000908000093100010000 
****** **************************** Bottom of Data ****************************

This is causing incorrect alignment of the data. 

Cause

If a member defined as DATA format contains numeric data in col 1-6 or 73-80, the ISPF profile will be changed to NUMBER ON COB or NUMBER ON STD. 

Environment

Release:
Component: PANVLT

Resolution

To prevent this, apply 2 Special fixes - 
$4SF004 -- SPECIAL ZAP TO PREVENT "NUM ON CBL" FOR TYPE = DATA 
$4SF013 -- SPECIAL ZAP TO PREVENT NUMBER ON STANDARD WHEN TYPE=DATA.